Symbol Description Uses
jdim1 195



File Line number Procedure Code
./pkg/gridalt/dyn2phys.F 46 DYN2PHYS
      integer idim1, idim2, jdim1, jdim2, bi, bj
./pkg/gridalt/dyn2phys.F 5 DYN2PHYS
     . idim1,idim2,jdim1,jdim2,bi,bj,windphy,pephy,Lbot,lmphy,nlperdyn,
./pkg/gridalt/dyn2phys.F 65 DYN2PHYS
       do j = jdim1,jdim2
./pkg/gridalt/gridalt_initialise.F 31 GRIDALT_INITIALISE
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/gridalt/gridalt_initialise.F 39 GRIDALT_INITIALISE
       jdim1 = 1
./pkg/gridalt/phys2dyn.F 42 PHYS2DYN
      integer idim1, idim2, jdim1, jdim2, bi, bj
./pkg/gridalt/phys2dyn.F 58 PHYS2DYN
       do j = jdim1,jdim2
./pkg/gridalt/phys2dyn.F 5 PHYS2DYN
     .     idim1,idim2,jdim1,jdim2,bi,bj,pedyn,Lbot,lmdyn,nlperdyn,qdyn)
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F 42 UPDATE_EARTH_EXPORTS
      integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./verification/fizhi-cs-aqualev10/code/update_earth_exports.F 51 UPDATE_EARTH_EXPORTS
      jdim1 = 1-OLy
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 109 GETSICE
       subroutine GETSICE(iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 157 GETSICE
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 162 GETSICE
      _RL sice(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 181 GETSST
      subroutine GETSST(iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 229 GETSST
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 234 GETSST
      _RL sst(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 29 UPDATE_OCEAN_EXPORTS
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 62 UPDATE_OCEAN_EXPORTS
       jdim1 = 1-OLy
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 81 UPDATE_OCEAN_EXPORTS
       call GETSST(ksst,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSx,
./verification/fizhi-cs-aqualev10/code/update_ocean_exports.F 86 UPDATE_OCEAN_EXPORTS
       call GETSICE(kice,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSx,
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 34 DO_FIZHI
      integer myIter,myid,im1,im2,jm1,jm2,idim1,idim2,jdim1,jdim2
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 37 DO_FIZHI
      _RL uphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 38 DO_FIZHI
      _RL vphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 39 DO_FIZHI
      _RL thphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 40 DO_FIZHI
      _RL sphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 41 DO_FIZHI
      _RL pephy(idim1:idim2,jdim1:jdim2,Nrphin+1,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 42 DO_FIZHI
      _RS lons(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 43 DO_FIZHI
      _RS lats(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 44 DO_FIZHI
      _RS Zsurf(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 51 DO_FIZHI
      _RL sst(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 52 DO_FIZHI
      _RL sice(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 5 DO_FIZHI
     . idim1,idim2,jdim1,jdim2,Nrphin,Nsxin,Nsyin,im1,im2,jm1,jm2,bi,bj,
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 74 DO_FIZHI
      _RL cldtotlwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 75 DO_FIZHI
      _RL cldraslwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 76 DO_FIZHI
      _RL cldlsplwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 77 DO_FIZHI
      _RL lwlzin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 78 DO_FIZHI
      _RL cldtotswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 79 DO_FIZHI
      _RL cldrasswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 80 DO_FIZHI
      _RL cldlspswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 81 DO_FIZHI
      _RL swlzin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 82 DO_FIZHI
      _RL qliqaveswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 83 DO_FIZHI
      _RL qliqavelwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 84 DO_FIZHI
      _RL fccaveswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 85 DO_FIZHI
      _RL fccavelwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 86 DO_FIZHI
      _RL rainlspin(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 87 DO_FIZHI
      _RL rainconin(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 88 DO_FIZHI
      _RL snowfallin(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 91 DO_FIZHI
      _RL duphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 92 DO_FIZHI
      _RL dvphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 93 DO_FIZHI
      _RL dthphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-cs-aqualev10/code/do_fizhi.F 94 DO_FIZHI
      _RL dsphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./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 32 UPDATE_OCEAN_EXPORTS
       jdim1 = 1-OLy
./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,
./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 59 FIZHI_INIT_VARS
       jdim1 = 1
./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 37 DO_FIZHI
      _RL uphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 38 DO_FIZHI
      _RL vphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 39 DO_FIZHI
      _RL thphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 40 DO_FIZHI
      _RL sphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 41 DO_FIZHI
      _RL pephy(idim1:idim2,jdim1:jdim2,Nrphin+1,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 42 DO_FIZHI
      _RS lons(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 43 DO_FIZHI
      _RS lats(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 44 DO_FIZHI
      _RS Zsurf(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 51 DO_FIZHI
      _RL sst(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 52 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 74 DO_FIZHI
      _RL cldtotlwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 75 DO_FIZHI
      _RL cldraslwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 76 DO_FIZHI
      _RL cldlsplwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 77 DO_FIZHI
      _RL lwlzin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 78 DO_FIZHI
      _RL cldtotswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 79 DO_FIZHI
      _RL cldrasswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 80 DO_FIZHI
      _RL cldlspswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 81 DO_FIZHI
      _RL swlzin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 82 DO_FIZHI
      _RL qliqaveswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 83 DO_FIZHI
      _RL qliqavelwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 84 DO_FIZHI
      _RL fccaveswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 85 DO_FIZHI
      _RL fccavelwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 86 DO_FIZHI
      _RL rainlspin(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 87 DO_FIZHI
      _RL rainconin(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 88 DO_FIZHI
      _RL snowfallin(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 91 DO_FIZHI
      _RL duphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 92 DO_FIZHI
      _RL dvphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 93 DO_FIZHI
      _RL dthphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./verification/fizhi-gridalt-hs/code/do_fizhi.F 94 DO_FIZHI
      _RL dsphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./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 36 STEP_FIZHI_FG
       jdim1 = 1-OLy
./pkg/fizhi/step_fizhi_fg.F 48 STEP_FIZHI_FG
     .      jdim1,jdim2,
./pkg/fizhi/step_fizhi_fg.F 87 STEP_FIZHI_FG
        call QCHECK (idim1,idim2,jdim1,jdim2,Nrphys,Nsx,Nsy,im1,im2,
./pkg/fizhi/update_earth_exports.F 42 UPDATE_EARTH_EXPORTS
      integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/update_earth_exports.F 51 UPDATE_EARTH_EXPORTS
      jdim1 = 1-OLy
./pkg/fizhi/update_ocean_exports.F 109 GETSICE
       subroutine GETSICE(iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,
./pkg/fizhi/update_ocean_exports.F 156 GETSICE
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./pkg/fizhi/update_ocean_exports.F 161 GETSICE
      _RL sice(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./pkg/fizhi/update_ocean_exports.F 29 UPDATE_OCEAN_EXPORTS
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/update_ocean_exports.F 361 GETSST
      subroutine GETSST(iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,
./pkg/fizhi/update_ocean_exports.F 408 GETSST
      integer iunit,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSumx,nSumy
./pkg/fizhi/update_ocean_exports.F 413 GETSST
      _RL sst(idim1:idim2,jdim1:jdim2,nSumx,nSumy)
./pkg/fizhi/update_ocean_exports.F 62 UPDATE_OCEAN_EXPORTS
       jdim1 = 1-OLy
./pkg/fizhi/update_ocean_exports.F 81 UPDATE_OCEAN_EXPORTS
       call GETSST(ksst,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSx,
./pkg/fizhi/update_ocean_exports.F 86 UPDATE_OCEAN_EXPORTS
       call GETSICE(kice,idim1,idim2,jdim1,jdim2,im1,im2,jm1,jm2,nSx,
./pkg/fizhi/step_fizhi_corr.F 180 STEP_FIZHI_CORR
        do j = jdim1,jdim2
./pkg/fizhi/step_fizhi_corr.F 255 STEP_FIZHI_CORR
       do j = jdim1,jdim2
./pkg/fizhi/step_fizhi_corr.F 263 STEP_FIZHI_CORR
       do j = jdim1,jdim2
./pkg/fizhi/step_fizhi_corr.F 271 STEP_FIZHI_CORR
       do j = jdim1,jdim2
./pkg/fizhi/step_fizhi_corr.F 279 STEP_FIZHI_CORR
       do j = jdim1,jdim2
./pkg/fizhi/step_fizhi_corr.F 289 STEP_FIZHI_CORR
     .         jdim1,jdim2,bi,bj,dpphys,sphy)
./pkg/fizhi/step_fizhi_corr.F 294 STEP_FIZHI_CORR
       do j = jdim1,jdim2
./pkg/fizhi/step_fizhi_corr.F 50 STEP_FIZHI_CORR
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/step_fizhi_corr.F 61 STEP_FIZHI_CORR
       jdim1 = 1
./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_vars.F 49 FIZHI_INIT_VARS
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/fizhi_init_vars.F 59 FIZHI_INIT_VARS
       jdim1 = 1
./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 56 CTOA
         do j = jdim1,jdim2
./pkg/fizhi/CtoA.F 6 CTOA
     .  jdim1,jdim2,numlevs,Nsx,Nsy,im1,im2,jm1,jm2,fieldout1,fieldout2)
./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/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 52 ATOC
         do j = jdim1,jdim2
./pkg/fizhi/AtoC.F 6 ATOC
     .  jdim1,jdim2,numlevs,Nsx,Nsy,im1,im2,jm1,jm2,fieldout1,fieldout2)
./pkg/fizhi/fizhi_wrapper.F 138 FIZHI_WRAPPER
     .  idim1,idim2,jdim1,jdim2,Nrphys,Nsx,Nsy,im1,im2,jm1,jm2,bi,bj,
./pkg/fizhi/fizhi_wrapper.F 169 FIZHI_WRAPPER
        call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys,
./pkg/fizhi/fizhi_wrapper.F 178 FIZHI_WRAPPER
        call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys,
./pkg/fizhi/fizhi_wrapper.F 187 FIZHI_WRAPPER
        call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys,
./pkg/fizhi/fizhi_wrapper.F 196 FIZHI_WRAPPER
        call PHYS2DYN(tempphy,pephy,idim1,idim2,jdim1,jdim2,Nrphys,
./pkg/fizhi/fizhi_wrapper.F 206 FIZHI_WRAPPER
       call ATOC(myThid,guphy,gvphy,maskC,idim1,idim2,jdim1,jdim2,Nr,
./pkg/fizhi/fizhi_wrapper.F 47 FIZHI_WRAPPER
       integer im1, im2, jm1, jm2, idim1, idim2, jdim1, jdim2
./pkg/fizhi/fizhi_wrapper.F 52 FIZHI_WRAPPER
       jdim1 = 1-OLy
./pkg/fizhi/do_fizhi.F 34 DO_FIZHI
      integer myIter,myid,im1,im2,jm1,jm2,idim1,idim2,jdim1,jdim2
./pkg/fizhi/do_fizhi.F 37 DO_FIZHI
      _RL uphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 38 DO_FIZHI
      _RL vphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 39 DO_FIZHI
      _RL thphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 40 DO_FIZHI
      _RL sphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 41 DO_FIZHI
      _RL pephy(idim1:idim2,jdim1:jdim2,Nrphin+1,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 42 DO_FIZHI
      _RS lons(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 43 DO_FIZHI
      _RS lats(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 44 DO_FIZHI
      _RS Zsurf(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 51 DO_FIZHI
      _RL sst(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 52 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 74 DO_FIZHI
      _RL cldtotlwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 75 DO_FIZHI
      _RL cldraslwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 76 DO_FIZHI
      _RL cldlsplwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 77 DO_FIZHI
      _RL lwlzin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 78 DO_FIZHI
      _RL cldtotswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 79 DO_FIZHI
      _RL cldrasswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 80 DO_FIZHI
      _RL cldlspswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 81 DO_FIZHI
      _RL swlzin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 82 DO_FIZHI
      _RL qliqaveswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 83 DO_FIZHI
      _RL qliqavelwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 84 DO_FIZHI
      _RL fccaveswin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 85 DO_FIZHI
      _RL fccavelwin(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 86 DO_FIZHI
      _RL rainlspin(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 87 DO_FIZHI
      _RL rainconin(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 88 DO_FIZHI
      _RL snowfallin(idim1:idim2,jdim1:jdim2,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 91 DO_FIZHI
      _RL duphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 92 DO_FIZHI
      _RL dvphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 93 DO_FIZHI
      _RL dthphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)
./pkg/fizhi/do_fizhi.F 94 DO_FIZHI
      _RL dsphy(idim1:idim2,jdim1:jdim2,Nrphin,Nsxin,Nsyin)