Symbol Description Uses
swdt 14



File Line number Procedure Code
./pkg/fizhi/do_fizhi.F 113 DO_FIZHI
      _RL swdt(sNx,sNy,Nrphys,nSx,nSy)
./pkg/fizhi/do_fizhi.F 155 DO_FIZHI
      COMMON /saver/ lwdt,lwdtclr,swdt,swdtclr,turbu,turbv,turbt,turbq
./pkg/fizhi/do_fizhi.F 254 DO_FIZHI
     & lwdt(1,1,1,bi,bj),lwdtclr(1,1,1,bi,bj),swdt(1,1,1,bi,bj),
./pkg/fizhi/do_fizhi.F 305 DO_FIZHI
     &   swdt(i,j,L,bi,bj)*radswt(i,j,bi,bj) )*p0kappa ) / p(i,j,bi,bj)
./pkg/fizhi/do_fizhi.F 315 DO_FIZHI
     &  lwdt,swdt,lwdtclr,swdtclr,dlwdtg,
./pkg/fizhi/fizhi_driver.F 14 FIZHI_DRIVER
     & lwdt,lwdtclr,swdt,swdtclr,turbu,turbv,turbt,turbq,
./pkg/fizhi/fizhi_driver.F 167 FIZHI_DRIVER
     &   albvisdr,albvisdf,albnirdr,albnirdf,swdt,swdtclr,
./pkg/fizhi/fizhi_driver.F 76 FIZHI_DRIVER
      _RL swdt(im,jm,lm),swdtclr(im,jm,lm)
./pkg/fizhi/fizhi_step_diag.F 196 FIZHI_STEP_DIAG
     &      swdt(i,j,L,bi,bj)*radswt(i,j,bi,bj) )
./pkg/fizhi/fizhi_step_diag.F 250 FIZHI_STEP_DIAG
     &  + swdt(i,j,l,bi,bj)*radswt(i,j,bi,bj)*
./pkg/fizhi/fizhi_step_diag.F 36 FIZHI_STEP_DIAG
      _RL swdt(im2,jm2,Nrphys,Nbi,Nbj)
./pkg/fizhi/fizhi_step_diag.F 414 FIZHI_STEP_DIAG
     &             swdt(i,j,L,bi,bj)*pk(i,j,l,bi,bj)*dp(i,j,L,bi,bj)
./pkg/fizhi/fizhi_step_diag.F 8 FIZHI_STEP_DIAG
     &  lwdt,swdt,lwdtclr,swdtclr,dlwdtg,
./verification/fizhi-gridalt-hs/code/do_fizhi.F 113 DO_FIZHI
      _RL swdt(sNx,sNy,Nrphys,nSx,nSy)