Symbol Description Uses
pkht 20



File Line number Procedure Code
./pkg/fizhi/fizhi_driver.F 164 FIZHI_DRIVER
     .   p,pl,ple,dpres,pkht,pkl,t,chemq,chemo3,co2,
./pkg/fizhi/fizhi_driver.F 187 FIZHI_DRIVER
     .   p,pl,ple,dpres,pkht,pkl,t,chemq,chemo3,co2,
./pkg/fizhi/fizhi_driver.F 201 FIZHI_DRIVER
     .  ptop,p,u,v,t,q,ntracer,ptracer,pl,ple,dpres,pkht,pkl,
./pkg/fizhi/fizhi_driver.F 223 FIZHI_DRIVER
      call RAYLEIGH(myid,pl,pkl,pkht,surfz,u,v,t,q,im,jm,lm,
./pkg/fizhi/fizhi_driver.F 244 FIZHI_DRIVER
     .    p,pl,ple,dpres,pkht,pkl,u,v,t,q,bi,bj,ntracer,ptracer,qq,
./pkg/fizhi/fizhi_driver.F 61 FIZHI_DRIVER
      _RL pkht(im,jm,lm+1)
./pkg/fizhi/fizhi_driver.F 7 FIZHI_DRIVER
     . p,u,v,t,q,pl,ple,dpres,pkht,pkl,surfz,fracland,landtype,radswt,
./pkg/fizhi/fizhi_lwrad.F 23 LWRIO
      _RL dpres(im,jm,lm),pkht(im,jm,lm+1),pkz(im,jm,lm)
./pkg/fizhi/fizhi_lwrad.F 8 LWRIO
     .                  pz,plz,plze,dpres,pkht,pkz,tz,qz,oz,
./pkg/fizhi/fizhi_moist.F 24 MOISTIO
      _RL pkht(im,jm,lm+1),pkl(im,jm,lm)
./pkg/fizhi/fizhi_moist.F 268 MOISTIO
        pkegather(indx,lm+1) = pkht(i,j,lm+1)
./pkg/fizhi/fizhi_moist.F 285 MOISTIO
        pkegather(indx,L) = pkht(i,j,L)
./pkg/fizhi/fizhi_moist.F 7 MOISTIO
     .   pz,plz,plze,dpres,pkht,pkl,uz,vz,tz,qz,bi,bj,ntracerin,ptracer,
./pkg/fizhi/fizhi_swrad.F 23 SWRIO
      _RL pkht(im,jm,lm+1),pkz(im,jm,lm)
./pkg/fizhi/fizhi_swrad.F 7 SWRIO
     .        pz,plz,plze,dpres,pkht,pkz,tz,qz,oz,co2,
./pkg/fizhi/fizhi_turb.F 111 TURBIO
      _RL pkht(im*jm,1,nlay+1),pkz(im*jm,1,nlay)
./pkg/fizhi/fizhi_turb.F 1262 TURBIO
      call CTEI ( tz,qz,fcctmp,qliqtmp,plz,pkz,pkht,im*jm,nlay )
./pkg/fizhi/fizhi_turb.F 1329 TURBIO
        tmpdiag(i,1) = tz(i,1,nlay) * pkht(i,1,nlay)
./pkg/fizhi/fizhi_turb.F 500 TURBIO
       call STRIP2TILE(pkht,igrd,pke,nchp,ijall,istrip,nlay+1,nn)
./pkg/fizhi/fizhi_turb.F 7 TURBIO
     2 ,plz,plze,dpres,pkht,pkz,ctmt,xxmt,yymt,zetamt,xlmt,khmt,tke