Symbol Description Uses
fdifpar 20



File Line number Procedure Code
./pkg/fizhi/do_fizhi.F 125 DO_FIZHI
      _RL fdirpar(sNx,sNy,nSx,nSy),fdifpar(sNx,sNy,nSx,nSy)
./pkg/fizhi/do_fizhi.F 157 DO_FIZHI
      COMMON /saver/ radswg,swgclr,fdirpar,fdifpar,osr,osrclr,tg0,radlwg
./pkg/fizhi/do_fizhi.F 259 DO_FIZHI
     & fdifpar(1,1,bi,bj),osr(1,1,bi,bj),osrclr(1,1,bi,bj),
./pkg/fizhi/fizhi_driver.F 168 FIZHI_DRIVER
     &   radswg,swgclr,fdifpar,fdirpar,osr,osrclr,
./pkg/fizhi/fizhi_driver.F 16 FIZHI_DRIVER
     & radswg,swgclr,fdirpar,fdifpar,osr,osrclr,tg0,radlwg,lwgclr,
./pkg/fizhi/fizhi_driver.F 211 FIZHI_DRIVER
     &  fdifpar,fdirpar,rainlsp,raincon,snowfall,tg0,
./pkg/fizhi/fizhi_driver.F 86 FIZHI_DRIVER
      _RL fdirpar(im,jm),fdifpar(im,jm),osr(im,jm),osrclr(im,jm)
./pkg/fizhi/fizhi_swrad.F 10 SWRIO
     .        fdifpar,fdirpar,osr,osrclr,
./pkg/fizhi/fizhi_swrad.F 1571 SOLUV
     * ,fdirpar,fdifpar,fdiruv,fdifuv)
./pkg/fizhi/fizhi_swrad.F 1664 SOLUV
      _RL  fdirpar(m,ndim),fdifpar(m,ndim)
./pkg/fizhi/fizhi_swrad.F 1929 SOLUV
           fdifpar(i,j)=fsdif(i,j)*hk(ib)
./pkg/fizhi/fizhi_swrad.F 29 SWRIO
      _RL radswg(im,jm),swgclr(im,jm),fdifpar(im,jm),fdirpar(im,jm)
./pkg/fizhi/fizhi_swrad.F 489 SWRIO
      call PASTE ( difpar,fdifpar,istrip,im*jm,1,nn )
./pkg/fizhi/fizhi_swrad.F 668 SORAD
     *                 flx,flc,fdirir,fdifir,fdirpar,fdifpar,
./pkg/fizhi/fizhi_swrad.F 782 SORAD
      _RL  fdirpar(m,ndim),fdifpar(m,ndim)
./pkg/fizhi/fizhi_swrad.F 866 SORAD
     *     ,fdirpar,fdifpar,fdiruv,fdifuv)
./pkg/fizhi/fizhi_turb.F 138 TURBIO
      _RL fdifpar(im*jm,1),fdirpar(im*jm,1)
./pkg/fizhi/fizhi_turb.F 338 TURBIO
       tmpdiag(i,1) = fdifpar(i,1) * radswt(i,1)
./pkg/fizhi/fizhi_turb.F 34 TURBIO
     9 ,fdifpar,fdirpar,rainlsp,rainconv,snowfall,tempref
./verification/fizhi-gridalt-hs/code/do_fizhi.F 125 DO_FIZHI
      _RL fdirpar(sNx,sNy,nSx,nSy),fdifpar(sNx,sNy,nSx,nSy)