Symbol Description Uses
fLoc temporary value for surface heat flux [W/m2] 18


File Line number Procedure Code
./pkg/land/land_impl_temp.F 138 LAND_IMPL_TEMP 
          fLoc  = sFlx(i,j,1)+bLoc*tSurf
./pkg/land/land_impl_temp.F 158 LAND_IMPL_TEMP 
          tg(1) = ( cg(1)*tg(1) + fLoc*delT*beta
./pkg/land/land_impl_temp.F 165 LAND_IMPL_TEMP 
          tSurf = ( tg(1) + alpha*fLoc ) * beta
./pkg/land/land_impl_temp.F 182 LAND_IMPL_TEMP 
           eLoc = eg(1) + fLoc*delT*beta
./pkg/land/land_impl_temp.F 187 LAND_IMPL_TEMP 
           tSurf = ( tg(1) + alpha*fLoc ) * beta
./pkg/land/land_impl_temp.F 202 LAND_IMPL_TEMP 
     &             tmp2,(tmp1+alpha*fLoc)*beta
./pkg/land/land_impl_temp.F 228 LAND_IMPL_TEMP 
           tSurf = alpha*fLoc * beta
./pkg/land/land_impl_temp.F 232 LAND_IMPL_TEMP 
             eg(1) = eg(1) + aLoc*tg(2) + fLoc*delT*beta
./pkg/land/land_impl_temp.F 255 LAND_IMPL_TEMP 
     &             tmp1,(tmp1+alpha*fLoc)*beta
./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 287 LAND_IMPL_TEMP 
           fLoc = sFlx(i,j,0)
./pkg/land/land_impl_temp.F 293 LAND_IMPL_TEMP 
     &          + delT*fLoc - land_Lfreez*mSnow + aLoc*tg(2)
./pkg/land/land_impl_temp.F 313 LAND_IMPL_TEMP 
            dMsn = ( fLoc+tg(1)/alpha )*delT*recip_Lfreez
./pkg/land/land_impl_temp.F 317 LAND_IMPL_TEMP 
     &          2, dMsn, fLoc,tg(1)/alpha
./pkg/land/land_impl_temp.F 326 LAND_IMPL_TEMP 
     &           + delT*fLoc - land_Lfreez*dMsn
./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