Symbol Description Uses
mSnow mass of snow [kg/m2] 23


File Line number Procedure Code
./pkg/land/land_impl_temp.F 136 LAND_IMPL_TEMP 
          mSnow = land_rhoSnow*land_hSnow(i,j,bi,bj)
./pkg/land/land_impl_temp.F 152 LAND_IMPL_TEMP 
     &         'LAND_IMPL_TEMP: 0 , ts,tg1&2,mSw=',0,tSurf,tg,mSnow
./pkg/land/land_impl_temp.F 177 LAND_IMPL_TEMP 
     &         .AND. tmpFlag .AND. tSurf*mSnow .LE. 0. _d 0 ) THEN
./pkg/land/land_impl_temp.F 188 LAND_IMPL_TEMP 
           IF ( tSurf*mSnow .LE. 0. _d 0 ) THEN
./pkg/land/land_impl_temp.F 207 LAND_IMPL_TEMP 
     &              tg,tSurf,mSnow
./pkg/land/land_impl_temp.F 223 LAND_IMPL_TEMP 
     &         .AND. tmpFlag .AND. tSurf*mSnow .LE. 0. _d 0 ) THEN
./pkg/land/land_impl_temp.F 229 LAND_IMPL_TEMP 
           IF ( tSurf*mSnow .LE. 0. _d 0 ) THEN
./pkg/land/land_impl_temp.F 233 LAND_IMPL_TEMP 
             IF ( eg(1)*mSnow .GT. 0. _d 0 ) THEN
./pkg/land/land_impl_temp.F 235 LAND_IMPL_TEMP 
              dMsn = MIN( mSnow, eg(1)*recip_Lfreez )
./pkg/land/land_impl_temp.F 237 LAND_IMPL_TEMP 
              land_hSnow(i,j,bi,bj) = (mSnow - dMsn)/land_rhoSnow
./pkg/land/land_impl_temp.F 260 LAND_IMPL_TEMP 
     &             tg,tSurf,mSnow
./pkg/land/land_impl_temp.F 279 LAND_IMPL_TEMP 
          IF ( tmpFlag .AND. tSurf*mSnow .GT. 0. _d 0 ) THEN
./pkg/land/land_impl_temp.F 293 LAND_IMPL_TEMP 
     &          + delT*fLoc - land_Lfreez*mSnow + aLoc*tg(2)
./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 297 LAND_IMPL_TEMP 
             dMsn = mSnow
./pkg/land/land_impl_temp.F 321 LAND_IMPL_TEMP 
            dMsn = MIN( MAX(dMsn, 0. _d 0), mSnow )
./pkg/land/land_impl_temp.F 328 LAND_IMPL_TEMP 
           land_hSnow(i,j,bi,bj) = (mSnow - dMsn)/land_rhoSnow
./pkg/land/land_impl_temp.F 84 LAND_IMPL_TEMP 
      _RL mSnow, dMsn, delT
./pkg/land/land_stepfwd.F 225 LAND_STEPFWD 
            mSnow = land_hSnow(i,j,bi,bj)*land_rhoSnow
./pkg/land/land_stepfwd.F 227 LAND_STEPFWD 
            IF ( dMsn .GE. mSnow ) THEN
./pkg/land/land_stepfwd.F 228 LAND_STEPFWD 
              dMsn = mSnow
./pkg/land/land_stepfwd.F 230 LAND_STEPFWD 
              flxEngU(i,j) = enWfx - land_Lfreez*mSnow/land_deltaT
./pkg/land/land_stepfwd.F 79 LAND_STEPFWD 
      _RL mSnow, dMsn, snowPrec