Symbol Description Uses
plke 11



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 2585 SRCLOUDS
      subroutine SRCLOUDS (th,q,plk,pl,plke,cloud,cldwat,irun,irise,
./pkg/fizhi/fizhi_moist.F 2618 SRCLOUDS
      _RL plke(irun,irise+1)
./pkg/fizhi/fizhi_moist.F 2668 SRCLOUDS
      call CTEI ( th,q,cloud,cldwat,pl,plk,plke,irun,irise )
./pkg/fizhi/fizhi_moist.F 2673 CTEI
      subroutine CTEI ( th,q,cldfrc,cldwat,pl,plk,plke,im,lm )
./pkg/fizhi/fizhi_moist.F 2676 CTEI
      _RL  th(im,lm),q(im,lm),plke(im,lm+1),cldwat(im,lm)
./pkg/fizhi/fizhi_moist.F 2691 CTEI
      k = 1.0 + cpoel*plke(i,L)*( th(i,L)-th(i,L-1) ) / dq
./pkg/fizhi/fizhi_moist.F 700 MOISTIO
      call SRCLOUDS (saveth,saveq,plk,pl,plke,clsbth,cldlz,istrip,lm,
./pkg/fizhi/fizhi_turb.F 1835 TRBFLX
     1              BB(I,1)*plke(I,2)*DTH(I,1))
./pkg/fizhi/fizhi_turb.F 1844 TRBFLX
     1               BB(I,L)*plke(I,L)*DTH(I,L-1))
./pkg/fizhi/fizhi_turb.F 1849 TRBFLX
     1               BB(I,L)*plke(I,L+1)*DTH(I,L))
./pkg/fizhi/fizhi_turb.F 1868 TRBFLX
     1     * (CLH/plke(I,L+1)) - VRT1CON * TH(I,L)