Symbol Description Uses
dst4 26



File Line number Procedure Code
./pkg/fizhi/do_fizhi.F 128 DO_FIZHI
      _RL dst4(sNx,sNy,Nsx,Nsy),dlwdtg(sNx,sNy,Nrphys,Nsx,Nsy)
./pkg/fizhi/do_fizhi.F 157 DO_FIZHI
      common /saver/ st4,dst4,dlwdtg
./pkg/fizhi/do_fizhi.F 259 DO_FIZHI
     . st4(1,1,bi,bj),dst4(1,1,bi,bj),dlwdtg(1,1,1,bi,bj),
./pkg/fizhi/do_fizhi.F 311 DO_FIZHI
     .  radswt,radswg,swgclr,osr,osrclr,st4,dst4,tgz,tg0,radlwg,lwgclr,
./pkg/fizhi/fizhi_driver.F 17 FIZHI_DRIVER
     . st4,dst4,dlwdtg,rainlsp,raincon,snowfall,iras,nlwcld,
./pkg/fizhi/fizhi_driver.F 188 FIZHI_DRIVER
     .   cfc11,cfc12,cfc22,methane,n2o,emiss,tgz,radlwg,st4,dst4,
./pkg/fizhi/fizhi_driver.F 207 FIZHI_DRIVER
     .  turbu,turbv,turbt,turbq,radlwg,st4,dst4,radswg,radswt,
./pkg/fizhi/fizhi_driver.F 86 FIZHI_DRIVER
      _RL dst4(im,jm)
./pkg/fizhi/fizhi_lwrad.F 10 LWRIO
     .                  tgz,radlwg,st4,dst4,
./pkg/fizhi/fizhi_lwrad.F 249 LWRIO
       CALL PASTE ( dsgmt4,dst4,ISTRIP,im*jm,1,NN )
./pkg/fizhi/fizhi_lwrad.F 27 LWRIO
      _RL tgz(im,jm),radlwg(im,jm),st4(im,jm),dst4(im,jm)     
./pkg/fizhi/fizhi_step_diag.F 135 FIZHI_STEP_DIAG
     .                 + dst4(i,j,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj))
./pkg/fizhi/fizhi_step_diag.F 147 FIZHI_STEP_DIAG
     .                  dst4(i,j,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj))
./pkg/fizhi/fizhi_step_diag.F 159 FIZHI_STEP_DIAG
     .                  dst4(i,j,bi,bj)*(tgz(i,j,bi,bj)-tg0(i,j,bi,bj))
./pkg/fizhi/fizhi_step_diag.F 24 FIZHI_STEP_DIAG
      _RL dst4(im2,jm2,Nbi,Nbj),tgz(im2,jm2,Nbi,Nbj)
./pkg/fizhi/fizhi_step_diag.F 6 FIZHI_STEP_DIAG
     .  radswt,radswg,swgclr,osr,osrclr,st4,dst4,tgz,tg0,radlwg,lwgclr,
./pkg/fizhi/fizhi_turb.F 12 TURBIO
     8 ,duturb, dvturb, dtturb,dqturb,radlwg,st4,dst4,radswg,radswt
./pkg/fizhi/fizhi_turb.F 134 TURBIO
      _RL st4(im*jm,1),dst4(im*jm,1)
./pkg/fizhi/fizhi_turb.F 380 TURBIO
       tmpdiag(i,1) = st4(i,1) + dst4(i,1)*(tgz(i,1)-tempref(i,1))
./pkg/fizhi/fizhi_turb.F 381 TURBIO
     1                         - dst4(i,1)* tgz(i,1)
./pkg/fizhi/fizhi_turb.F 385 TURBIO
       tmpdiag(i,1) = dst4(i,1)
./pkg/fizhi/fizhi_turb.F 401 TURBIO
       tmpdiag(i,1) = radlwg(i,1) + dst4(i,1)*(tgz(i,1)-tempref(i,1))
./pkg/fizhi/fizhi_turb.F 5091 SEAICE
     .                     swnet,  lwnet, dst4,
./pkg/fizhi/fizhi_turb.F 5097 SEAICE
      _RL swnet(nocean),lwnet(nocean),  dst4(nocean)
./pkg/fizhi/fizhi_turb.F 5119 SEAICE
     .          / ( codt+dst4(i)+latent*dedtc(i)+dhsdtc(i)-dqice(i) )
./verification/fizhi-gridalt-hs/code/do_fizhi.F 128 DO_FIZHI
      _RL dst4(sNx,sNy,Nsx,Nsy),dlwdtg(sNx,sNy,Nrphys,Nsx,Nsy)