Symbol Description Uses
idim2 164



File Line number Procedure Code
./pkg/fizhi/AtoC.F 33 ATOC
       integer idim1, idim2, jdim1, jdim2, im1, im2, jm1, jm2
./pkg/fizhi/AtoC.F 34 ATOC
       _RS mask(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/AtoC.F 35 ATOC
       _RL fieldin1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/AtoC.F 36 ATOC
       _RL fieldin2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/AtoC.F 37 ATOC
       _RL fieldout1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/AtoC.F 38 ATOC
       _RL fieldout2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/AtoC.F 41 ATOC
       _RL tmpfld1(idim1:idim2,jdim1:jdim2)
./pkg/fizhi/AtoC.F 42 ATOC
       _RL tmpfld2(idim1:idim2,jdim1:jdim2)
./pkg/fizhi/AtoC.F 55 ATOC
          do i = idim1,idim2
./pkg/fizhi/AtoC.F 5 ATOC
       subroutine ATOC(myThid,fieldin1,fieldin2,mask,idim1,idim2,
./pkg/fizhi/CtoA.F 33 CTOA
       integer idim1, idim2, jdim1, jdim2, im1, im2, jm1, jm2
./pkg/fizhi/CtoA.F 35 CTOA
       _RS mask1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/CtoA.F 36 CTOA
       _RS mask2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/CtoA.F 37 CTOA
       _RL fieldin1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/CtoA.F 38 CTOA
       _RL fieldin2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/CtoA.F 39 CTOA
       _RL fieldout1(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/CtoA.F 40 CTOA
       _RL fieldout2(idim1:idim2,jdim1:jdim2,numlevs,Nsx,Nsy)
./pkg/fizhi/CtoA.F 45 CTOA
       _RL tmpfld1(idim1:idim2,jdim1:jdim2)
./pkg/fizhi/CtoA.F 46 CTOA
       _RL tmpfld2(idim1:idim2,jdim1:jdim2)
./pkg/fizhi/CtoA.F 57 CTOA
          do i = idim1,idim2
./pkg/fizhi/CtoA.F 5 CTOA
       subroutine CTOA(myThid,fieldin1,fieldin2,mask1,mask2,idim1,idim2,
./pkg/fizhi/do_fizhi.F 34 DO_FIZHI
      INTEGER myIter,myid,im1,im2,jm1,jm2,idim1,idim2,jdim1,jdim2
./pkg/fizhi/do_fizhi.F 38 DO_FIZHI
      _RL uphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 39 DO_FIZHI
      _RL vphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 40 DO_FIZHI
      _RL thphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 41 DO_FIZHI
      _RL sphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 42 DO_FIZHI
      _RL pephy(idim1:idim2,jdim1:jdim2,Nrphin+1,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 43 DO_FIZHI
      _RS lons(idim1:idim2,jdim1:jdim2,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 44 DO_FIZHI
      _RS lats(idim1:idim2,jdim1:jdim2,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 45 DO_FIZHI
      _RS Zsurf(idim1:idim2,jdim1:jdim2,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 52 DO_FIZHI
      _RL sst(idim1:idim2,jdim1:jdim2,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 53 DO_FIZHI
      _RL sice(idim1:idim2,jdim1:jdim2,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 5 DO_FIZHI
     & idim1,idim2,jdim1,jdim2,Nrphin,nSxIn,nSyIn,im1,im2,jm1,jm2,bi,bj,
./pkg/fizhi/do_fizhi.F 75 DO_FIZHI
      _RL cldtotlwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 76 DO_FIZHI
      _RL cldraslwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 77 DO_FIZHI
      _RL cldlsplwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 78 DO_FIZHI
      _RL lwlzin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 79 DO_FIZHI
      _RL cldtotswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 80 DO_FIZHI
      _RL cldrasswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 81 DO_FIZHI
      _RL cldlspswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 82 DO_FIZHI
      _RL swlzin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 83 DO_FIZHI
      _RL qliqaveswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 84 DO_FIZHI
      _RL qliqavelwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 85 DO_FIZHI
      _RL fccaveswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 86 DO_FIZHI
      _RL fccavelwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 87 DO_FIZHI
      _RL rainlspin(idim1:idim2,jdim1:jdim2,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 88 DO_FIZHI
      _RL rainconin(idim1:idim2,jdim1:jdim2,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 89 DO_FIZHI
      _RL snowfallin(idim1:idim2,jdim1:jdim2,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 92 DO_FIZHI
      _RL duphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 93 DO_FIZHI
      _RL dvphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 94 DO_FIZHI
      _RL dthphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/do_fizhi.F 95 DO_FIZHI
      _RL dsphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxIn,nSyIn)
./pkg/fizhi/fizhi_fillnegs.F 26 QCHECK
      integer idim1,idim2,jdim1,jdim2,Ldim,im1,im2,jm1,jm2
./pkg/fizhi/fizhi_fillnegs.F 28 QCHECK
      _RL qz(idim1:idim2,jdim1:jdim2,ldim,Nsx,Nsy)
./pkg/fizhi/fizhi_fillnegs.F 29 QCHECK
      _RL dp(idim1:idim2,jdim1:jdim2,ldim,Nsx,Nsy)
./pkg/fizhi/fizhi_fillnegs.F 5 QCHECK
      SUBROUTINE QCHECK ( idim1,idim2,jdim1,jdim2,ldim,Nsx,Nsy,im1,im2,
./pkg/fizhi/fizhi_init_fixed.F 45 FIZHI_INIT_FIXED
       INTEGER im1, im2, jm1, jm2, idim2, jdim2
./pkg/fizhi/fizhi_init_fixed.F 62 FIZHI_INIT_FIXED
       idim2 = sNx+OLx
./pkg/fizhi/fizhi_init_vars.F 61 FIZHI_INIT_VARS
       INTEGER im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/fizhi_init_vars.F 78 FIZHI_INIT_VARS
       idim2 = sNx
./pkg/fizhi/fizhi_wrapper.F 263 FIZHI_WRAPPER
     &  idim1,idim2,jdim1,jdim2,Nrphys,nSx,nSy,im1,im2,jm1,jm2,bi,bj,
./pkg/fizhi/fizhi_wrapper.F 294 FIZHI_WRAPPER
        call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys,
./pkg/fizhi/fizhi_wrapper.F 303 FIZHI_WRAPPER
        call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys,
./pkg/fizhi/fizhi_wrapper.F 312 FIZHI_WRAPPER
        call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys,
./pkg/fizhi/fizhi_wrapper.F 321 FIZHI_WRAPPER
        call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys,
./pkg/fizhi/fizhi_wrapper.F 331 FIZHI_WRAPPER
       call ATOC(myThid,guphy,gvphy,maskC,idim1,idim2,jdim1,jdim2,Nr,
./pkg/fizhi/fizhi_wrapper.F 54 FIZHI_WRAPPER
       INTEGER im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/fizhi_wrapper.F 59 FIZHI_WRAPPER
       idim2 = sNx+OLx
./pkg/fizhi/step_fizhi_corr.F 193 STEP_FIZHI_CORR
        do i = idim1,idim2
./pkg/fizhi/step_fizhi_corr.F 264 STEP_FIZHI_CORR
        call QCHECK (im1,im2,jm1,jm2,Nrphys,Nsx,Nsy,idim1,idim2,
./pkg/fizhi/step_fizhi_corr.F 57 STEP_FIZHI_CORR
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/step_fizhi_corr.F 69 STEP_FIZHI_CORR
       idim2 = sNx
./pkg/fizhi/step_fizhi_fg.F 28 STEP_FIZHI_FG
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/step_fizhi_fg.F 35 STEP_FIZHI_FG
       idim2 = sNx+OLx
./pkg/fizhi/step_fizhi_fg.F 47 STEP_FIZHI_FG
        call STEP_PHYSICS(uphy,vphy,thphy,sphy,dt,idim1,idim2,
./pkg/fizhi/step_fizhi_fg.F 87 STEP_FIZHI_FG
        call QCHECK (idim1,idim2,jdim1,jdim2,Nrphys,Nsx,Nsy,im1,im2,
./pkg/fizhi/step_physics.F 13 STEP_PHYSICS
       integer im1,im2,jm1,jm2,idim1,idim2,jdim1,jdim2
./pkg/fizhi/step_physics.F 15 STEP_PHYSICS
       _RL uphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy)
./pkg/fizhi/step_physics.F 16 STEP_PHYSICS
       _RL vphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy)
./pkg/fizhi/step_physics.F 17 STEP_PHYSICS
       _RL thphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy)
./pkg/fizhi/step_physics.F 18 STEP_PHYSICS
       _RL sphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy)
./pkg/fizhi/step_physics.F 19 STEP_PHYSICS
       _RL duphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy)
./pkg/fizhi/step_physics.F 20 STEP_PHYSICS
       _RL dvphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy)
./pkg/fizhi/step_physics.F 21 STEP_PHYSICS
       _RL dthphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy)
./pkg/fizhi/step_physics.F 22 STEP_PHYSICS
       _RL dsphy(idim1:idim2,jdim1:jdim2,Nrphys,Nsx,Nsy)
./pkg/fizhi/step_physics.F 6 STEP_PHYSICS
     .  idim1,idim2,jdim1,jdim2,Nrphys,Nsx,Nsy,im1,im2,jm1,jm2,bi,bj,
./pkg/fizhi/update_earth_exports.F 54 UPDATE_EARTH_EXPORTS
      INTEGER im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/update_earth_exports.F 62 UPDATE_EARTH_EXPORTS
      idim2 = sNx+OLx
./pkg/fizhi/update_ocean_exports.F 117 GETSICE
       subroutine GETSICE(iunit,clim,idim1,idim2,jdim1,jdim2,im1,im2,
./pkg/fizhi/update_ocean_exports.F 164 GETSICE
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./pkg/fizhi/update_ocean_exports.F 170 GETSICE
      _RL sice(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./pkg/fizhi/update_ocean_exports.F 35 UPDATE_OCEAN_EXPORTS
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/update_ocean_exports.F 378 GETSST
      subroutine GETSST(iunit,clim,idim1,idim2,jdim1,jdim2,im1,im2,
./pkg/fizhi/update_ocean_exports.F 425 GETSST
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./pkg/fizhi/update_ocean_exports.F 431 GETSST
      _RL sst(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./pkg/fizhi/update_ocean_exports.F 69 UPDATE_OCEAN_EXPORTS
       idim2 = sNx+OLx
./pkg/fizhi/update_ocean_exports.F 89 UPDATE_OCEAN_EXPORTS
       call GETSST(ksst,sstclim,idim1,idim2,jdim1,jdim2,im1,im2,
./pkg/fizhi/update_ocean_exports.F 94 UPDATE_OCEAN_EXPORTS
       call GETSICE(kice,siceclim,idim1,idim2,jdim1,jdim2,im1,im2,
./pkg/gridalt/dyn2phys.F 47 DYN2PHYS
      integer idim1, idim2, jdim1, jdim2, bi, bj
./pkg/gridalt/dyn2phys.F 78 DYN2PHYS
        do i = idim1,idim2
./pkg/gridalt/dyn2phys.F 7 DYN2PHYS
     . idim1,idim2,jdim1,jdim2,bi,bj,windphy,pephy,Lbot,lmphy,nlperdyn,
./pkg/gridalt/dyn2phys.F 89 DYN2PHYS
        do i = idim1,idim2
./pkg/gridalt/gridalt_initialise.F 31 GRIDALT_INITIALISE
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/gridalt/gridalt_initialise.F 38 GRIDALT_INITIALISE
       idim2 = sNx
./pkg/gridalt/phys2dyn.F 43 PHYS2DYN
      integer idim1, idim2, jdim1, jdim2, bi, bj
./pkg/gridalt/phys2dyn.F 73 PHYS2DYN
        do i = idim1,idim2
./pkg/gridalt/phys2dyn.F 7 PHYS2DYN
     .     idim1,idim2,jdim1,jdim2,bi,bj,pedyn,Lbot,lmdyn,nlperdyn,qdyn)
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F 41 FIZHI_INIT_FIXED
       INTEGER im1, im2, jm1, jm2, idim2, jdim2
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F 49 FIZHI_INIT_FIXED
       idim2 = sNx+OLx
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 117 GETSICE
       subroutine GETSICE(iunit,clim,idim1,idim2,jdim1,jdim2,im1,im2,
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 165 GETSICE
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 170 GETSICE
      _RL sice(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 190 GETSST
      subroutine GETSST(iunit,clim,idim1,idim2,jdim1,jdim2,im1,im2,
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 238 GETSST
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 243 GETSST
      _RL sst(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 35 UPDATE_OCEAN_EXPORTS
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 69 UPDATE_OCEAN_EXPORTS
       idim2 = sNx+OLx
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 89 UPDATE_OCEAN_EXPORTS
       call GETSST(ksst,sstclim,idim1,idim2,jdim1,jdim2,im1,im2,
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F 94 UPDATE_OCEAN_EXPORTS
       call GETSICE(kice,siceclim,idim1,idim2,jdim1,jdim2,im1,im2,
./verification/fizhi-gridalt-hs/code/do_fizhi.F 34 DO_FIZHI
      INTEGER myIter,myid,im1,im2,jm1,jm2,idim1,idim2,jdim1,jdim2
./verification/fizhi-gridalt-hs/code/do_fizhi.F 38 DO_FIZHI
      _RL uphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 39 DO_FIZHI
      _RL vphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 40 DO_FIZHI
      _RL thphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 41 DO_FIZHI
      _RL sphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 42 DO_FIZHI
      _RL pephy(idim1:idim2,jdim1:jdim2,Nrphin+1,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 43 DO_FIZHI
      _RS lons(idim1:idim2,jdim1:jdim2,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 44 DO_FIZHI
      _RS lats(idim1:idim2,jdim1:jdim2,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 45 DO_FIZHI
      _RS Zsurf(idim1:idim2,jdim1:jdim2,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 52 DO_FIZHI
      _RL sst(idim1:idim2,jdim1:jdim2,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 53 DO_FIZHI
      _RL sice(idim1:idim2,jdim1:jdim2,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 5 DO_FIZHI
     & idim1,idim2,jdim1,jdim2,Nrphin,nSxin,nSyin,im1,im2,jm1,jm2,bi,bj,
./verification/fizhi-gridalt-hs/code/do_fizhi.F 75 DO_FIZHI
      _RL cldtotlwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 76 DO_FIZHI
      _RL cldraslwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 77 DO_FIZHI
      _RL cldlsplwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 78 DO_FIZHI
      _RL lwlzin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 79 DO_FIZHI
      _RL cldtotswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 80 DO_FIZHI
      _RL cldrasswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 81 DO_FIZHI
      _RL cldlspswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 82 DO_FIZHI
      _RL swlzin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 83 DO_FIZHI
      _RL qliqaveswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 84 DO_FIZHI
      _RL qliqavelwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 85 DO_FIZHI
      _RL fccaveswin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 86 DO_FIZHI
      _RL fccavelwin(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 87 DO_FIZHI
      _RL rainlspin(idim1:idim2,jdim1:jdim2,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 88 DO_FIZHI
      _RL rainconin(idim1:idim2,jdim1:jdim2,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 89 DO_FIZHI
      _RL snowfallin(idim1:idim2,jdim1:jdim2,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 92 DO_FIZHI
      _RL duphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 93 DO_FIZHI
      _RL dvphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 94 DO_FIZHI
      _RL dthphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 95 DO_FIZHI
      _RL dsphy(idim1:idim2,jdim1:jdim2,Nrphin,nSxin,nSyin)
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F 41 FIZHI_INIT_FIXED
       INTEGER im1, im2, jm1, jm2, idim2, jdim2
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F 49 FIZHI_INIT_FIXED
       idim2 = sNx+OLx
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F 49 FIZHI_INIT_VARS
       INTEGER im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F 58 FIZHI_INIT_VARS
       idim2 = sNx
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 114 GETSICE
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 117 GETSICE
      _RL sice(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 129 GETSST
      subroutine GETSST(iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 174 GETSST
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 177 GETSST
      _RL sst(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 25 UPDATE_OCEAN_EXPORTS
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 31 UPDATE_OCEAN_EXPORTS
       idim2 = sNx+OLx
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 49 UPDATE_OCEAN_EXPORTS
       call GETSST(ksst,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSx,
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 51 UPDATE_OCEAN_EXPORTS
       call GETSICE(kice,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSx,
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F 69 GETSICE
       subroutine GETSICE(iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,