Symbol Description Uses
nchpland 53



File Line number Procedure Code
./pkg/fizhi/do_fizhi.F 243 DO_FIZHI
     & chlon(1,bi,bj),igrd(1,bi,bj),nchptot(bi,bj),nchpland(bi,bj),
./pkg/fizhi/do_fizhi.F 37 DO_FIZHI
      INTEGER nchptot(nSxIn,nSyIn),nchpland(nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 6 DO_FIZHI
     & turbStart, nchp,nchptot,nchpland,
./pkg/fizhi/fizhi_driver.F 208 FIZHI_DRIVER
     &  nchp,nchptot,nchpland,chfr,chlat,chlon,igrd,ityp,
./pkg/fizhi/fizhi_driver.F 54 FIZHI_DRIVER
      INTEGER nchp,igrd(nchp),nchptot,nchpland,ityp(nchp)
./pkg/fizhi/fizhi_driver.F 9 FIZHI_DRIVER
     & nchp,chlat,chlon,igrd,nchptot,nchpland,chfr,ityp,
./pkg/fizhi/fizhi_earth_coms.h 16 NO PROCEDURE
     .   tgz, landtype, nchptot, nchpland, ityp
./pkg/fizhi/fizhi_earth_coms.h 27 NO PROCEDURE
      integer nchptot(Nsx,Nsy),nchpland(Nsx,Nsy)
./pkg/fizhi/fizhi_init_fixed.F 105 FIZHI_INIT_FIXED
     &         nSx*nPx,nSy*nPy,maxtyp,nchp,nchptot,nchpland,lons,lats,
./pkg/fizhi/fizhi_init_veg.F 164 FIZHI_INIT_VEG
         nchpland(bi,bj) = 0
./pkg/fizhi/fizhi_init_veg.F 170 FIZHI_INIT_VEG
               nchpland(bi,bj)  = nchpland(bi,bj) + 1
./pkg/fizhi/fizhi_init_veg.F 171 FIZHI_INIT_VEG
               igrd (nchpland(bi,bj),bi,bj) = i + (j-1)*im
./pkg/fizhi/fizhi_init_veg.F 172 FIZHI_INIT_VEG
               ityp (nchpland(bi,bj),bi,bj) = surftype(i,j,k,bi,bj)
./pkg/fizhi/fizhi_init_veg.F 173 FIZHI_INIT_VEG
               chfr (nchpland(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj)
./pkg/fizhi/fizhi_init_veg.F 174 FIZHI_INIT_VEG
               chlon(nchpland(bi,bj),bi,bj) = lons(i,j,bi,bj)
./pkg/fizhi/fizhi_init_veg.F 175 FIZHI_INIT_VEG
               chlt (nchpland(bi,bj),bi,bj) = lats(i,j,bi,bj)
./pkg/fizhi/fizhi_init_veg.F 182 FIZHI_INIT_VEG
         nchptot(bi,bj) = nchpland(bi,bj)
./pkg/fizhi/fizhi_init_veg.F 200 FIZHI_INIT_VEG
     &    ', bj=', bj, ', # of Land Tiles=', nchpland(bi,bj),
./pkg/fizhi/fizhi_init_veg.F 58 FIZHI_INIT_VEG
      INTEGER nchptot(nSx,nSy), nchpland(nSx,nSy)
./pkg/fizhi/fizhi_init_veg.F 7 FIZHI_INIT_VEG
     & maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac,
./pkg/fizhi/fizhi_wrapper.F 264 FIZHI_WRAPPER
     &  turbStart(bi,bj), nchp,nchptot,nchpland,
./pkg/fizhi/update_earth_exports.F 100 UPDATE_EARTH_EXPORTS
       call GETLGR (sec,month,day,chlt,ityp,nchpland(bi,bj),
./pkg/fizhi/update_earth_exports.F 115 UPDATE_EARTH_EXPORTS
     &    nchptot(bi,bj),nchpland(bi,bj),nSx,nSy,bi,bj,igrd,ityp,
./pkg/fizhi/update_earth_exports.F 821 GETALB
     &        nchp,nchptot,nchpland,nSx,nSy,bi,bj,igrd,ityp,chfr,chlt,
./pkg/fizhi/update_earth_exports.F 862 GETALB
      INTEGER sec,month,day,im,jm,nchp,nchptot,nchpland,nSx,nSy,bi,bj
./pkg/fizhi/update_earth_exports.F 899 GETALB
      call GRD2MSC(cosz,im,jm,igrd(1,bi,bj),zenith,nchp,nchpland)
./pkg/fizhi/update_earth_exports.F 904 GETALB
     &  agrn(1,bi,bj),zenith,snodep(1,bi,bj),ityp(1,bi,bj),nchpland)
./pkg/fizhi/update_earth_exports.F 913 GETALB
      call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),avisdr,nchp,nchpland,
./pkg/fizhi/update_earth_exports.F 926 GETALB
      call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),avisdf,nchp,nchpland,
./pkg/fizhi/update_earth_exports.F 938 GETALB
      call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),anirdr,nchp,nchpland,
./pkg/fizhi/update_earth_exports.F 950 GETALB
      call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),anirdf,nchp,nchpland,
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F 84 FIZHI_INIT_FIXED
     &         nSx*nPx,nSy*nPy,maxtyp,nchp,nchptot,nchpland,lons,lats,
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F 115 FIZHI_INIT_VEG
         nchpland(bi,bj) = 0
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F 118 FIZHI_INIT_VEG
         nchptot(bi,bj) = nchpland(bi,bj)
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F 136 FIZHI_INIT_VEG
     &    ', bj=', bj, ', # of Land Tiles=', nchpland(bi,bj),
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F 58 FIZHI_INIT_VEG
      INTEGER nchptot(nSx,nSy), nchpland(nSx,nSy)
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F 7 FIZHI_INIT_VEG
     & maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac,
./verification/fizhi-gridalt-hs/code/do_fizhi.F 37 DO_FIZHI
      INTEGER nchptot(nSxin,nSyin),nchpland(nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 6 DO_FIZHI
     & turbStart, nchp,nchptot,nchpland,
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F 84 FIZHI_INIT_FIXED
     &         nSx*nPx,nSy*nPy,maxtyp,nchp,nchptot,nchpland,lons,lats,
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 128 FIZHI_INIT_VEG
         nchpland(bi,bj) = 0
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 134 FIZHI_INIT_VEG
               nchpland(bi,bj)  = nchpland(bi,bj) + 1
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 135 FIZHI_INIT_VEG
               igrd (nchpland(bi,bj),bi,bj) = i + (j-1)*im
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 136 FIZHI_INIT_VEG
               ityp (nchpland(bi,bj),bi,bj) = surftype(i,j,k,bi,bj)
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 137 FIZHI_INIT_VEG
               chfr (nchpland(bi,bj),bi,bj) = tilefrac(i,j,k,bi,bj)
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 138 FIZHI_INIT_VEG
               chlon(nchpland(bi,bj),bi,bj) = lons(i,j,bi,bj)
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 139 FIZHI_INIT_VEG
               chlt (nchpland(bi,bj),bi,bj) = lats(i,j,bi,bj)
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 146 FIZHI_INIT_VEG
         nchptot(bi,bj) = nchpland(bi,bj)
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 164 FIZHI_INIT_VEG
     &    ', bj=', bj, ', # of Land Tiles=', nchpland(bi,bj),
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 58 FIZHI_INIT_VEG
      INTEGER nchptot(nSx,nSy), nchpland(nSx,nSy)
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 7 FIZHI_INIT_VEG
     & maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac,