Symbol Description Uses
hsturb 28



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1419 TRBFLX
     6 hsturb,dhsdqa,dhsdtc,transth,transsh,
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 1485 TRBFLX
      _RL hsturb(irun),dhsdqa(irun),dhsdtc(irun)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 186 TURBIO
      _RL hsturb(istrip),dhsdqa(istrip),dhsdtc(istrip)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2222 TRBFLX
       hsturb(i) = -1.* dths(i)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4548 SEAICE
     .                    hsturb, dhsdtc,
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4555 SEAICE
      _RL eturb(nocean),dedtc(nocean),hsturb(nocean),dhsdtc(nocean)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 4577 SEAICE
        deltg = ( swnet(i)-lwnet(i)-latent*eturb(i)-hsturb(i)+qice(i) )
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 600 TURBIO
       hsturb(i) = 0.
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 647 TURBIO
     6 hsturb,dhsdqa,dhsdtc,transth,transsh,
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 691 TURBIO
       hsturb(i) = hsturb(i) * pke(i,nlay+1)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 788 TURBIO
     I   eturb,  dedqa,  dedtc,  hsturb, dhsdqa, dhsdtc,
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 804 TURBIO
     .              hsturb(nland+1),   dhsdtc(nland+1), 
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 900 TURBIO
      call PSTBMPIT(hsturb,qdiaglsm(1,15),istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 1379 TRBFLX
     6 hsturb,dhsdqa,dhsdtc,transth,transsh,
./pkg/fizhi/fizhi_turb.F 1445 TRBFLX
      _RL hsturb(irun),dhsdqa(irun),dhsdtc(irun)
./pkg/fizhi/fizhi_turb.F 186 TURBIO
      _RL hsturb(istrip),dhsdqa(istrip),dhsdtc(istrip)
./pkg/fizhi/fizhi_turb.F 2182 TRBFLX
       hsturb(i) = -1.* dths(i)
./pkg/fizhi/fizhi_turb.F 4509 SEAICE
     .                    hsturb, dhsdtc,
./pkg/fizhi/fizhi_turb.F 4516 SEAICE
      _RL eturb(nocean),dedtc(nocean),hsturb(nocean),dhsdtc(nocean)
./pkg/fizhi/fizhi_turb.F 4538 SEAICE
        deltg = ( swnet(i)-lwnet(i)-latent*eturb(i)-hsturb(i)+qice(i) )
./pkg/fizhi/fizhi_turb.F 600 TURBIO
       hsturb(i) = 0.
./pkg/fizhi/fizhi_turb.F 623 TURBIO
     6 hsturb,dhsdqa,dhsdtc,transth,transsh,
./pkg/fizhi/fizhi_turb.F 667 TURBIO
       hsturb(i) = hsturb(i) * pke(i,nlay+1)
./pkg/fizhi/fizhi_turb.F 764 TURBIO
     I   eturb,  dedqa,  dedtc,  hsturb, dhsdqa, dhsdtc,
./pkg/fizhi/fizhi_turb.F 780 TURBIO
     .              hsturb(nland+1),   dhsdtc(nland+1), 
./pkg/fizhi/fizhi_turb.F 876 TURBIO
      call PSTBMPIT(hsturb,qdiaglsm(1,15),istrip,nchp,nchptot,1,nn)