| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
1233 |
RAS |
_RL p00, crtmsf, frac, rasblf |
|
./pkg/fizhi/fizhi_moist.F |
1638 |
CLOUD |
_RL frac, cp, alhl, rkap, grav, p00, crtmsf |
|
./pkg/fizhi/update_earth_exports.F |
1222 |
GET_LANDFRAC |
& tilefrac,frac) |
|
./pkg/fizhi/update_earth_exports.F |
1233 |
GET_LANDFRAC |
_RL frac(im,jm) |
|
./pkg/fizhi/update_earth_exports.F |
1239 |
GET_LANDFRAC |
frac(i,j) = 0.0 |
|
./pkg/fizhi/update_earth_exports.F |
1248 |
GET_LANDFRAC |
frac(i,j) = frac(i,j) + tilefrac(i,j,k,bi,bj) |
|
./pkg/zonal_filt/zonal_filt_presmooth.F |
185 |
ZONAL_FILT_PRESMOOTH |
frac = dist/len |
|
./pkg/zonal_filt/zonal_filt_presmooth.F |
187 |
ZONAL_FILT_PRESMOOTH |
& +(field(iHi)-field(iLo))*frac |
|
./pkg/zonal_filt/zonal_filt_presmooth.F |
83 |
ZONAL_FILT_PRESMOOTH |
_RL frac |
|
./pkg/bling/bling_light.F |
136 |
BLING_LIGHT |
frac = dayhrs/PI !fraction of daylight in day |
|
./pkg/bling/bling_light.F |
138 |
BLING_LIGHT |
fluxi = solar*(1. _d 0-albedo)*cosz*frac*parfrac |
|
./pkg/bling/bling_light.F |
71 |
BLING_LIGHT |
_RL cosz, frac, fluxi |
|
./pkg/dic/insol.F |
43 |
INSOL |
_RL cosz, frac, fluxi |
|
./pkg/dic/insol.F |
80 |
INSOL |
frac = dayhrs/PI !fraction of daylight in day |
|
./pkg/dic/insol.F |
82 |
INSOL |
fluxi = solar*(1. _d 0-albedo)*cosz*frac*parfrac |