File |
Line number |
Procedure |
Code |
./pkg/land/land_impl_temp.F |
137 |
LAND_IMPL_TEMP |
bLoc = -sFlx(i,j,2) |
./pkg/land/land_impl_temp.F |
138 |
LAND_IMPL_TEMP |
fLoc = sFlx(i,j,1)+bLoc*tSurf |
./pkg/land/land_impl_temp.F |
140 |
LAND_IMPL_TEMP |
beta = 1. _d 0/(1. _d 0+alpha*bLoc) |
./pkg/land/land_impl_temp.F |
161 |
LAND_IMPL_TEMP |
& / ( cg(1) + aLoc + bLoc*delT*beta |
./pkg/land/land_impl_temp.F |
183 |
LAND_IMPL_TEMP |
cLoc = cg(1) + aLoc + bLoc*delT*beta |
./pkg/land/land_impl_temp.F |
190 |
LAND_IMPL_TEMP |
eg(1) = eLoc - (aLoc + bLoc*delT*beta)*tg(1) |
./pkg/land/land_impl_temp.F |
284 |
LAND_IMPL_TEMP |
& 1, sFlx(i,j,0), fLoc, fLoc-bLoc*tSurf |
./pkg/land/land_impl_temp.F |
335 |
LAND_IMPL_TEMP |
& + delT*(fLoc-bLoc*Tsurf) |
./pkg/land/land_impl_temp.F |
80 |
LAND_IMPL_TEMP |
_RL aLoc, bLoc, cLoc, eLoc, fLoc, alpha, beta |
./model/src/ini_eos.F |
370 |
EOS_CHECK |
_RL rLoc(ncheck), bLoc(ncheck) |
./model/src/ini_eos.F |
435 |
EOS_CHECK |
& bLoc |
./model/src/ini_eos.F |
529 |
EOS_CHECK |
& ' = ', rLoc(kcheck), bLoc(kcheck) |