| File |
Line number |
Procedure |
Code |
|
./pkg/land/LAND_PARAMS.h |
80 |
NO PROCEDURE |
& land_rhoSnow, land_Lfreez, recip_Lfreez, |
|
./pkg/land/LAND_PARAMS.h |
89 |
NO PROCEDURE |
_RL land_rhoSnow, land_Lfreez, recip_Lfreez |
|
./pkg/land/land_check.F |
160 |
LAND_CHECK |
CALL WRITE_0D_RL(land_Lfreez,INDEX_NONE,'land_Lfreez =', |
|
./pkg/land/land_impl_temp.F |
184 |
LAND_IMPL_TEMP |
temp_bf = (eLoc+land_Lfreez*mW(1))/cLoc |
|
./pkg/land/land_impl_temp.F |
238 |
LAND_IMPL_TEMP |
eg(1) = eg(1) - dMsn*land_Lfreez |
|
./pkg/land/land_impl_temp.F |
242 |
LAND_IMPL_TEMP |
& 1, dMsn, -dMsn*land_Lfreez, eg(1) |
|
./pkg/land/land_impl_temp.F |
293 |
LAND_IMPL_TEMP |
& + delT*fLoc - land_Lfreez*mSnow + aLoc*tg(2) |
|
./pkg/land/land_impl_temp.F |
326 |
LAND_IMPL_TEMP |
& + delT*fLoc - land_Lfreez*dMsn |
|
./pkg/land/land_ini_vars.F |
145 |
LAND_INI_VARS |
& - land_Lfreez*mWater |
|
./pkg/land/land_ini_vars.F |
159 |
LAND_INI_VARS |
temp_bf = (land_enthalp(i,j,k,bi,bj)+land_Lfreez*mWater) |
|
./pkg/land/land_monitor.F |
142 |
LAND_MONITOR |
theEng(n)= -land_rhoSnow*land_Lfreez*theMean(n)*theVol(n) |
|
./pkg/land/land_readparms.F |
152 |
LAND_READPARMS |
land_Lfreez = 334. _d 3 |
|
./pkg/land/land_readparms.F |
206 |
LAND_READPARMS |
IF ( land_Lfreez.NE. 0. _d 0 ) THEN |
|
./pkg/land/land_readparms.F |
207 |
LAND_READPARMS |
recip_Lfreez = 1. _d 0 / land_Lfreez |
|
./pkg/land/land_readparms.F |
97 |
LAND_READPARMS |
& land_rhoSnow, land_Lfreez, |
|
./pkg/land/land_stepfwd.F |
157 |
LAND_STEPFWD |
temp_bf = (land_enthalp(i,j,k,bi,bj)+land_Lfreez*mWater) |
|
./pkg/land/land_stepfwd.F |
200 |
LAND_STEPFWD |
flxEngU(i,j) = enWfx + land_Lfreez*snowPrec |
|
./pkg/land/land_stepfwd.F |
214 |
LAND_STEPFWD |
land_enRnOf(i,j,bi,bj) = -mIceDt*land_Lfreez |
|
./pkg/land/land_stepfwd.F |
230 |
LAND_STEPFWD |
flxEngU(i,j) = enWfx - land_Lfreez*mSnow/land_deltaT |
|
./pkg/land/land_stepfwd.F |
406 |
LAND_STEPFWD |
temp_bf = (land_enthalp(i,j,k,bi,bj)+land_Lfreez*mWater) |