Symbol Description Uses
nchp 491



File Line number Procedure Code
./pkg/fizhi/do_fizhi.F 242 DO_FIZHI
     & phis_var(1,1,bi,bj),tgz(1,1,bi,bj),sea_ice,nchp,chlat(1,bi,bj),
./pkg/fizhi/do_fizhi.F 35 DO_FIZHI
      INTEGER Nrphin,nSxIn,nSyIn,bi,bj,nchp
./pkg/fizhi/do_fizhi.F 46 DO_FIZHI
      _RL ctmt(nchp,nSxIn,nSyIn),xxmt(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 47 DO_FIZHI
      _RL yymt(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 48 DO_FIZHI
      _RL zetamt(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 49 DO_FIZHI
      _RL xlmt(nchp,Nrphin,nSxIn,nSyIn),khmt(nchp,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 50 DO_FIZHI
      _RL tke(nchp,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 59 DO_FIZHI
      _RL chfr(nchp,nSxIn,nSyIn),alai(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 60 DO_FIZHI
      _RL agrn(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 61 DO_FIZHI
      INTEGER ityp(nchp,nSxIn,nSyIn),igrd(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 62 DO_FIZHI
      _RL chlat(nchp,nSxIn,nSyIn),chlon(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 63 DO_FIZHI
      _RL tcanopy(nchp,nSxIn,nSyIn),tdeep(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 64 DO_FIZHI
      _RL ecanopy(nchp,nSxIn,nSyIn),swetshal(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 65 DO_FIZHI
      _RL swetroot(nchp,nSxIn,nSyIn),swetdeep(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 66 DO_FIZHI
      _RL snodep(nchp,nSxIn,nSyIn),capac(nchp,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 6 DO_FIZHI
     & turbStart, nchp,nchptot,nchpland,
./pkg/fizhi/fizhi_coms.h 16 NO PROCEDURE
      _RL ctmt(nchp,nSx,nSy), xxmt(nchp,nSx,nSy), yymt(nchp,nSx,nSy)
./pkg/fizhi/fizhi_coms.h 17 NO PROCEDURE
      _RL zetamt(nchp,nSx,nSy)
./pkg/fizhi/fizhi_coms.h 18 NO PROCEDURE
      _RL xlmt(nchp,Nrphys,nSx,nSy), khmt(nchp,Nrphys,nSx,nSy)
./pkg/fizhi/fizhi_coms.h 19 NO PROCEDURE
      _RL tke(nchp,Nrphys,nSx,nSy)
./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 69 FIZHI_DRIVER
      _RL chlat(nchp),chlon(nchp),chfr(nchp)
./pkg/fizhi/fizhi_driver.F 70 FIZHI_DRIVER
      _RL tcanopy(nchp),tdeep(nchp),ecanopy(nchp),swetshal(nchp)
./pkg/fizhi/fizhi_driver.F 71 FIZHI_DRIVER
      _RL swetroot(nchp),swetdeep(nchp),capac(nchp),snodep(nchp)
./pkg/fizhi/fizhi_driver.F 72 FIZHI_DRIVER
      _RL ctmt(nchp),xxmt(nchp),yymt(nchp),zetamt(nchp)
./pkg/fizhi/fizhi_driver.F 73 FIZHI_DRIVER
      _RL xlmt(nchp,lm),khmt(nchp,lm),tke(nchp,lm)
./pkg/fizhi/fizhi_driver.F 84 FIZHI_DRIVER
      _RL alai(nchp),agrn(nchp)
./pkg/fizhi/fizhi_driver.F 9 FIZHI_DRIVER
     & nchp,chlat,chlon,igrd,nchptot,nchpland,chfr,ityp,
./pkg/fizhi/fizhi_earth_coms.h 17 NO PROCEDURE
      _RL chfr(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_earth_coms.h 18 NO PROCEDURE
      _RL alai(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_earth_coms.h 19 NO PROCEDURE
      _RL agrn(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_earth_coms.h 28 NO PROCEDURE
      integer ityp(nchp,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_vars.F 228 FIZHI_INIT_VARS
         do i = 1,nchp
./pkg/fizhi/fizhi_init_vars.F 235 FIZHI_INIT_VARS
         do i = 1,nchp
./pkg/fizhi/fizhi_init_veg.F 159 FIZHI_INIT_VEG
         do i=1,nchp
./pkg/fizhi/fizhi_init_veg.F 57 FIZHI_INIT_VEG
      INTEGER myThid,im,jm,maxtyp,nchp,nSx,nSy,Nxg,Nyg
./pkg/fizhi/fizhi_init_veg.F 60 FIZHI_INIT_VEG
      INTEGER igrd(nchp,nSx,nSy),ityp(nchp,nSx,nSy)
./pkg/fizhi/fizhi_init_veg.F 63 FIZHI_INIT_VEG
      _RL chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy),chlon(nchp,nSx,nSy)
./pkg/fizhi/fizhi_init_veg.F 7 FIZHI_INIT_VEG
     & maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac,
./pkg/fizhi/fizhi_init_vegsurftiles.F 103 FIZHI_INIT_VEGSURFTILES
     .                 temptile,nchp,nchptot(bi,bj))
./pkg/fizhi/fizhi_init_vegsurftiles.F 104 FIZHI_INIT_VEGSURFTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_init_vegsurftiles.F 116 FIZHI_INIT_VEGSURFTILES
     .                    temptile,nchp,nchptot(bi,bj))
./pkg/fizhi/fizhi_init_vegsurftiles.F 117 FIZHI_INIT_VEGSURFTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_init_vegsurftiles.F 129 FIZHI_INIT_VEGSURFTILES
     .                    temptile,nchp,nchptot(bi,bj))
./pkg/fizhi/fizhi_init_vegsurftiles.F 130 FIZHI_INIT_VEGSURFTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_init_vegsurftiles.F 142 FIZHI_INIT_VEGSURFTILES
     .                    temptile,nchp,nchptot(bi,bj))
./pkg/fizhi/fizhi_init_vegsurftiles.F 143 FIZHI_INIT_VEGSURFTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_init_vegsurftiles.F 155 FIZHI_INIT_VEGSURFTILES
     .                    temptile,nchp,nchptot(bi,bj))
./pkg/fizhi/fizhi_init_vegsurftiles.F 156 FIZHI_INIT_VEGSURFTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_init_vegsurftiles.F 168 FIZHI_INIT_VEGSURFTILES
     .                    temptile,nchp,nchptot(bi,bj))
./pkg/fizhi/fizhi_init_vegsurftiles.F 169 FIZHI_INIT_VEGSURFTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_init_vegsurftiles.F 181 FIZHI_INIT_VEGSURFTILES
     .                    temptile,nchp,nchptot(bi,bj))
./pkg/fizhi/fizhi_init_vegsurftiles.F 182 FIZHI_INIT_VEGSURFTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_init_vegsurftiles.F 194 FIZHI_INIT_VEGSURFTILES
     .                    temptile,nchp,nchptot(bi,bj))
./pkg/fizhi/fizhi_init_vegsurftiles.F 195 FIZHI_INIT_VEGSURFTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_init_vegsurftiles.F 51 FIZHI_INIT_VEGSURFTILES
      _RL temptile(nchp)
./pkg/fizhi/fizhi_land_SIZE.h 6 NO PROCEDURE
      integer nchp, maxtyp
./pkg/fizhi/fizhi_land_SIZE.h 8 NO PROCEDURE
      parameter (nchp = sNx*sNy*maxtyp)
./pkg/fizhi/fizhi_land_coms.h 10 NO PROCEDURE
      _RL ecanopy(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 11 NO PROCEDURE
      _RL swetshal(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 12 NO PROCEDURE
      _RL swetroot(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 13 NO PROCEDURE
      _RL swetdeep(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 14 NO PROCEDURE
      _RL snodep(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 15 NO PROCEDURE
      _RL capac(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 20 NO PROCEDURE
      _RL chlt(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 21 NO PROCEDURE
      _RL chlon(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 22 NO PROCEDURE
      integer igrd(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 8 NO PROCEDURE
      _RL tcanopy(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_land_coms.h 9 NO PROCEDURE
      _RL tdeep(nchp,Nsx,Nsy)
./pkg/fizhi/fizhi_mnc_init.F 243 FIZHI_MNC_INIT
      dim(1)      = nchp
./pkg/fizhi/fizhi_mnc_init.F 245 FIZHI_MNC_INIT
      ie(1)       = nchp
./pkg/fizhi/fizhi_mnc_init.F 268 FIZHI_MNC_INIT
      dim(1)      = nchp
./pkg/fizhi/fizhi_mnc_init.F 270 FIZHI_MNC_INIT
      ie(1)       = nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 109 FIZHI_WRITE_VEGTILES
      length_of_rec=MDS_RECLEN( fileprec, nchp, mythid )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 130 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 134 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 138 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 142 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 146 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 150 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 154 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 158 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 164 FIZHI_WRITE_VEGTILES
        do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 168 FIZHI_WRITE_VEGTILES
        call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 175 FIZHI_WRITE_VEGTILES
        do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 179 FIZHI_WRITE_VEGTILES
        call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 186 FIZHI_WRITE_VEGTILES
        do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 190 FIZHI_WRITE_VEGTILES
        call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 197 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 201 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 206 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 210 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 215 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 219 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 224 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 228 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 233 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 237 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 242 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 246 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 251 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 255 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 260 FIZHI_WRITE_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 264 FIZHI_WRITE_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 324 FIZHI_READ_VEGTILES
      Real*8 r8seg(nchp)
./pkg/fizhi/fizhi_readwrite_vegtiles.F 364 FIZHI_READ_VEGTILES
      length_of_rec=MDS_RECLEN( fileprec, nchp, mythid )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 389 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 391 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 397 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 399 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 405 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 407 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 413 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 415 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 424 FIZHI_READ_VEGTILES
        call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 426 FIZHI_READ_VEGTILES
        do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 435 FIZHI_READ_VEGTILES
        call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 437 FIZHI_READ_VEGTILES
        do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 446 FIZHI_READ_VEGTILES
        call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 448 FIZHI_READ_VEGTILES
        do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 457 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 459 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 466 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 468 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 475 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 477 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 484 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 486 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 493 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 495 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 502 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 504 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 511 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 513 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 520 FIZHI_READ_VEGTILES
       call MDS_BYTESWAPR8( nchp, r8seg )
./pkg/fizhi/fizhi_readwrite_vegtiles.F 522 FIZHI_READ_VEGTILES
       do n = 1,nchp
./pkg/fizhi/fizhi_readwrite_vegtiles.F 52 FIZHI_WRITE_VEGTILES
      Real*8 r8seg(nchp)
./pkg/fizhi/fizhi_turb.F 1000 TURBIO
      call DIAG_VEGTILE_FILL (stuflux(1,nlay),igrd,chfrstr,istrip,nchp,
./pkg/fizhi/fizhi_turb.F 1004 TURBIO
      call DIAG_VEGTILE_FILL (stvflux(1,nlay),igrd,chfrstr,istrip,nchp,
./pkg/fizhi/fizhi_turb.F 1008 TURBIO
      call DIAG_VEGTILE_FILL (sustar,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1012 TURBIO
      call DIAG_VEGTILE_FILL (sz0,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1016 TURBIO
      call DIAG_VEGTILE_FILL (frqtrb,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1020 TURBIO
      call DIAG_VEGTILE_FILL (pbldpth,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1024 TURBIO
      call DIAG_VEGTILE_FILL (stu2m,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1028 TURBIO
      call DIAG_VEGTILE_FILL (stv2m,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1032 TURBIO
      call DIAG_VEGTILE_FILL (stt2m,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1043 TURBIO
      call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1047 TURBIO
      call DIAG_VEGTILE_FILL (stu10m,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1051 TURBIO
      call DIAG_VEGTILE_FILL (stv10m,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1055 TURBIO
      call DIAG_VEGTILE_FILL (stt10m,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1066 TURBIO
      call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1075 TURBIO
      call DIAG_VEGTILE_FILL (td,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1079 TURBIO
      call DIAG_VEGTILE_FILL (qa,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1083 TURBIO
      call DIAG_VEGTILE_FILL (swet1,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1087 TURBIO
      call DIAG_VEGTILE_FILL (swet2,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1091 TURBIO
      call DIAG_VEGTILE_FILL (swet3,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1095 TURBIO
      call DIAG_VEGTILE_FILL (capacity,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1099 TURBIO
      call DIAG_VEGTILE_FILL (snowdepth,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 1149 TURBIO
      call MSC2GRD(igrd,chfr,dumsc(1,L),nchp,nchptot,fracland,
./pkg/fizhi/fizhi_turb.F 1151 TURBIO
      call MSC2GRD(igrd,chfr,dvmsc(1,L),nchp,nchptot,fracland,
./pkg/fizhi/fizhi_turb.F 1153 TURBIO
      call MSC2GRD(igrd,chfr,dtmsc(1,L),nchp,nchptot,fracland,
./pkg/fizhi/fizhi_turb.F 1156 TURBIO
      call MSC2GRD(igrd,chfr,dqmsc(1,L,nt),nchp,nchptot,fracland,
./pkg/fizhi/fizhi_turb.F 1159 TURBIO
      call MSC2GRD(igrd,chfr,  tke(1,L),nchp,nchptot,fracland,
./pkg/fizhi/fizhi_turb.F 1162 TURBIO
      call MSC2GRD(igrd,chfr, fccmsc(1,L),nchp,nchptot,fracland,
./pkg/fizhi/fizhi_turb.F 1164 TURBIO
      call MSC2GRD(igrd,chfr,qliqmsc(1,L),nchp,nchptot,fracland,
./pkg/fizhi/fizhi_turb.F 117 TURBIO
      integer nchp,nchptot,nchplnd
./pkg/fizhi/fizhi_turb.F 1192 TURBIO
      call MSC2GRD(igrd,chfr,tground ,nchp,nchptot,fracland,tgz ,im,jm)
./pkg/fizhi/fizhi_turb.F 124 TURBIO
      _RL ctmt(nchp),xxmt(nchp),yymt(nchp),zetamt(nchp)
./pkg/fizhi/fizhi_turb.F 125 TURBIO
      _RL xlmt(nchp,nlay),khmt(nchp,nlay),tke(nchp,nlay)
./pkg/fizhi/fizhi_turb.F 128 TURBIO
      _RL tcanopy(nchp),tdeep(nchp),ecanopy(nchp),swetshal(nchp)
./pkg/fizhi/fizhi_turb.F 129 TURBIO
      _RL swetroot(nchp),swetdeep(nchp),snodep(nchp),capac(nchp)
./pkg/fizhi/fizhi_turb.F 130 TURBIO
      _RL chfr(nchp),chlt(nchp),chlon(nchp)
./pkg/fizhi/fizhi_turb.F 131 TURBIO
      integer igrd(nchp),ityp(nchp)
./pkg/fizhi/fizhi_turb.F 132 TURBIO
      _RL alai(nchp),agrn(nchp),thkz(im*jm,1)
./pkg/fizhi/fizhi_turb.F 168 TURBIO
      _RL alwcoeff(nchp),blwcoeff(nchp)
./pkg/fizhi/fizhi_turb.F 169 TURBIO
      _RL netsw(nchp)
./pkg/fizhi/fizhi_turb.F 170 TURBIO
      _RL cnvprec(nchp),lsprec(nchp)
./pkg/fizhi/fizhi_turb.F 171 TURBIO
      _RL snowprec(nchp)
./pkg/fizhi/fizhi_turb.F 172 TURBIO
      _RL pardiff(nchp),pardirct(nchp)
./pkg/fizhi/fizhi_turb.F 173 TURBIO
      _RL pmsc(nchp)
./pkg/fizhi/fizhi_turb.F 174 TURBIO
      _RL netlw(nchp)
./pkg/fizhi/fizhi_turb.F 175 TURBIO
      _RL sqscat(nchp), rsoil1(nchp)
./pkg/fizhi/fizhi_turb.F 176 TURBIO
      _RL rsoil2(nchp)
./pkg/fizhi/fizhi_turb.F 177 TURBIO
      _RL rdc(nchp),u2fac(nchp)
./pkg/fizhi/fizhi_turb.F 178 TURBIO
      _RL z2ch(nchp)
./pkg/fizhi/fizhi_turb.F 179 TURBIO
      _RL zoch(nchp),cdrc(nchp)
./pkg/fizhi/fizhi_turb.F 180 TURBIO
      _RL cdsc(nchp)
./pkg/fizhi/fizhi_turb.F 181 TURBIO
      _RL dqsdt(nchp)
./pkg/fizhi/fizhi_turb.F 182 TURBIO
      _RL tground(nchp),qground(nchp)
./pkg/fizhi/fizhi_turb.F 183 TURBIO
      _RL utility(nchp)
./pkg/fizhi/fizhi_turb.F 184 TURBIO
      _RL    qice(nchp)
./pkg/fizhi/fizhi_turb.F 185 TURBIO
      _RL   dqice(nchp)
./pkg/fizhi/fizhi_turb.F 187 TURBIO
      _RL dumsc(nchp,nlay),dvmsc(nchp,nlay)
./pkg/fizhi/fizhi_turb.F 188 TURBIO
      _RL dtmsc(nchp,nlay),dqmsc(nchp,nlay,ntracers)
./pkg/fizhi/fizhi_turb.F 190 TURBIO
      _RL shg(nchp),z0(nchp),icethk(nchp)
./pkg/fizhi/fizhi_turb.F 191 TURBIO
      integer water(nchp)
./pkg/fizhi/fizhi_turb.F 244 TURBIO
      _RL qliqmsc(nchp,nlay),fccmsc(nchp,nlay)
./pkg/fizhi/fizhi_turb.F 31 TURBIO
     5 ,nchp,nchptot,nchplnd,chfr,chlt,chlon,igrd,ityp,alai,agrn,thkz
./pkg/fizhi/fizhi_turb.F 325 TURBIO
      call GRD2MSC(pz(1,1),im,jm,igrd,pmsc,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 327 TURBIO
      call GRD2MSC(tgz,im,jm,igrd,tground,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 332 TURBIO
      call GRD2MSC(tmpdiag,im,jm,igrd,alwcoeff,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 336 TURBIO
      call GRD2MSC(tmpdiag,im,jm,igrd,blwcoeff,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 340 TURBIO
      call GRD2MSC(tmpdiag,im,jm,igrd,pardiff,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 344 TURBIO
      call GRD2MSC(tmpdiag,im,jm,igrd,pardirct,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 348 TURBIO
      call GRD2MSC(tmpdiag,im,jm,igrd,netsw,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 352 TURBIO
      call GRD2MSC(tmpdiag,im,jm,igrd,netlw,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 353 TURBIO
      call GRD2MSC(thkz,im,jm,igrd,icethk,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 354 TURBIO
      call GRD2MSC(rainlsp,im,jm,igrd,lsprec,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 355 TURBIO
      call GRD2MSC(rainconv,im,jm,igrd,cnvprec,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 356 TURBIO
      call GRD2MSC(snowfall,im,jm,igrd,snowprec,nchp,nchptot)
./pkg/fizhi/fizhi_turb.F 360 TURBIO
      call CHPPRM(nymd,nhms,nchp,nchplnd,chlt,ityp,alai,
./pkg/fizhi/fizhi_turb.F 431 TURBIO
       call MSC2GRD (igrd,chfr,qice,nchp,nchptot,fracland,tmpdiag,im,jm)
./pkg/fizhi/fizhi_turb.F 441 TURBIO
       call STRIP2TILE(uz,igrd,u,nchp,ijall,istrip,nlay,nn)
./pkg/fizhi/fizhi_turb.F 442 TURBIO
       call STRIP2TILE(vz,igrd,v,nchp,ijall,istrip,nlay,nn)
./pkg/fizhi/fizhi_turb.F 443 TURBIO
       call STRIP2TILE(tz,igrd,th,nchp,ijall,istrip,nlay,nn)
./pkg/fizhi/fizhi_turb.F 444 TURBIO
       call STRIP2TILE(qz(1,1,1,1),igrd,sh,nchp,ijall,istrip,nlay,nn)
./pkg/fizhi/fizhi_turb.F 445 TURBIO
       call STRIP2TILE(dpres,igrd,dpstr,nchp,ijall,istrip,nlay,nn)
./pkg/fizhi/fizhi_turb.F 446 TURBIO
       call STRIP2TILE(plz,igrd,p,nchp,ijall,istrip,nlay,nn)
./pkg/fizhi/fizhi_turb.F 447 TURBIO
       call STRIP2TILE(plze,igrd,pe,nchp,ijall,istrip,nlay+1,nn)
./pkg/fizhi/fizhi_turb.F 448 TURBIO
       call STRIP2TILE(pkz,igrd,pk,nchp,ijall,istrip,nlay,nn)
./pkg/fizhi/fizhi_turb.F 449 TURBIO
       call STRIP2TILE(pkht,igrd,pke,nchp,ijall,istrip,nlay+1,nn)
./pkg/fizhi/fizhi_turb.F 455 TURBIO
       call STRIPIT  (z0,stz0,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 456 TURBIO
       call STRIPIT  (tground,th(1,nlay+1),nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 457 TURBIO
       call STRIPIT  (pmsc,pe(1,nlay+1),nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 458 TURBIO
       call STRIPIT  (tke,qq,nchptot,nchp,istrip,nlay-1,nn)
./pkg/fizhi/fizhi_turb.F 459 TURBIO
       call STRIPIT  (ctmt,ctsave,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 460 TURBIO
       call STRIPIT  (xxmt,xxsave,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 461 TURBIO
       call STRIPIT  (yymt,yysave,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 462 TURBIO
       call STRIPIT  (zetamt,zetasave,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 463 TURBIO
       call STRIPIT  (xlmt,xlsave,nchptot,nchp,istrip,nlay,nn)
./pkg/fizhi/fizhi_turb.F 464 TURBIO
       call STRIPIT  (khmt,khsave,nchptot,nchp,istrip,nlay,nn)
./pkg/fizhi/fizhi_turb.F 465 TURBIO
       call STRIPITINT (water,stwatr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 467 TURBIO
       call STRIPITINT (igrd,igrdstr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 468 TURBIO
       call STRIPIT  (chfr,chfrstr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 469 TURBIO
       call STRIPIT  (icethk,icest,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 470 TURBIO
       call STRIPIT  (pardiff,pardf,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 471 TURBIO
       call STRIPIT  (pardirct,pardr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 472 TURBIO
       call STRIPIT  (chlt,lats,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 473 TURBIO
       call STRIPIT  (chlon,lons,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 474 TURBIO
       call STRIPIT  (lsprec,rainls,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 475 TURBIO
       call STRIPIT  (cnvprec,raincon,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 476 TURBIO
       call STRIPIT  (snowprec,newsnow,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 477 TURBIO
       call STRIPIT  (netsw,swnet,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 478 TURBIO
       call STRIPIT  (netlw,lwstrip,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 479 TURBIO
       call STRIPIT  (alwcoeff,alwrad,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 480 TURBIO
       call STRIPIT  (blwcoeff,blwrad,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 481 TURBIO
       call STRIPIT  (alai,laistrip,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 482 TURBIO
       call STRIPIT  (agrn,grnstrip,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 483 TURBIO
       call STRIPIT  (z2ch,z2str,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 484 TURBIO
       call STRIPIT  (sqscat,scatstr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 485 TURBIO
       call STRIPIT  (rsoil1,rs1str,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 486 TURBIO
       call STRIPIT  (rsoil2,rs2str,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 487 TURBIO
       call STRIPIT  (rdc,rdcstr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 488 TURBIO
       call STRIPIT  (u2fac,u2fstr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 489 TURBIO
       call STRIPIT  (shg,shgstr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 490 TURBIO
       call STRIPIT  (dqsdt,dqsdtstr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 491 TURBIO
       call STRIPIT  ( qice, qicestr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 492 TURBIO
       call STRIPIT  (dqice,dqicestr,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 493 TURBIO
       call STRIPITINT (ityp,types,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 495 TURBIO
       call STRIPIT  (tground,tc,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 496 TURBIO
       call STRIPIT  (tdeep,td,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 497 TURBIO
       call STRIPIT  (qground,qa,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 498 TURBIO
       call STRIPIT  (swetshal,swet1,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 499 TURBIO
       call STRIPIT  (swetroot,swet2,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 500 TURBIO
       call STRIPIT  (swetdeep,swet3,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 501 TURBIO
       call STRIPIT  (snodep,snowdepth,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 502 TURBIO
       call STRIPIT  (capac,capacity,nchptot,nchp,istrip,1,nn)
./pkg/fizhi/fizhi_turb.F 538 TURBIO
      call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 588 TURBIO
       call DIAG_VEGTILE_FILL (stdiag,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 603 TURBIO
      call PASTIT (qq,tke,istrip,nchp,nchptot,nlay,nn)
./pkg/fizhi/fizhi_turb.F 604 TURBIO
      call PASTIT (ctsave,ctmt,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 605 TURBIO
      call PASTIT (xxsave,xxmt,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 606 TURBIO
      call PASTIT (yysave,yymt,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 607 TURBIO
      call PASTIT (zetasave,zetamt,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 608 TURBIO
      call PASTIT (xlsave,xlmt,istrip,nchp,nchptot,nlay,nn)
./pkg/fizhi/fizhi_turb.F 609 TURBIO
      call PASTIT (khsave,khmt,istrip,nchp,nchptot,nlay,nn)
./pkg/fizhi/fizhi_turb.F 611 TURBIO
      call PASTIT (qliq  ,qliqmsc,istrip,nchp,nchptot,nlay,nn)
./pkg/fizhi/fizhi_turb.F 612 TURBIO
      call PASTIT (turbfcc,fccmsc,istrip,nchp,nchptot,nlay,nn)
./pkg/fizhi/fizhi_turb.F 678 TURBIO
      call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 685 TURBIO
      call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 692 TURBIO
      call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 696 TURBIO
      call DIAG_VEGTILE_FILL (grnstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 700 TURBIO
      call DIAG_VEGTILE_FILL (laistrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 704 TURBIO
      call DIAG_VEGTILE_FILL (pardr,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 708 TURBIO
      call DIAG_VEGTILE_FILL (pardf,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 712 TURBIO
      call DIAG_VEGTILE_FILL (blwrad,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 716 TURBIO
      call DIAG_VEGTILE_FILL (dhsdtc,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 720 TURBIO
      call DIAG_VEGTILE_FILL (dedtc,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 724 TURBIO
      call DIAG_VEGTILE_FILL (dhsdqa,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 728 TURBIO
      call DIAG_VEGTILE_FILL (dedqa,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 732 TURBIO
      call DIAG_VEGTILE_FILL (hlwdwn,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 769 TURBIO
      call DIAG_VEGTILE_FILL (runoff,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 773 TURBIO
      call DIAG_VEGTILE_FILL (fwsoil,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 777 TURBIO
      call DIAG_VEGTILE_FILL (gdrain,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 781 TURBIO
      call DIAG_VEGTILE_FILL (smelt,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 785 TURBIO
      call DIAG_VEGTILE_FILL (eveg,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 789 TURBIO
      call DIAG_VEGTILE_FILL (esno,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 793 TURBIO
      call DIAG_VEGTILE_FILL (esoi,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 797 TURBIO
      call DIAG_VEGTILE_FILL (eint,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 801 TURBIO
      call DIAG_VEGTILE_FILL (evpot,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 805 TURBIO
      call DIAG_VEGTILE_FILL (strdg1,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 809 TURBIO
      call DIAG_VEGTILE_FILL (strdg2,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 813 TURBIO
      call DIAG_VEGTILE_FILL (strdg3,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 817 TURBIO
      call DIAG_VEGTILE_FILL (strdg4,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 821 TURBIO
      call DIAG_VEGTILE_FILL (strdg5,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 825 TURBIO
      call DIAG_VEGTILE_FILL (strdg6,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 829 TURBIO
      call DIAG_VEGTILE_FILL (strdg7,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 833 TURBIO
      call DIAG_VEGTILE_FILL (strdg8,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 838 TURBIO
      call PASTIT (tc,tground,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 839 TURBIO
      call PASTIT (td,tdeep,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 840 TURBIO
      call PASTIT (qa,qground,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 841 TURBIO
      call PASTIT (swet1,swetshal,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 842 TURBIO
      call PASTIT (swet2,swetroot,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 843 TURBIO
      call PASTIT (swet3,swetdeep,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 844 TURBIO
      call PASTIT (capacity,capac,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 845 TURBIO
      call PASTIT (snowdepth,snodep,istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 879 TURBIO
      call STRIP2TILE(uz(1,1,l),igrd,tmpstrip,nchp,ijall,
./pkg/fizhi/fizhi_turb.F 884 TURBIO
      call PASTIT (tends,dumsc(1,l),istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 886 TURBIO
      call STRIP2TILE(vz(1,1,l),igrd,tmpstrip,nchp,ijall,
./pkg/fizhi/fizhi_turb.F 891 TURBIO
      call PASTIT (tends,dvmsc(1,l),istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 893 TURBIO
      call STRIP2TILE(tz(1,1,l),igrd,tmpstrip,nchp,ijall,
./pkg/fizhi/fizhi_turb.F 899 TURBIO
      call PASTIT (tends,dtmsc(1,l),istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 901 TURBIO
      call STRIP2TILE(qz(1,1,l,1),igrd,tmpstrip,nchp,ijall,
./pkg/fizhi/fizhi_turb.F 907 TURBIO
      call PASTIT (tends,dqmsc(1,l,1),istrip,nchp,nchptot,1,nn)
./pkg/fizhi/fizhi_turb.F 932 TURBIO
      call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 939 TURBIO
      call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 946 TURBIO
      call DIAG_VEGTILE_FILL (tmpstrip,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 950 TURBIO
      call DIAG_VEGTILE_FILL (stuflux,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 954 TURBIO
      call DIAG_VEGTILE_FILL (stvflux,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 963 TURBIO
      call DIAG_VEGTILE_FILL (sttflux,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 972 TURBIO
      call DIAG_VEGTILE_FILL (stqflux,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 976 TURBIO
      call DIAG_VEGTILE_FILL (sri,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 980 TURBIO
      call DIAG_VEGTILE_FILL (skh,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 984 TURBIO
      call DIAG_VEGTILE_FILL (skm,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 988 TURBIO
      call DIAG_VEGTILE_FILL (sct,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 992 TURBIO
      call DIAG_VEGTILE_FILL (scu,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_turb.F 996 TURBIO
      call DIAG_VEGTILE_FILL (swinds,igrd,chfrstr,istrip,nchp,nn,
./pkg/fizhi/fizhi_utils.F 655 GRD2MSC
      integer im,jm,mxchps,nchp
./pkg/fizhi/fizhi_utils.F 680 MSC2GRD
      integer im,jm,mxchps,nchp
./pkg/fizhi/fizhi_utils.F 711 CHPPRM
      subroutine CHPPRM(nymd,nhms,mxchps,nchp,chlt,ityp,alai,
./pkg/fizhi/fizhi_utils.F 716 CHPPRM
       integer nymd,nhms,nchp,mxchps,ityp(mxchps)
./pkg/fizhi/fizhi_utils.F 868 CHPPRM
      do i=1,nchp
./pkg/fizhi/fizhi_wrapper.F 264 FIZHI_WRAPPER
     &  turbStart(bi,bj), nchp,nchptot,nchpland,
./pkg/fizhi/update_earth_exports.F 1002 GETEMISS
      _RL emisstile(nchp,10)
./pkg/fizhi/update_earth_exports.F 1014 GETEMISS
      call EMISSIVITY(snowdep(1,bi,bj),fraci,nchp,nchptot,ityp(1,bi,bj),
./pkg/fizhi/update_earth_exports.F 101 UPDATE_EARTH_EXPORTS
     &       nchp,nSx,nSy,bi,bj,alai,agrn )
./pkg/fizhi/update_earth_exports.F 1025 GETEMISS
      call MSC2GRD(igrd(1,bi,bj),chfr(1,bi,bj),emisstile(1,k),nchp,
./pkg/fizhi/update_earth_exports.F 1039 EMISSIVITY
      SUBROUTINE EMISSIVITY (snowdepth,fraci,nchp,numpts,ityp,newemis)
./pkg/fizhi/update_earth_exports.F 1041 EMISSIVITY
      INTEGER nchp,numpts
./pkg/fizhi/update_earth_exports.F 1042 EMISSIVITY
      INTEGER   ityp(nchp)
./pkg/fizhi/update_earth_exports.F 1043 EMISSIVITY
      _RL snowdepth(nchp)
./pkg/fizhi/update_earth_exports.F 1044 EMISSIVITY
      _RL fraci(nchp)
./pkg/fizhi/update_earth_exports.F 1045 EMISSIVITY
      _RL newemis(nchp,10)
./pkg/fizhi/update_earth_exports.F 114 UPDATE_EARTH_EXPORTS
        call GETALB(sec,month,day,cosz,snodep,fraci,fracl,im2,jm2,nchp,
./pkg/fizhi/update_earth_exports.F 126 UPDATE_EARTH_EXPORTS
     &               nchp,nchptot(bi,bj))
./pkg/fizhi/update_earth_exports.F 127 UPDATE_EARTH_EXPORTS
        call GETEMISS(fracl,im2,jm2,nchp,nchptot(bi,bj),nSx,nSy,bi,bj,
./pkg/fizhi/update_earth_exports.F 145 UPDATE_EARTH_EXPORTS
     &                    nchp,nchptot(bi,bj),fracl,tmpij,im2,jm2)
./pkg/fizhi/update_earth_exports.F 49 UPDATE_EARTH_EXPORTS
      _RL ficetile(nchp)
./pkg/fizhi/update_earth_exports.F 52 UPDATE_EARTH_EXPORTS
      _RL tmpchp(nchp)
./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 864 GETALB
      _RL snodep(nchp,nSx,nSy),chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy)
./pkg/fizhi/update_earth_exports.F 865 GETALB
      INTEGER igrd(nchp,nSx,nSy),ityp(nchp,nSx,nSy)
./pkg/fizhi/update_earth_exports.F 866 GETALB
      _RL alai(nchp,nSx,nSy),agrn(nchp,nSx,nSy)
./pkg/fizhi/update_earth_exports.F 881 GETALB
      _RL avisdr(nchp),anirdr(nchp),avisdf(nchp)
./pkg/fizhi/update_earth_exports.F 882 GETALB
      _RL anirdf(nchp)
./pkg/fizhi/update_earth_exports.F 883 GETALB
      _RL zenith(nchp)
./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 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,
./pkg/fizhi/update_earth_exports.F 963 GETEMISS
      SUBROUTINE GETEMISS(fracg,im,jm,nchp,nchptot,nSx,nSy,bi,bj,
./pkg/fizhi/update_earth_exports.F 994 GETEMISS
      INTEGER im,jm,nchp,nchptot,nSx,nSy,bi,bj
./pkg/fizhi/update_earth_exports.F 996 GETEMISS
      _RL chfr(nchp,nSx,nSy)
./pkg/fizhi/update_earth_exports.F 997 GETEMISS
      INTEGER igrd(nchp,nSx,nSy), ityp(nchp,nSx,nSy)
./pkg/fizhi/update_earth_exports.F 998 GETEMISS
      _RL snowdep(nchp,nSx,nSy)
./pkg/fizhi/update_earth_exports.F 999 GETEMISS
      _RL fraci(nchp)
./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 110 FIZHI_INIT_VEG
         do i=1,nchp
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F 57 FIZHI_INIT_VEG
      INTEGER myThid,im,jm,maxtyp,nchp,nSx,nSy,Nxg,Nyg
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F 60 FIZHI_INIT_VEG
      INTEGER igrd(nchp,nSx,nSy),ityp(nchp,nSx,nSy)
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F 63 FIZHI_INIT_VEG
      _RL chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy),chlon(nchp,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-cs-aqualev20/code/fizhi_init_vegsurftiles.F 43 FIZHI_INIT_VEGSURFTILES
       do n = 1,nchp
./verification/fizhi-gridalt-hs/code/do_fizhi.F 35 DO_FIZHI
      INTEGER Nrphin,nSxin,nSyin,bi,bj,nchp
./verification/fizhi-gridalt-hs/code/do_fizhi.F 46 DO_FIZHI
      _RL ctmt(nchp,nSxin,nSyin),xxmt(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 47 DO_FIZHI
      _RL yymt(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 48 DO_FIZHI
      _RL zetamt(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 49 DO_FIZHI
      _RL xlmt(nchp,Nrphin,nSxin,nSyin),khmt(nchp,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 50 DO_FIZHI
      _RL tke(nchp,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 59 DO_FIZHI
      _RL chfr(nchp,nSxin,nSyin),alai(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 60 DO_FIZHI
      _RL agrn(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 61 DO_FIZHI
      INTEGER ityp(nchp,nSxin,nSyin),igrd(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 62 DO_FIZHI
      _RL chlat(nchp,nSxin,nSyin),chlon(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 63 DO_FIZHI
      _RL tcanopy(nchp,nSxin,nSyin),tdeep(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 64 DO_FIZHI
      _RL ecanopy(nchp,nSxin,nSyin),swetshal(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 65 DO_FIZHI
      _RL swetroot(nchp,nSxin,nSyin),swetdeep(nchp,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 66 DO_FIZHI
      _RL snodep(nchp,nSxin,nSyin),capac(nchp,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_vars.F 209 FIZHI_INIT_VARS
         do i = 1,nchp
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F 216 FIZHI_INIT_VARS
         do i = 1,nchp
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F 232 FIZHI_INIT_VARS
        do i = 1,nchp
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 123 FIZHI_INIT_VEG
         do i=1,nchp
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 57 FIZHI_INIT_VEG
      INTEGER myThid,im,jm,maxtyp,nchp,nSx,nSy,Nxg,Nyg
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 60 FIZHI_INIT_VEG
      INTEGER igrd(nchp,nSx,nSy),ityp(nchp,nSx,nSy)
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 63 FIZHI_INIT_VEG
      _RL chfr(nchp,nSx,nSy),chlt(nchp,nSx,nSy),chlon(nchp,nSx,nSy)
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F 7 FIZHI_INIT_VEG
     & maxtyp,nchp,nchptot,nchpland,lons,lats,surftype,tilefrac,