| File |
Line number |
Procedure |
Code |
|
./pkg/land/land_impl_temp.F |
182 |
LAND_IMPL_TEMP |
eLoc = eg(1) + fLoc*delT*beta |
|
./pkg/land/land_impl_temp.F |
184 |
LAND_IMPL_TEMP |
temp_bf = (eLoc+land_Lfreez*mW(1))/cLoc |
|
./pkg/land/land_impl_temp.F |
185 |
LAND_IMPL_TEMP |
temp_af = eLoc/cLoc |
|
./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 |
292 |
LAND_IMPL_TEMP |
eLoc = cg(1)*tg(1) |
|
./pkg/land/land_impl_temp.F |
294 |
LAND_IMPL_TEMP |
IF ( eLoc .GT. 0. _d 0 .OR. mSnow.LT.mSnEpsil ) THEN |
|
./pkg/land/land_impl_temp.F |
80 |
LAND_IMPL_TEMP |
_RL aLoc, bLoc, cLoc, eLoc, fLoc, alpha, beta |