Symbol Description Uses
lwgclr 13



File Line number Procedure Code
./pkg/fizhi/do_fizhi.F 128 DO_FIZHI
      _RL lwgclr(sNx,sNy,nSx,nSy),st4(sNx,sNy,nSx,nSy)
./pkg/fizhi/do_fizhi.F 158 DO_FIZHI
      COMMON /saver/ st4,dst4,dlwdtg,lwgclr
./pkg/fizhi/do_fizhi.F 260 DO_FIZHI
     & tg0(1,1,bi,bj),radlwg(1,1,bi,bj),lwgclr(1,1,bi,bj),
./pkg/fizhi/do_fizhi.F 313 DO_FIZHI
     &  radswt,radswg,swgclr,osr,osrclr,st4,dst4,tgz,tg0,radlwg,lwgclr,
./pkg/fizhi/fizhi_driver.F 16 FIZHI_DRIVER
     & radswg,swgclr,fdirpar,fdifpar,osr,osrclr,tg0,radlwg,lwgclr,
./pkg/fizhi/fizhi_driver.F 191 FIZHI_DRIVER
     &   lwdt,dlwdtg,lwdtclr,lwgclr,
./pkg/fizhi/fizhi_driver.F 87 FIZHI_DRIVER
      _RL tg0(im,jm),radlwg(im,jm),lwgclr(im,jm),st4(im,jm)
./pkg/fizhi/fizhi_lwrad.F 11 LWRIO
     .                  dtradlw,dlwdtg,dtradlwc,lwgclr,
./pkg/fizhi/fizhi_lwrad.F 29 LWRIO
      _RL dtradlwc(im,jm,lm),lwgclr(im,jm)     
./pkg/fizhi/fizhi_step_diag.F 155 FIZHI_STEP_DIAG
        tmpdiag(i,j) = lwgclr(i,j,bi,bj) +
./pkg/fizhi/fizhi_step_diag.F 26 FIZHI_STEP_DIAG
      _RL lwgclr(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,
./verification/fizhi-gridalt-hs/code/do_fizhi.F 128 DO_FIZHI
      _RL lwgclr(sNx,sNy,nSx,nSy),st4(sNx,sNy,nSx,nSy)