File |
Line number |
Procedure |
Code |
./pkg/land/land_stepfwd.F |
201 |
LAND_STEPFWD |
hNewSnow = land_deltaT * snowPrec / land_rhoSnow |
./pkg/land/land_stepfwd.F |
204 |
LAND_STEPFWD |
& *EXP( -hNewSnow/hNewSnowAge ) |
./pkg/land/land_stepfwd.F |
210 |
LAND_STEPFWD |
dhSnow = MIN( hNewSnow, dhSnowMx ) |
./pkg/land/land_stepfwd.F |
212 |
LAND_STEPFWD |
mIceDt = land_rhoSnow * (hNewSnow-dhSnow) / land_deltaT |
./pkg/land/land_stepfwd.F |
218 |
LAND_STEPFWD |
& 3,snowPrec,mPmE,hNewSnow,land_hSnow(i,j,bi,bj) |
./pkg/land/land_stepfwd.F |
80 |
LAND_STEPFWD |
_RL hNewSnow, dhSnowMx, dhSnow, mIceDt, ageFac |