Symbol Description Uses
SHL 28



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 105 MOISTIO
      _RL      TL(ISTRIP,lm)  , SHL(ISTRIP,lm)
./pkg/fizhi/fizhi_moist.F 360 MOISTIO
       CALL STRIP (  shgather, SHL     ,im*jm,ISTRIP,lm,NN )
./pkg/fizhi/fizhi_moist.F 418 MOISTIO
        TMP1(I,3) = TMP1(I,3) + (PLE(I,L+1)-PLE(I,L))*SHL(I,L)/sp(i)
./pkg/fizhi/fizhi_moist.F 424 MOISTIO
        SHL(I,NSUBCL) = TMP1(I,3)*TMP1(I,4)
./pkg/fizhi/fizhi_moist.F 482 MOISTIO
       rh =  SHL(I,NSUBCL) / tmp2(i,3)
./pkg/fizhi/fizhi_moist.F 532 MOISTIO
     1, UL(num,1,1),ntracedim,ntracex,TH(num,NLTOP),SHL(num,NLTOP)
./pkg/fizhi/fizhi_moist.F 552 MOISTIO
        CVQ (I,L) =  (SHL(I,L) - saveq (i,l))
./pkg/fizhi/fizhi_moist.F 565 MOISTIO
        SHL(I,L) = saveq (i,l) + cvq (i,l)
./pkg/fizhi/fizhi_moist.F 643 MOISTIO
      CALL STRIP ( shgather,SHL,im*jm,ISTRIP,lm,NN)
./pkg/fizhi/fizhi_moist.F 647 MOISTIO
          SHL(I,L) = SHL(I,L) +  CVQ(I,L)*tmstp/SP(I)
./pkg/fizhi/fizhi_moist.F 650 MOISTIO
       saveq (I,L) = SHL(I,L)
./pkg/fizhi/fizhi_moist.F 654 MOISTIO
       CALL RNEVP (NN,ISTRIP,lm,TL,SHL,PCPEN,PL,CLFRAC,SP,DP,PLKE,
./pkg/fizhi/fizhi_moist.F 665 MOISTIO
       TMP1(I,L) = sp(i) * (SHL(I,L)-saveq(I,L)) * tminv
./pkg/fizhi/fizhi_moist.F 682 MOISTIO
        TMP1(I,L) = (SHL(I,L)-saveq(I,L)) * 1000. * sday * tminv
./pkg/fizhi/fizhi_turb.F 1399 TRBFLX
      _RL SHL(irun,NLEV)
./pkg/fizhi/fizhi_turb.F 1739 TRBFLX
       SHL(I,NLEV) =  FCC(I,NLEV) * SBAR(I,NLEV)
./pkg/fizhi/fizhi_turb.F 1742 TRBFLX
     1 SHL(I,NLEV) =  SHL(I,NLEV)+RSQ2PI*SVAR(I,NLEV)*EXP(-ARG(I,NLEV))
./pkg/fizhi/fizhi_turb.F 1743 TRBFLX
       BETAT(I,NLEV) = 1. + VIRTCON*SH(I,NLEV) - VRT1CON*SHL(I,NLEV)
./pkg/fizhi/fizhi_turb.F 1745 TRBFLX
     1         ( TH(I,NLEV) + CLH * SHL(I,NLEV) * (1./plk(i,nlev)) )
./pkg/fizhi/fizhi_turb.F 1746 TRBFLX
       BETAL(I,NLEV) = (1.+VIRTCON*SH(I,NLEV)-TWO*VRT1CON*SHL(I,NLEV))
./pkg/fizhi/fizhi_turb.F 1860 TRBFLX
        SHL(I,L) =  FCC(I,L) * SBAR(I,L)
./pkg/fizhi/fizhi_turb.F 1863 TRBFLX
     1        SHL(I,L) =  SHL(I,L)+RSQ2PI*SVAR(I,L)*EXP(-ARG(I,L))
./pkg/fizhi/fizhi_turb.F 1864 TRBFLX
        BETAT(I,L) = 1. + VIRTCON * SH(I,L) - VRT1CON * SHL(I,L)
./pkg/fizhi/fizhi_turb.F 1866 TRBFLX
     1                ( TH(I,L) + (CLH/plk(I,L)) * SHL(I,L) )
./pkg/fizhi/fizhi_turb.F 1867 TRBFLX
        BETAL(I,L) = ( 1. + VIRTCON*SH(I,L) - TWO*VRT1CON*SHL(I,L) )