Symbol Description Uses
nr 911


File Line number Procedure Code
./pkg/fizhi/step_fizhi_corr.F 89 STEP_FIZHI_CORR 
         if(Lbotij.lt.nr+1)
./pkg/grdchk/grdchk.h 109 NO PROCEDURE 
      _RL     grdchk_maskxz(1-olx:snx+olx,nr,nsx,nsy,nobcs)
./pkg/grdchk/grdchk.h 110 NO PROCEDURE 
      _RL     grdchk_maskyz(1-oly:sny+oly,nr,nsx,nsy,nobcs)
./pkg/grdchk/grdchk.h 65 NO PROCEDURE 
      integer iwetsum(nsx,nsy,0:nr)
./pkg/grdchk/grdchk.h 92 NO PROCEDURE 
      integer nwettile( nsx,nsy,nr,nobcs )
./pkg/grdchk/grdchk_get_obcs_mask.F 102 GRDCHK_GET_OBCS_MASK 
               do k = 1,nr
./pkg/grdchk/grdchk_get_obcs_mask.F 125 GRDCHK_GET_OBCS_MASK 
               do k = 1,nr
./pkg/grdchk/grdchk_get_obcs_mask.F 148 GRDCHK_GET_OBCS_MASK 
               do k = 1,nr
./pkg/grdchk/grdchk_get_obcs_mask.F 79 GRDCHK_GET_OBCS_MASK 
               do k = 1,nr
./pkg/grdchk/grdchk_main.F 129 GRDCHK_MAIN 
      _RL tmpplot1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/grdchk/grdchk_main.F 130 GRDCHK_MAIN 
      _RL tmpplot2(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/grdchk/grdchk_main.F 131 GRDCHK_MAIN 
      _RL tmpplot3(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/grdchk/grdchk_main.F 173 GRDCHK_MAIN 
            do k = 1, nr
./pkg/mdsio/mdsio_read_whalos.F 104 MDS_READ_WHALOS 
      length3d=length2d*nr
./pkg/mdsio/mdsio_write_whalos.F 106 MDS_WRITE_WHALOS 
      length3d=length2d*nr
./pkg/profiles/profiles_interp.F 148 PROFILES_INTERP 
       do k=1,nr
./pkg/profiles/profiles_interp.F 245 PROFILES_INTERP 
       do k=1,nr
./pkg/profiles/profiles_interp.F 262 PROFILES_INTERP 
        elseif (prof_depth(file_cur,kk,bi,bj).GE.-rC(nr)) then
./pkg/profiles/profiles_interp.F 264 PROFILES_INTERP 
     &    (-rC(nr)+drC(nr)/2) ) then
./pkg/profiles/profiles_interp.F 265 PROFILES_INTERP 
            traj_cur_out(kk)=traj_cur(nr)
./pkg/profiles/profiles_interp.F 266 PROFILES_INTERP 
            prof_mask1D_cur(kk,bi,bj)=mask_cur(nr)
./pkg/profiles/profiles_interp.F 271 PROFILES_INTERP 
          do k=1,nr-1
./pkg/profiles/profiles_interp_gg.F 130 PROFILES_INTERP_GG 
        elseif (prof_depth(file_cur,kk,bi,bj).GE.-rC(nr)) then
./pkg/profiles/profiles_interp_gg.F 132 PROFILES_INTERP_GG 
     &    (-rC(nr)+drC(nr)/2) ) then
./pkg/profiles/profiles_interp_gg.F 133 PROFILES_INTERP_GG 
            traj_cur_out(kk)=traj_cur(nr)
./pkg/profiles/profiles_interp_gg.F 134 PROFILES_INTERP_GG 
            prof_mask1D_cur(kk,bi,bj)=mask_cur(nr)
./pkg/profiles/profiles_interp_gg.F 139 PROFILES_INTERP_GG 
          do k=1,nr-1
./pkg/profiles/profiles_interp_gg.F 68 PROFILES_INTERP_GG 
       do k=1,nr
./pkg/profiles/profiles_interp_mean.F 148 PROFILES_INTERP_MEAN 
       do k=1,nr
./pkg/profiles/profiles_interp_mean.F 191 PROFILES_INTERP_MEAN 
       do k=1,nr
./pkg/profiles/profiles_interp_mean.F 208 PROFILES_INTERP_MEAN 
        elseif (prof_depth(file_cur,kk,bi,bj).GE.-rC(nr)) then
./pkg/profiles/profiles_interp_mean.F 210 PROFILES_INTERP_MEAN 
     &    (-rC(nr)+drC(nr)/2) ) then
./pkg/profiles/profiles_interp_mean.F 211 PROFILES_INTERP_MEAN 
            traj_cur_out(kk)=traj_cur(nr)
./pkg/profiles/profiles_interp_mean.F 212 PROFILES_INTERP_MEAN 
            prof_mask1D_cur(kk,bi,bj)=mask_cur(nr)
./pkg/profiles/profiles_interp_mean.F 217 PROFILES_INTERP_MEAN 
          do k=1,nr-1
./pkg/profiles/profiles_interp_mean_gg.F 109 PROFILES_INTERP_MEAN_GG 
        elseif (prof_depth(file_cur,kk,bi,bj).GE.-rC(nr)) then
./pkg/profiles/profiles_interp_mean_gg.F 111 PROFILES_INTERP_MEAN_GG 
     &    (-rC(nr)+drC(nr)/2) ) then
./pkg/profiles/profiles_interp_mean_gg.F 112 PROFILES_INTERP_MEAN_GG 
            traj_cur_out(kk)=traj_cur(nr)
./pkg/profiles/profiles_interp_mean_gg.F 113 PROFILES_INTERP_MEAN_GG 
            prof_mask1D_cur(kk,bi,bj)=mask_cur(nr)
./pkg/profiles/profiles_interp_mean_gg.F 118 PROFILES_INTERP_MEAN_GG 
          do k=1,nr-1
./pkg/profiles/profiles_interp_mean_gg.F 68 PROFILES_INTERP_MEAN_GG 
       do k=1,nr
./pkg/seaice/seaice_cost_areasst.F 68 SEAICE_COST_AREASST 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/seaice/seaice_cost_concentration.F 55 SEAICE_COST_CONCENTRATION 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/seaice/seaice_cost_sss.F 54 SEAICE_COST_SSS 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/seaice/seaice_cost_sst.F 52 SEAICE_COST_SST 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/smooth/smooth_diff3d.F 41 SMOOTH_DIFF3D 
      _RL dTtracerLev_bak(nr)
./verification/OpenAD/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/OpenAD/code_ad_singlelayer/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/OpenAD/code_oad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/OpenAD/code_oad_all/ctrl_pack.F 196 CTRL_PACK 
          write(cunit) (nWetcGlobal(k), k=1,nr)
./verification/OpenAD/code_oad_all/ctrl_pack.F 197 CTRL_PACK 
          write(cunit) (nWetsGlobal(k), k=1,nr)
./verification/OpenAD/code_oad_all/ctrl_pack.F 198 CTRL_PACK 
          write(cunit) (nWetwGlobal(k), k=1,nr)
./verification/OpenAD/code_oad_all/ctrl_pack.F 200 CTRL_PACK 
          write(cunit) (nWetvGlobal(k), k=1,nr)
./verification/OpenAD/code_oad_all/ctrl_pack.F 204 CTRL_PACK 
          write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./verification/OpenAD/code_oad_all/ctrl_pack.F 207 CTRL_PACK 
          write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./verification/OpenAD/code_oad_all/ctrl_pack.F 210 CTRL_PACK 
          write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./verification/OpenAD/code_oad_all/ctrl_pack.F 213 CTRL_PACK 
          write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./verification/OpenAD/code_oad_all/grdchk_main.F 129 GRDCHK_MAIN 
      _RL tmpplot1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/OpenAD/code_oad_all/grdchk_main.F 130 GRDCHK_MAIN 
      _RL tmpplot2(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/OpenAD/code_oad_all/grdchk_main.F 131 GRDCHK_MAIN 
      _RL tmpplot3(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/OpenAD/code_oad_all/grdchk_main.F 172 GRDCHK_MAIN 
            do k = 1, nr
./verification/OpenAD/code_oad_all/openad_dumpAdjoint.F 84 OPENAD_DUMPADJOINT 
      double precision foo5(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/OpenAD/code_oad_all/the_model_main.F 498 THE_MODEL_MAIN 
      _RL foo(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/OpenAD/code_oad_all/the_model_main.F 635 THE_MODEL_MAIN 
	  do i3=1,nr
./verification/bottom_ctrl_5x5/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/dome/code/obcs_calc.F 45 OBCS_CALC 
      _RL z(nr)
./verification/dome/code/obcs_calc.F 76 OBCS_CALC 
      do j=2,nr
./verification/front_relax/code_ad/adcommon.h 21 NO PROCEDURE 
      _RL adgs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 22 NO PROCEDURE 
      _RL adgsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 23 NO PROCEDURE 
      _RL adgt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 24 NO PROCEDURE 
      _RL adgtnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 25 NO PROCEDURE 
      _RL adgu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 26 NO PROCEDURE 
      _RL adgunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 27 NO PROCEDURE 
      _RL adgv(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 28 NO PROCEDURE 
      _RL adgvnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 29 NO PROCEDURE 
      _RL adsalt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 30 NO PROCEDURE 
      _RL adtheta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 31 NO PROCEDURE 
      _RL aduvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 32 NO PROCEDURE 
      _RL advvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 33 NO PROCEDURE 
      _RL adwvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 41 NO PROCEDURE 
      _RL aduveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 42 NO PROCEDURE 
      _RL advveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 44 NO PROCEDURE 
      _RL adunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 45 NO PROCEDURE 
      _RL advnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 46 NO PROCEDURE 
      _RL adgucd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 47 NO PROCEDURE 
      _RL adgvcd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 62 NO PROCEDURE 
      _RL adgtr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 63 NO PROCEDURE 
      _RL adgtr1nm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 64 NO PROCEDURE 
      _RL adtr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 70 NO PROCEDURE 
      _RL addiffkr(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/adcommon.h 76 NO PROCEDURE 
      _RL adkapgm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 21 NO PROCEDURE 
      _RL g_gs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 22 NO PROCEDURE 
      _RL g_gsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 23 NO PROCEDURE 
      _RL g_gt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 24 NO PROCEDURE 
      _RL g_gtnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 25 NO PROCEDURE 
      _RL g_gu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 26 NO PROCEDURE 
      _RL g_gunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 27 NO PROCEDURE 
      _RL g_gv(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 28 NO PROCEDURE 
      _RL g_gvnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 29 NO PROCEDURE 
      _RL g_salt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 30 NO PROCEDURE 
      _RL g_theta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 31 NO PROCEDURE 
      _RL g_uvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 32 NO PROCEDURE 
      _RL g_vvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 33 NO PROCEDURE 
      _RL g_wvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 41 NO PROCEDURE 
      _RL g_uveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 42 NO PROCEDURE 
      _RL g_vveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 44 NO PROCEDURE 
      _RL g_unm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 45 NO PROCEDURE 
      _RL g_vnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 46 NO PROCEDURE 
      _RL g_gucd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 47 NO PROCEDURE 
      _RL g_gvcd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 62 NO PROCEDURE 
      _RL g_gtr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 63 NO PROCEDURE 
      _RL g_gtr1nm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 64 NO PROCEDURE 
      _RL g_tr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 70 NO PROCEDURE 
      _RL g_diffkr(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/g_common.h 76 NO PROCEDURE 
      _RL g_kapgm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/front_relax/code_ad/tamc.h 55 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global1x1_tot/code/ecco_cost_weights.F 100 ECCO_COST_WEIGHTS 
      do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 1126 ECCO_COST_WEIGHTS 
          do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 1142 ECCO_COST_WEIGHTS 
            do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 249 ECCO_COST_WEIGHTS 
        do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 279 ECCO_COST_WEIGHTS 
          do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 285 ECCO_COST_WEIGHTS 
          do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 320 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 338 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 359 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 377 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 402 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 422 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 445 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 465 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code/ecco_cost_weights.F 61 ECCO_COST_WEIGHTS 
      _RL wti(nr)
./verification/global1x1_tot/code/ecco_cost_weights.F 62 ECCO_COST_WEIGHTS 
      _RL wsi(nr)
./verification/global1x1_tot/code/ecco_cost_weights.F 63 ECCO_COST_WEIGHTS 
      _RL wui(nr)
./verification/global1x1_tot/code/ecco_cost_weights.F 64 ECCO_COST_WEIGHTS 
      _RL wvi(nr)
./verification/global1x1_tot/code/tamc.h 55 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global1x1_tot/code_seaice_adj/tamc.h 53 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 1119 ECCO_COST_WEIGHTS 
          do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 1135 ECCO_COST_WEIGHTS 
            do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 247 ECCO_COST_WEIGHTS 
        do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 277 ECCO_COST_WEIGHTS 
          do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 283 ECCO_COST_WEIGHTS 
          do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 318 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 336 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 357 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 375 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 400 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 420 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 443 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 463 ECCO_COST_WEIGHTS 
           do k = 1,nr
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 60 ECCO_COST_WEIGHTS 
      _RL wti(nr)
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 61 ECCO_COST_WEIGHTS 
      _RL wsi(nr)
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 62 ECCO_COST_WEIGHTS 
      _RL wui(nr)
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 63 ECCO_COST_WEIGHTS 
      _RL wvi(nr)
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 99 ECCO_COST_WEIGHTS 
      do k = 1,nr
./verification/global1x1_tot/code_taueddy/tamc.h 53 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global2x2_tot/code/tamc.h 55 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global_ocean.90x40x15/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global_ocean.90x40x15/code_ad_nlfs/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global_ocean.90x40x15/code_ad_vecinv/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global_ocean.cs32x15/code_ad/cost_test.F 84 COST_TEST 
       do k=1,nr
./verification/global_ocean.cs32x15/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global_ocean_ebm/code_ad/adcommon.h 22 NO PROCEDURE 
      _RL adgs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 23 NO PROCEDURE 
      _RL adgsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 24 NO PROCEDURE 
      _RL adgt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 25 NO PROCEDURE 
      _RL adgtnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 26 NO PROCEDURE 
      _RL adgu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 27 NO PROCEDURE 
      _RL adgunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 28 NO PROCEDURE 
      _RL adgv(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 29 NO PROCEDURE 
      _RL adgvnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 30 NO PROCEDURE 
      _RL adsalt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 31 NO PROCEDURE 
      _RL adtheta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 32 NO PROCEDURE 
      _RL aduvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 33 NO PROCEDURE 
      _RL advvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 34 NO PROCEDURE 
      _RL adwvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 42 NO PROCEDURE 
      _RL aduveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 43 NO PROCEDURE 
      _RL advveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 45 NO PROCEDURE 
      _RL adunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 46 NO PROCEDURE 
      _RL advnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 47 NO PROCEDURE 
      _RL adgucd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 48 NO PROCEDURE 
      _RL adgvcd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 63 NO PROCEDURE 
      _RL adgtr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 64 NO PROCEDURE 
      _RL adgtr1nm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 65 NO PROCEDURE 
      _RL adtr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 71 NO PROCEDURE 
      _RL addiffkr(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/adcommon.h 77 NO PROCEDURE 
      _RL adkapgm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 21 NO PROCEDURE 
      _RL g_gs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 22 NO PROCEDURE 
      _RL g_gsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 23 NO PROCEDURE 
      _RL g_gt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 24 NO PROCEDURE 
      _RL g_gtnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 25 NO PROCEDURE 
      _RL g_gu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 26 NO PROCEDURE 
      _RL g_gunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 27 NO PROCEDURE 
      _RL g_gv(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 28 NO PROCEDURE 
      _RL g_gvnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 29 NO PROCEDURE 
      _RL g_salt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 30 NO PROCEDURE 
      _RL g_theta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 31 NO PROCEDURE 
      _RL g_uvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 32 NO PROCEDURE 
      _RL g_vvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 33 NO PROCEDURE 
      _RL g_wvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 41 NO PROCEDURE 
      _RL g_uveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 42 NO PROCEDURE 
      _RL g_vveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 44 NO PROCEDURE 
      _RL g_unm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 45 NO PROCEDURE 
      _RL g_vnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 46 NO PROCEDURE 
      _RL g_gucd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 47 NO PROCEDURE 
      _RL g_gvcd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 62 NO PROCEDURE 
      _RL g_gtr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 63 NO PROCEDURE 
      _RL g_gtr1nm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 64 NO PROCEDURE 
      _RL g_tr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 70 NO PROCEDURE 
      _RL g_diffkr(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/g_common.h 76 NO PROCEDURE 
      _RL g_kapgm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/global_ocean_ebm/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/hs94.1x64x5/code_ad/adcommon.h 19 NO PROCEDURE 
      _RL adgs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 20 NO PROCEDURE 
      _RL adgsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 21 NO PROCEDURE 
      _RL adgt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 22 NO PROCEDURE 
      _RL adgtnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 23 NO PROCEDURE 
      _RL adgu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 24 NO PROCEDURE 
      _RL adgunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 25 NO PROCEDURE 
      _RL adgv(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 26 NO PROCEDURE 
      _RL adgvnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 27 NO PROCEDURE 
      _RL adsalt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 28 NO PROCEDURE 
      _RL adtheta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 29 NO PROCEDURE 
      _RL aduvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 30 NO PROCEDURE 
      _RL advvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/adcommon.h 31 NO PROCEDURE 
      _RL adwvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/lab_sea/code_ad/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/lab_sea/code_ad_seaice_ocean/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/lab_sea/code_ad_seaice_only/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/natl_box_adjoint/code/tamc.h 57 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/natl_box_adjoint/code_bulk/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/natl_box_adjoint/code_pack/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/natl_box_adjoint/code_seaice/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/offline_exf_seaice/code_ad/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/tutorial_dic_adjoffline/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/tutorial_global_oce_biogeo/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/tutorial_global_oce_optim/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/tutorial_tracer_adjsens/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./model/src/rotate_uv2en.F 249 ROTATE_UV2EN_RS 
      if ( (kSize.NE.1).AND.(kSize.NE.nr)
./model/src/rotate_uv2en.F 262 ROTATE_UV2EN_RS 
          kk=nr
./model/src/rotate_uv2en.F 68 ROTATE_UV2EN_RL 
      if ( (kSize.NE.1).AND.(kSize.NE.nr)
./model/src/rotate_uv2en.F 81 ROTATE_UV2EN_RL 
          kk=nr
./optim/optim_readdata.F 151 OPTIM_READDATA 
      read( funit ) (nWetcGlobal(k), k=1,nr)
./optim/optim_readdata.F 152 OPTIM_READDATA 
      read( funit ) (nWetsGlobal(k), k=1,nr)
./optim/optim_readdata.F 153 OPTIM_READDATA 
      read( funit ) (nWetwGlobal(k), k=1,nr)
./optim/optim_readdata.F 155 OPTIM_READDATA 
      read( funit ) (nWetvGlobal(k), k=1,nr)
./optim/optim_readdata.F 160 OPTIM_READDATA 
      read( funit ) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_readdata.F 163 OPTIM_READDATA 
      read( funit ) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_readdata.F 166 OPTIM_READDATA 
      read( funit ) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_readdata.F 169 OPTIM_READDATA 
      read( funit ) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_readdata.F 193 OPTIM_READDATA 
     &        (nWetcGlobal(k),  k=1,nr)
./optim/optim_readdata.F 195 OPTIM_READDATA 
     &        (nWetsGlobal(k),  k=1,nr)
./optim/optim_readdata.F 197 OPTIM_READDATA 
     &        (nWetwGlobal(k),  k=1,nr)
./optim/optim_readdata.F 199 OPTIM_READDATA 
     &        (nWetvGlobal(k),  k=1,nr)
./optim/optim_writedata.F 117 OPTIM_WRITEDATA 
     &        (nWetcGlobal(k), k=1,nr)
./optim/optim_writedata.F 119 OPTIM_WRITEDATA 
     &        (nWetsGlobal(k), k=1,nr)
./optim/optim_writedata.F 121 OPTIM_WRITEDATA 
     &        (nWetwGlobal(k), k=1,nr)
./optim/optim_writedata.F 123 OPTIM_WRITEDATA 
     &        (nWetvGlobal(k), k=1,nr)
./optim/optim_writedata.F 148 OPTIM_WRITEDATA 
      write( funit ) (nWetcGlobal(k), k=1,nr)
./optim/optim_writedata.F 149 OPTIM_WRITEDATA 
      write( funit ) (nWetsGlobal(k), k=1,nr)
./optim/optim_writedata.F 150 OPTIM_WRITEDATA 
      write( funit ) (nWetwGlobal(k), k=1,nr)
./optim/optim_writedata.F 152 OPTIM_WRITEDATA 
      write( funit ) (nWetvGlobal(k), k=1,nr)
./optim/optim_writedata.F 157 OPTIM_WRITEDATA 
          write(funit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_writedata.F 160 OPTIM_WRITEDATA 
          write(funit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_writedata.F 163 OPTIM_WRITEDATA 
          write(funit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_writedata.F 166 OPTIM_WRITEDATA 
          write(funit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_bypassad.F 113 ADMTLM_BYPASSAD 
          do k = 1, nr
./pkg/admtlm/admtlm_bypassad.F 131 ADMTLM_BYPASSAD 
          do k = 1, nr
./pkg/admtlm/admtlm_bypassad.F 149 ADMTLM_BYPASSAD 
          do k = 1, nr
./pkg/admtlm/admtlm_bypassad.F 167 ADMTLM_BYPASSAD 
          do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 222 ADMTLM_DSVD2MODEL 
          read(cunit) (filenWetcGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 223 ADMTLM_DSVD2MODEL 
          read(cunit) (filenWetsGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 224 ADMTLM_DSVD2MODEL 
          read(cunit) (filenWetwGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 226 ADMTLM_DSVD2MODEL 
          read(cunit) (filenWetvGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 232 ADMTLM_DSVD2MODEL 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 236 ADMTLM_DSVD2MODEL 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 240 ADMTLM_DSVD2MODEL 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 244 ADMTLM_DSVD2MODEL 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 266 ADMTLM_DSVD2MODEL 
          do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 280 ADMTLM_DSVD2MODEL 
         do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 292 ADMTLM_DSVD2MODEL 
         do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 304 ADMTLM_DSVD2MODEL 
         do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 316 ADMTLM_DSVD2MODEL 
         do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 88 ADMTLM_DSVD2MODEL 
      integer        filenWetobcsnGlo(nr,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 91 ADMTLM_DSVD2MODEL 
      integer        filenWetobcssGlo(nr,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 94 ADMTLM_DSVD2MODEL 
      integer        filenWetobcswGlo(nr,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 97 ADMTLM_DSVD2MODEL 
      integer        filenWetobcseGlo(nr,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 214 ADMTLM_MODEL2DSVD 
          write(cunit) (nWetcGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 215 ADMTLM_MODEL2DSVD 
          write(cunit) (nWetsGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 216 ADMTLM_MODEL2DSVD 
          write(cunit) (nWetwGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 218 ADMTLM_MODEL2DSVD 
          write(cunit) (nWetvGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 222 ADMTLM_MODEL2DSVD 
          write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 225 ADMTLM_MODEL2DSVD 
          write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 228 ADMTLM_MODEL2DSVD 
          write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 231 ADMTLM_MODEL2DSVD 
          write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/autodiff/active_file.F 152 ACTIVE_READ_XYZ 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file.F 167 ACTIVE_READ_XYZ 
      mynr = nr
./pkg/autodiff/active_file.F 237 ACTIVE_READ_XZ 
      mynr = nr
./pkg/autodiff/active_file.F 307 ACTIVE_READ_YZ 
      mynr = nr
./pkg/autodiff/active_file.F 417 ACTIVE_WRITE_XYZ 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file.F 431 ACTIVE_WRITE_XYZ 
      mynr = nr
./pkg/autodiff/active_file.F 493 ACTIVE_WRITE_XZ 
      mynr = nr
./pkg/autodiff/active_file.F 556 ACTIVE_WRITE_YZ 
      mynr = nr
./pkg/autodiff/active_file.F 690 ACTIVE_READ_TILE_XYZ 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr)
./pkg/autodiff/active_file.F 705 ACTIVE_READ_TILE_XYZ 
      mynr = nr
./pkg/autodiff/active_file.F 843 ACTIVE_WRITE_TILE_XYZ 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr)
./pkg/autodiff/active_file.F 857 ACTIVE_WRITE_TILE_XYZ 
      mynr = nr
./pkg/autodiff/active_file_ad.F 175 ADACTIVE_READ_XYZ 
      _RL     adactive_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_ad.F 195 ADACTIVE_READ_XYZ 
      mynr   = nr
./pkg/autodiff/active_file_ad.F 262 ADACTIVE_READ_XZ 
      _RL     adactive_var(1-olx:snx+olx,nr,nsx,nsy)
./pkg/autodiff/active_file_ad.F 282 ADACTIVE_READ_XZ 
      mynr   = nr
./pkg/autodiff/active_file_ad.F 349 ADACTIVE_READ_YZ 
      _RL     adactive_var(1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_ad.F 369 ADACTIVE_READ_YZ 
      mynr   = nr
./pkg/autodiff/active_file_ad.F 515 ADACTIVE_WRITE_XYZ 
      _RL     adactive_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_ad.F 535 ADACTIVE_WRITE_XYZ 
      mynr   = nr
./pkg/autodiff/active_file_ad.F 598 ADACTIVE_WRITE_XZ 
      _RL     adactive_var(1-olx:snx+olx,nr,nsx,nsy)
./pkg/autodiff/active_file_ad.F 618 ADACTIVE_WRITE_XZ 
      mynr   = nr
./pkg/autodiff/active_file_ad.F 682 ADACTIVE_WRITE_YZ 
      _RL     adactive_var(1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_ad.F 702 ADACTIVE_WRITE_YZ 
      mynr   = nr
./pkg/autodiff/active_file_control.F 580 ACTIVE_READ_TILE_RL 
     &                     (  bi-1 )*(snx+2*olx)*(sny+2*oly)*nr +
./pkg/autodiff/active_file_control.F 581 ACTIVE_READ_TILE_RL 
     &                     (  bj-1 )*(snx+2*olx)*(sny+2*oly)*nr*nsx
./pkg/autodiff/active_file_control.F 646 ACTIVE_READ_TILE_RL 
     &                   (  bi-1 )*(snx+2*olx)*(sny+2*oly)*nr +
./pkg/autodiff/active_file_control.F 647 ACTIVE_READ_TILE_RL 
     &                   (  bj-1 )*(snx+2*olx)*(sny+2*oly)*nr*nsx
./pkg/autodiff/active_file_control.F 668 ACTIVE_READ_TILE_RL 
        do k = 1,nr
./pkg/autodiff/active_file_control.F 675 ACTIVE_READ_TILE_RL 
     &                   (  bi-1 )*(snx+2*olx)*(sny+2*oly)*nr +
./pkg/autodiff/active_file_control.F 676 ACTIVE_READ_TILE_RL 
     &                   (  bj-1 )*(snx+2*olx)*(sny+2*oly)*nr*nsx
./pkg/autodiff/active_file_control.F 715 ACTIVE_READ_TILE_RL 
     &                     (  bi-1 )*(snx+2*olx)*(sny+2*oly)*nr +
./pkg/autodiff/active_file_control.F 716 ACTIVE_READ_TILE_RL 
     &                     (  bj-1 )*(snx+2*olx)*(sny+2*oly)*nr*nsx
./pkg/autodiff/active_file_control.F 847 ACTIVE_WRITE_TILE_RL 
     &                   (  bi-1 )*(snx+2*olx)*(sny+2*oly)*nr +
./pkg/autodiff/active_file_control.F 848 ACTIVE_WRITE_TILE_RL 
     &                   (  bj-1 )*(snx+2*olx)*(sny+2*oly)*nr*nsx
./pkg/autodiff/active_file_control.F 891 ACTIVE_WRITE_TILE_RL 
     &                   (  bi-1 )*(snx+2*olx)*(sny+2*oly)*nr +
./pkg/autodiff/active_file_control.F 892 ACTIVE_WRITE_TILE_RL 
     &                   (  bj-1 )*(snx+2*olx)*(sny+2*oly)*nr*nsx
./pkg/autodiff/active_file_control.F 929 ACTIVE_WRITE_TILE_RL 
     &                   (  bi-1 )*(snx+2*olx)*(sny+2*oly)*nr +
./pkg/autodiff/active_file_control.F 930 ACTIVE_WRITE_TILE_RL 
     &                   (  bj-1 )*(snx+2*olx)*(sny+2*oly)*nr*nsx
./pkg/autodiff/active_file_control_slice.F 352 ACTIVE_WRITE_XZ_RL 
              do k = 1,nr
./pkg/autodiff/active_file_g.F 169 G_ACTIVE_READ_XYZ 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_g.F 170 G_ACTIVE_READ_XYZ 
      _RL g_active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_g.F 189 G_ACTIVE_READ_XYZ 
      mynr = nr
./pkg/autodiff/active_file_g.F 275 G_ACTIVE_READ_XZ 
      mynr = nr
./pkg/autodiff/active_file_g.F 361 G_ACTIVE_READ_YZ 
      mynr = nr
./pkg/autodiff/active_file_g.F 500 G_ACTIVE_WRITE_XYZ 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_g.F 501 G_ACTIVE_WRITE_XYZ 
      _RL g_active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_g.F 520 G_ACTIVE_WRITE_XYZ 
      mynr = nr
./pkg/autodiff/active_file_g.F 600 G_ACTIVE_WRITE_XZ 
      mynr = nr
./pkg/autodiff/active_file_g.F 680 G_ACTIVE_WRITE_YZ 
      mynr = nr
./pkg/autodiff/active_file_g.F 823 G_ACTIVE_READ_TILE_XYZ 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr)
./pkg/autodiff/active_file_g.F 838 G_ACTIVE_READ_TILE_XYZ 
      mynr = nr
./pkg/autodiff/active_file_g.F 976 G_ACTIVE_WRITE_TILE_XYZ 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr)
./pkg/autodiff/active_file_g.F 990 G_ACTIVE_WRITE_TILE_XYZ 
      mynr = nr
./pkg/autodiff/active_file_loc.F 149 ACTIVE_READ_XYZ_LOC 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc.F 164 ACTIVE_READ_XYZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc.F 232 ACTIVE_READ_XZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc.F 300 ACTIVE_READ_YZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc.F 406 ACTIVE_WRITE_XYZ_LOC 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc.F 420 ACTIVE_WRITE_XYZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc.F 480 ACTIVE_WRITE_XZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc.F 541 ACTIVE_WRITE_YZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc_ad.F 175 ADACTIVE_READ_XYZ_LOC 
      _RL     adactive_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_ad.F 195 ADACTIVE_READ_XYZ_LOC 
      mynr   = nr
./pkg/autodiff/active_file_loc_ad.F 262 ADACTIVE_READ_XZ_LOC 
      _RL     adactive_var(1-olx:snx+olx,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_ad.F 282 ADACTIVE_READ_XZ_LOC 
      mynr   = nr
./pkg/autodiff/active_file_loc_ad.F 349 ADACTIVE_READ_YZ_LOC 
      _RL     adactive_var(1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_ad.F 369 ADACTIVE_READ_YZ_LOC 
      mynr   = nr
./pkg/autodiff/active_file_loc_ad.F 513 ADACTIVE_WRITE_XYZ_LOC 
      _RL     adactive_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_ad.F 533 ADACTIVE_WRITE_XYZ_LOC 
      mynr   = nr
./pkg/autodiff/active_file_loc_ad.F 596 ADACTIVE_WRITE_XZ_LOC 
      _RL     adactive_var(1-olx:snx+olx,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_ad.F 616 ADACTIVE_WRITE_XZ_LOC 
      mynr   = nr
./pkg/autodiff/active_file_loc_ad.F 679 ADACTIVE_WRITE_YZ_LOC 
      _RL     adactive_var(1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_ad.F 699 ADACTIVE_WRITE_YZ_LOC 
      mynr   = nr
./pkg/autodiff/active_file_loc_g.F 166 G_ACTIVE_READ_XYZ_LOC 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_g.F 167 G_ACTIVE_READ_XYZ_LOC 
      _RL g_active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_g.F 186 G_ACTIVE_READ_XYZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc_g.F 270 G_ACTIVE_READ_XZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc_g.F 354 G_ACTIVE_READ_YZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc_g.F 489 G_ACTIVE_WRITE_XYZ_LOC 
      _RL active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_g.F 490 G_ACTIVE_WRITE_XYZ_LOC 
      _RL g_active_var(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/active_file_loc_g.F 509 G_ACTIVE_WRITE_XYZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc_g.F 587 G_ACTIVE_WRITE_XZ_LOC 
      mynr = nr
./pkg/autodiff/active_file_loc_g.F 665 G_ACTIVE_WRITE_YZ_LOC 
      mynr = nr
./pkg/autodiff/adcommon.h 127 NO PROCEDURE 
      double precision adeddypsix(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,
./pkg/autodiff/adcommon.h 129 NO PROCEDURE 
      double precision adeddypsiy(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,
./pkg/autodiff/adcommon.h 181 NO PROCEDURE 
      _RL adggl90tke     (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 182 NO PROCEDURE 
      _RL adggl90diffkr  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 189 NO PROCEDURE 
      _RL adhfacc(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 190 NO PROCEDURE 
      _RL adhfacs(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 191 NO PROCEDURE 
      _RL adhfacw(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 192 NO PROCEDURE 
      _RL adrecip_hfacc(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 193 NO PROCEDURE 
      _RL adrecip_hfacs(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 194 NO PROCEDURE 
      _RL adrecip_hfacw(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 35 NO PROCEDURE 
      _RL adgs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 36 NO PROCEDURE 
      _RL adgt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 37 NO PROCEDURE 
      _RL adgu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 38 NO PROCEDURE 
      _RL adgv(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 39 NO PROCEDURE 
      _RL adsalt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 40 NO PROCEDURE 
      _RL adtheta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 41 NO PROCEDURE 
      _RL aduvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 42 NO PROCEDURE 
      _RL advvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 43 NO PROCEDURE 
      _RL adwvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 45 NO PROCEDURE 
      _RL adgtnm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/adcommon.h 46 NO PROCEDURE 
      _RL adgsnm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/adcommon.h 47 NO PROCEDURE 
      _RL adgunm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/adcommon.h 48 NO PROCEDURE 
      _RL adgvnm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/adcommon.h 50 NO PROCEDURE 
      _RL adgtnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 51 NO PROCEDURE 
      _RL adgsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 52 NO PROCEDURE 
      _RL adgunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 53 NO PROCEDURE 
      _RL adgvnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 65 NO PROCEDURE 
      _RL aduveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 66 NO PROCEDURE 
      _RL advveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 68 NO PROCEDURE 
      _RL adunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 69 NO PROCEDURE 
      _RL advnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 34 NO PROCEDURE 
      _RL g_gs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 35 NO PROCEDURE 
      _RL g_gt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 36 NO PROCEDURE 
      _RL g_gu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 37 NO PROCEDURE 
      _RL g_gv(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 38 NO PROCEDURE 
      _RL g_salt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 39 NO PROCEDURE 
      _RL g_theta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 40 NO PROCEDURE 
      _RL g_uvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 41 NO PROCEDURE 
      _RL g_vvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 42 NO PROCEDURE 
      _RL g_wvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 44 NO PROCEDURE 
      _RL g_gtnm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/g_common.h 45 NO PROCEDURE 
      _RL g_gsnm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/g_common.h 46 NO PROCEDURE 
      _RL g_gunm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/g_common.h 47 NO PROCEDURE 
      _RL g_gvnm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/g_common.h 49 NO PROCEDURE 
      _RL g_gtnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 50 NO PROCEDURE 
      _RL g_gsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 51 NO PROCEDURE 
      _RL g_gunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 52 NO PROCEDURE 
      _RL g_gvnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 64 NO PROCEDURE 
      _RL g_uveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 65 NO PROCEDURE 
      _RL g_vveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 67 NO PROCEDURE 
      _RL g_unm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 68 NO PROCEDURE 
      _RL g_vnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 75 NO PROCEDURE 
      _RL g_totphihyd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/tamc.h 64 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./pkg/cost/cost_init_varia.F 73 COST_INIT_VARIA 
          do k=1,nr
./pkg/cost/cost_state_final.F 35 COST_STATE_FINAL 
          DO k=1,nr
./pkg/ctrl/adctrl_bound.F 60 ADCTRL_BOUND_3D 
          do k = 1,nr
./pkg/ctrl/ctrl.h 114 NO PROCEDURE 
      integer nwetctile     ( nsx,nsy,nr )
./pkg/ctrl/ctrl.h 115 NO PROCEDURE 
      integer nwetstile     ( nsx,nsy,nr )
./pkg/ctrl/ctrl.h 116 NO PROCEDURE 
      integer nwetwtile     ( nsx,nsy,nr )
./pkg/ctrl/ctrl.h 117 NO PROCEDURE 
      integer nwetvtile     ( nsx,nsy,nr )
./pkg/ctrl/ctrl.h 118 NO PROCEDURE 
      integer nwetcglobal     ( nr )
./pkg/ctrl/ctrl.h 119 NO PROCEDURE 
      integer nwetsglobal     ( nr )
./pkg/ctrl/ctrl.h 120 NO PROCEDURE 
      integer nwetwglobal     ( nr )
./pkg/ctrl/ctrl.h 121 NO PROCEDURE 
      integer nwetvglobal     ( nr )
./pkg/ctrl/ctrl.h 128 NO PROCEDURE 
      integer nwetobcsn     ( nsx,nsy,nr,nobcs )
./pkg/ctrl/ctrl.h 129 NO PROCEDURE 
      integer nwetobcsnglo  ( nr,nobcs )
./pkg/ctrl/ctrl.h 135 NO PROCEDURE 
      integer nwetobcss     ( nsx,nsy,nr,nobcs )
./pkg/ctrl/ctrl.h 136 NO PROCEDURE 
      integer nwetobcssglo  ( nr,nobcs )
./pkg/ctrl/ctrl.h 142 NO PROCEDURE 
      integer nwetobcsw     ( nsx,nsy,nr,nobcs )
./pkg/ctrl/ctrl.h 143 NO PROCEDURE 
      integer nwetobcswglo  ( nr,nobcs )
./pkg/ctrl/ctrl.h 149 NO PROCEDURE 
      integer nwetobcse     ( nsx,nsy,nr,nobcs )
./pkg/ctrl/ctrl.h 150 NO PROCEDURE 
      integer nwetobcseglo  ( nr,nobcs )
./pkg/ctrl/ctrl.h 191 NO PROCEDURE 
      integer        filenWetcGlobal(nr)
./pkg/ctrl/ctrl.h 192 NO PROCEDURE 
      integer        filenWetsGlobal(nr)
./pkg/ctrl/ctrl.h 193 NO PROCEDURE 
      integer        filenWetwGlobal(nr)
./pkg/ctrl/ctrl.h 194 NO PROCEDURE 
      integer        filenWetvGlobal(nr)
./pkg/ctrl/ctrl.h 215 NO PROCEDURE 
      _RL wunit     (nr,nsx,nsy)
./pkg/ctrl/ctrl.h 282 NO PROCEDURE 
     &    (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 297 NO PROCEDURE 
      _RL xx_theta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 298 NO PROCEDURE 
      _RL xx_salt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 299 NO PROCEDURE 
      _RL xx_uvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 300 NO PROCEDURE 
      _RL xx_vvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 303 NO PROCEDURE 
      _RL xx_diffkr(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 306 NO PROCEDURE 
      _RL xx_kapgm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 319 NO PROCEDURE 
      _RL tmpfldxz  (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 320 NO PROCEDURE 
      _RL tmpfldxz2 (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 321 NO PROCEDURE 
      _RL tmpfldyz  (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 322 NO PROCEDURE 
      _RL tmpfldyz2 (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_bound.F 38 CTRL_BOUND_3D 
          do k = 1,nr
./pkg/ctrl/ctrl_get_gen.F 47 CTRL_GET_GEN 
      _RL     genmask(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_getobcse.F 209 CTRL_GETOBCSE 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcse.F 224 CTRL_GETOBCSE 
                do k = 1,nr
./pkg/ctrl/ctrl_getobcse.F 236 CTRL_GETOBCSE 
                do k = 1,nr
./pkg/ctrl/ctrl_getobcse.F 327 CTRL_GETOBCSE 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcse.F 341 CTRL_GETOBCSE 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsn.F 225 CTRL_GETOBCSN 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsn.F 239 CTRL_GETOBCSN 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsn.F 251 CTRL_GETOBCSN 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsn.F 354 CTRL_GETOBCSN 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsn.F 369 CTRL_GETOBCSN 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcss.F 211 CTRL_GETOBCSS 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcss.F 225 CTRL_GETOBCSS 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcss.F 237 CTRL_GETOBCSS 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcss.F 330 CTRL_GETOBCSS 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcss.F 344 CTRL_GETOBCSS 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsw.F 209 CTRL_GETOBCSW 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsw.F 226 CTRL_GETOBCSW 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsw.F 238 CTRL_GETOBCSW 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsw.F 330 CTRL_GETOBCSW 
              do k = 1,nr
./pkg/ctrl/ctrl_getobcsw.F 344 CTRL_GETOBCSW 
              do k = 1,nr
./pkg/ctrl/ctrl_hfacc_ini.F 101 CTRL_HFACC_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_hfacc_ini.F 126 CTRL_HFACC_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_init.F 1050 CTRL_INIT 
     &       snx, sny, nr, 'c', '3d', mythid )
./pkg/ctrl/ctrl_init.F 175 CTRL_INIT 
     &     snx, sny, nr, 'c', '3d', mythid )
./pkg/ctrl/ctrl_init.F 184 CTRL_INIT 
     &     snx, sny, nr, 'c', '3d', mythid )
./pkg/ctrl/ctrl_init.F 481 CTRL_INIT 
     &       snx, 1, nr, 'm', 'xz', mythid )
./pkg/ctrl/ctrl_init.F 507 CTRL_INIT 
     &       snx, 1, nr, 'm', 'xz', mythid )
./pkg/ctrl/ctrl_init.F 533 CTRL_INIT 
     &       1, sny, nr, 'm', 'yz', mythid )
./pkg/ctrl/ctrl_init.F 559 CTRL_INIT 
     &       1, sny, nr, 'm', 'yz', mythid )
./pkg/ctrl/ctrl_init.F 568 CTRL_INIT 
     &       snx, sny, nr, 'c', '3d', mythid )
./pkg/ctrl/ctrl_init.F 576 CTRL_INIT 
     &       snx, sny, nr, 'c', '3d', mythid )
./pkg/ctrl/ctrl_init.F 584 CTRL_INIT 
     &       snx, sny, nr, 'c', '3d', mythid )
./pkg/ctrl/ctrl_init.F 672 CTRL_INIT 
     &       snx, sny, nr, 's', '3d', mythid )
./pkg/ctrl/ctrl_init.F 680 CTRL_INIT 
     &       snx, sny, nr, 'v', '3d', mythid )
./pkg/ctrl/ctrl_init.F 704 CTRL_INIT 
     &       snx, sny, nr, 'w', '3d', mythid )
./pkg/ctrl/ctrl_init.F 708 CTRL_INIT 
     &       snx, sny, nr, 's', '3d', mythid )
./pkg/ctrl/ctrl_init.F 716 CTRL_INIT 
     &       snx, sny, nr, 'w', '3d', mythid )
./pkg/ctrl/ctrl_init.F 724 CTRL_INIT 
     &       snx, sny, nr, 's', '3d', mythid )
./pkg/ctrl/ctrl_init.F 748 CTRL_INIT 
     &       snx, sny, nr, 'c', '3d', mythid )
./pkg/ctrl/ctrl_init_obcs_variables.F 112 CTRL_INIT_OBCS_VARIABLES 
            do k = 1,nr
./pkg/ctrl/ctrl_init_obcs_variables.F 67 CTRL_INIT_OBCS_VARIABLES 
            do k = 1,nr
./pkg/ctrl/ctrl_init_obcs_variables.F 82 CTRL_INIT_OBCS_VARIABLES 
            do k = 1,nr
./pkg/ctrl/ctrl_init_obcs_variables.F 97 CTRL_INIT_OBCS_VARIABLES 
            do k = 1,nr
./pkg/ctrl/ctrl_init_wet.F 104 CTRL_INIT_WET 
          do k = 1,nr
./pkg/ctrl/ctrl_init_wet.F 328 CTRL_INIT_WET 
     &     'ctrl-wet 13: global nvarlength for Nr =', nr, nvarlength
./pkg/ctrl/ctrl_init_wet.F 340 CTRL_INIT_WET 
      do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 390 CTRL_INIT_WET 
      do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 467 CTRL_INIT_WET 
        do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 479 CTRL_INIT_WET 
        do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 491 CTRL_INIT_WET 
        do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 503 CTRL_INIT_WET 
        do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 533 CTRL_INIT_WET 
            do k=1, nr
./pkg/ctrl/ctrl_init_wet.F 68 CTRL_INIT_WET 
          do k = 1,nr
./pkg/ctrl/ctrl_init_wet.F 81 CTRL_INIT_WET 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 104 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 144 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 181 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 247 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 277 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 307 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 331 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 358 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 406 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 425 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 447 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 474 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_ecco.F 125 CTRL_MAP_INI_ECCO 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_gen.F 116 CTRL_MAP_INI_GEN3D 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_gen.F 143 CTRL_MAP_INI_GEN3D 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_gen.F 171 CTRL_MAP_INI_GEN3D 
     & nr, paramFld3d, 1, optimcycle, mythid)
./pkg/ctrl/ctrl_map_ini_gen.F 227 CTRL_MAP_INI_GEN2D 
      _RL maskFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_gen.F 52 CTRL_MAP_INI_GEN3D 
      _RL wFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_gen.F 53 CTRL_MAP_INI_GEN3D 
      _RL xxFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_gen.F 54 CTRL_MAP_INI_GEN3D 
      _RL paramFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_gen.F 55 CTRL_MAP_INI_GEN3D 
      _RL maskFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_mask_set_xz.F 101 CTRL_MASK_SET_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_xz.F 133 CTRL_MASK_SET_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_xz.F 38 CTRL_MASK_SET_XZ 
      integer nwetobcs (nsx,nsy,nr,nobcs)
./pkg/ctrl/ctrl_mask_set_xz.F 61 CTRL_MASK_SET_XZ 
      _RL     maskxz   (1-olx:snx+olx,nr,nsx,nsy,nobcs)
./pkg/ctrl/ctrl_mask_set_xz.F 62 CTRL_MASK_SET_XZ 
      _RL     gg       (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ctrl/ctrl_mask_set_xz.F 89 CTRL_MASK_SET_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_yz.F 102 CTRL_MASK_SET_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_yz.F 134 CTRL_MASK_SET_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_yz.F 38 CTRL_MASK_SET_YZ 
      integer nwetobcs (nsx,nsy,nr,nobcs)
./pkg/ctrl/ctrl_mask_set_yz.F 61 CTRL_MASK_SET_YZ 
      _RL     maskyz   (1-oly:sny+oly,nr,nsx,nsy,nobcs)
./pkg/ctrl/ctrl_mask_set_yz.F 62 CTRL_MASK_SET_YZ 
      _RL     gg       (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_mask_set_yz.F 90 CTRL_MASK_SET_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_pack.F 199 CTRL_PACK 
          write(cunit) (nWetcGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 200 CTRL_PACK 
          write(cunit) (nWetsGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 201 CTRL_PACK 
          write(cunit) (nWetwGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 203 CTRL_PACK 
          write(cunit) (nWetvGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 207 CTRL_PACK 
          write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 210 CTRL_PACK 
          write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 213 CTRL_PACK 
          write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 216 CTRL_PACK 
          write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_set_globfld_xy.F 55 CTRL_SET_GLOBFLD_XY 
      _RL globfld3d(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nr,nSx,nSy)
./pkg/ctrl/ctrl_set_globfld_xy.F 83 CTRL_SET_GLOBFLD_XY 
            do k = 1,nr
./pkg/ctrl/ctrl_set_globfld_xyz.F 49 CTRL_SET_GLOBFLD_XYZ 
      _RL globfld3d(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nr,nSx,nSy)
./pkg/ctrl/ctrl_set_globfld_xyz.F 67 CTRL_SET_GLOBFLD_XYZ 
            do k = 1,nr
./pkg/ctrl/ctrl_set_globfld_xz.F 54 CTRL_SET_GLOBFLD_XZ 
      _RL globfld3d(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nr,nSx,nSy)
./pkg/ctrl/ctrl_set_globfld_xz.F 55 CTRL_SET_GLOBFLD_XZ 
      _RL globfldxz(1-oLx:sNx+oLx,nr,nSx,nSy)
./pkg/ctrl/ctrl_set_globfld_xz.F 73 CTRL_SET_GLOBFLD_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_set_globfld_xz.F 83 CTRL_SET_GLOBFLD_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_set_globfld_yz.F 54 CTRL_SET_GLOBFLD_YZ 
      _RL globfld3d(1-oLx:sNx+oLx,1-oLy:sNy+oLy,nr,nSx,nSy)
./pkg/ctrl/ctrl_set_globfld_yz.F 55 CTRL_SET_GLOBFLD_YZ 
      _RL globfldyz(1-oLy:sNy+oLy,nr,nSx,nSy)
./pkg/ctrl/ctrl_set_globfld_yz.F 74 CTRL_SET_GLOBFLD_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_set_globfld_yz.F 84 CTRL_SET_GLOBFLD_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xy.F 164 CTRL_SET_PACK_XY 
         irectrue = (irec-1)*nr + k
./pkg/ctrl/ctrl_set_pack_xy.F 63 CTRL_SET_PACK_XY 
      _RL     globmsk  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xy.F 64 CTRL_SET_PACK_XY 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xy.F 95 CTRL_SET_PACK_XY 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xyz.F 104 CTRL_SET_PACK_XYZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xyz.F 178 CTRL_SET_PACK_XYZ 
         do k = 1, nr
./pkg/ctrl/ctrl_set_pack_xyz.F 179 CTRL_SET_PACK_XYZ 
         irectrue = (irec-1)*nr + k
./pkg/ctrl/ctrl_set_pack_xyz.F 406 CTRL_SET_PACK_XYZ 
      do k = 1, nr
./pkg/ctrl/ctrl_set_pack_xyz.F 43 CTRL_SET_PACK_XYZ 
      _RL     weightfld( nr,nsx,nsy )
./pkg/ctrl/ctrl_set_pack_xyz.F 64 CTRL_SET_PACK_XYZ 
      _RL     globmsk  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xyz.F 65 CTRL_SET_PACK_XYZ 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xyz.F 67 CTRL_SET_PACK_XYZ 
      _RL   weightfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xz.F 102 CTRL_SET_PACK_XZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xz.F 121 CTRL_SET_PACK_XZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xz.F 207 CTRL_SET_PACK_XZ 
     &        nr, globfld3d, irec, mythid)
./pkg/ctrl/ctrl_set_pack_xz.F 236 CTRL_SET_PACK_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xz.F 237 CTRL_SET_PACK_XZ 
             irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_pack_xz.F 244 CTRL_SET_PACK_XZ 
                  jj=mod((j-1)*nr+k-1,sny)+1
./pkg/ctrl/ctrl_set_pack_xz.F 245 CTRL_SET_PACK_XZ 
                  kk=int((j-1)*nr+K-1)/sny+1
./pkg/ctrl/ctrl_set_pack_xz.F 307 CTRL_SET_PACK_XZ 
     &        nr, globfldxz, irec, mythid)
./pkg/ctrl/ctrl_set_pack_xz.F 334 CTRL_SET_PACK_XZ 
         do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xz.F 335 CTRL_SET_PACK_XZ 
            irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_pack_xz.F 46 CTRL_SET_PACK_XZ 
      _RL     weightfld( nr,nobcs )
./pkg/ctrl/ctrl_set_pack_xz.F 78 CTRL_SET_PACK_XZ 
      _RL     globfldxz  ( snx,nsx,npx,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xz.F 79 CTRL_SET_PACK_XZ 
      _RL     globfld3d  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xz.F 80 CTRL_SET_PACK_XZ 
      _RL     globmskxz  ( snx,nsx,npx,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_pack_xz.F 82 CTRL_SET_PACK_XZ 
      _RL     weightfldxz( snx,nsx,npx,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_pack_yz.F 100 CTRL_SET_PACK_YZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_yz.F 119 CTRL_SET_PACK_YZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_yz.F 208 CTRL_SET_PACK_YZ 
     &        nr, globfld3D, irec, mythid)
./pkg/ctrl/ctrl_set_pack_yz.F 238 CTRL_SET_PACK_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_set_pack_yz.F 239 CTRL_SET_PACK_YZ 
             irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_pack_yz.F 246 CTRL_SET_PACK_YZ 
                  ii=mod ( (i-1)*nr*sny+(k-1)*sny+j-1      , snx ) + 1
./pkg/ctrl/ctrl_set_pack_yz.F 247 CTRL_SET_PACK_YZ 
                  jj=mod( ((i-1)*nr*sny+(k-1)*sny+j-1)/snx , sny ) + 1
./pkg/ctrl/ctrl_set_pack_yz.F 248 CTRL_SET_PACK_YZ 
                  kk=int((i-1)*nr*sny+(k-1)*sny+j-1)/(snx*sny) + 1
./pkg/ctrl/ctrl_set_pack_yz.F 312 CTRL_SET_PACK_YZ 
     &        nr, globfldyz, irec, mythid)
./pkg/ctrl/ctrl_set_pack_yz.F 339 CTRL_SET_PACK_YZ 
         do k = 1,nr
./pkg/ctrl/ctrl_set_pack_yz.F 340 CTRL_SET_PACK_YZ 
            irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_pack_yz.F 46 CTRL_SET_PACK_YZ 
      _RL     weightfld( nr,nobcs )
./pkg/ctrl/ctrl_set_pack_yz.F 76 CTRL_SET_PACK_YZ 
      _RL     globfldyz  ( nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_yz.F 77 CTRL_SET_PACK_YZ 
      _RL     globfld3d  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_yz.F 78 CTRL_SET_PACK_YZ 
      _RL     globmskyz  ( nsx,npx,sny,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_pack_yz.F 80 CTRL_SET_PACK_YZ 
      _RL     weightfldyz( nsx,npx,sny,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_unpack_xy.F 163 CTRL_SET_UNPACK_XY 
         irectrue = (irec-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_xy.F 44 CTRL_SET_UNPACK_XY 
      integer nwetglobal(nr)
./pkg/ctrl/ctrl_set_unpack_xy.F 64 CTRL_SET_UNPACK_XY 
      _RL     globmsk  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xy.F 65 CTRL_SET_UNPACK_XY 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xy.F 97 CTRL_SET_UNPACK_XY 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xyz.F 105 CTRL_SET_UNPACK_XYZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xyz.F 128 CTRL_SET_UNPACK_XYZ 
      do k = 1, nr
./pkg/ctrl/ctrl_set_unpack_xyz.F 189 CTRL_SET_UNPACK_XYZ 
         irectrue = (irec-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_xyz.F 380 CTRL_SET_UNPACK_XYZ 
      do k = 1, nr
./pkg/ctrl/ctrl_set_unpack_xyz.F 43 CTRL_SET_UNPACK_XYZ 
      _RL     weightfld( nr,nsx,nsy )
./pkg/ctrl/ctrl_set_unpack_xyz.F 44 CTRL_SET_UNPACK_XYZ 
      integer nwetglobal(nr)
./pkg/ctrl/ctrl_set_unpack_xyz.F 64 CTRL_SET_UNPACK_XYZ 
      _RL     globmsk  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xyz.F 65 CTRL_SET_UNPACK_XYZ 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xyz.F 67 CTRL_SET_UNPACK_XYZ 
      _RL   weightfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xz.F 105 CTRL_SET_UNPACK_XZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xz.F 124 CTRL_SET_UNPACK_XZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xz.F 224 CTRL_SET_UNPACK_XZ 
               irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_xz.F 243 CTRL_SET_UNPACK_XZ 
               jj=mod((j-1)*nr+k-1,sny)+1
./pkg/ctrl/ctrl_set_unpack_xz.F 244 CTRL_SET_UNPACK_XZ 
               kk=int((j-1)*nr+k-1)/sny+1
./pkg/ctrl/ctrl_set_unpack_xz.F 314 CTRL_SET_UNPACK_XZ 
            irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_xz.F 45 CTRL_SET_UNPACK_XZ 
      _RL     weightfld( nr,nobcs )
./pkg/ctrl/ctrl_set_unpack_xz.F 46 CTRL_SET_UNPACK_XZ 
      integer nwetglobal(nr,nobcs)
./pkg/ctrl/ctrl_set_unpack_xz.F 70 CTRL_SET_UNPACK_XZ 
      _RL     globfldxz( snx,nsx,npx,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xz.F 71 CTRL_SET_UNPACK_XZ 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xz.F 72 CTRL_SET_UNPACK_XZ 
      _RL     globmskxz( snx,nsx,npx,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_unpack_xz.F 74 CTRL_SET_UNPACK_XZ 
      _RL   weightfldxz( snx,nsx,npx,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_unpack_yz.F 105 CTRL_SET_UNPACK_YZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_yz.F 124 CTRL_SET_UNPACK_YZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_yz.F 224 CTRL_SET_UNPACK_YZ 
               irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_yz.F 247 CTRL_SET_UNPACK_YZ 
                    ii=mod((i-1)*nr*sny+(k-1)*sny+j-1,snx)+1
./pkg/ctrl/ctrl_set_unpack_yz.F 248 CTRL_SET_UNPACK_YZ 
                    jj=mod(((i-1)*nr*sny+(k-1)*sny+j-1)/snx,sny)+1
./pkg/ctrl/ctrl_set_unpack_yz.F 249 CTRL_SET_UNPACK_YZ 
                    kk=int((i-1)*nr*sny+(k-1)*sny+j-1)/(snx*sny)+1
./pkg/ctrl/ctrl_set_unpack_yz.F 312 CTRL_SET_UNPACK_YZ 
            irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_yz.F 45 CTRL_SET_UNPACK_YZ 
      _RL     weightfld( nr,nobcs )
./pkg/ctrl/ctrl_set_unpack_yz.F 46 CTRL_SET_UNPACK_YZ 
      integer nwetglobal(nr,nobcs)
./pkg/ctrl/ctrl_set_unpack_yz.F 70 CTRL_SET_UNPACK_YZ 
      _RL     globfldyz( nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_yz.F 71 CTRL_SET_UNPACK_YZ 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_yz.F 72 CTRL_SET_UNPACK_YZ 
      _RL     globmskyz( nsx,npx,sny,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_unpack_yz.F 74 CTRL_SET_UNPACK_YZ 
      _RL   weightfldyz( nsx,npx,sny,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_smooth.F 24 CTRL_SMOOTH 
      _RL mask( 1-OLx:sNx+OLx, 1-OLy:sNy+OLy,nr,nSx,nSy )
./pkg/ctrl/ctrl_summary.F 111 CTRL_SUMMARY 
          do k = 1,nr
./pkg/ctrl/ctrl_summary.F 91 CTRL_SUMMARY 
      write(msgbuf,'(a,i8)') ' snx*sny*nr = ',snx*sny*nr
./pkg/ctrl/ctrl_unpack.F 208 CTRL_UNPACK 
          read(cunit) (filenWetcGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 209 CTRL_UNPACK 
          read(cunit) (filenWetsGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 210 CTRL_UNPACK 
          read(cunit) (filenWetwGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 212 CTRL_UNPACK 
          read(cunit) (filenWetvGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 218 CTRL_UNPACK 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/ctrl/ctrl_unpack.F 222 CTRL_UNPACK 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/ctrl/ctrl_unpack.F 226 CTRL_UNPACK 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/ctrl/ctrl_unpack.F 230 CTRL_UNPACK 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/ctrl/ctrl_unpack.F 252 CTRL_UNPACK 
          do k = 1, nr
./pkg/ctrl/ctrl_unpack.F 266 CTRL_UNPACK 
         do k = 1, nr
./pkg/ctrl/ctrl_unpack.F 278 CTRL_UNPACK 
         do k = 1, nr
./pkg/ctrl/ctrl_unpack.F 290 CTRL_UNPACK 
         do k = 1, nr
./pkg/ctrl/ctrl_unpack.F 302 CTRL_UNPACK 
         do k = 1, nr
./pkg/ctrl/ctrl_unpack.F 86 CTRL_UNPACK 
      integer        filenWetobcsnGlo(nr,nobcs)
./pkg/ctrl/ctrl_unpack.F 89 CTRL_UNPACK 
      integer        filenWetobcssGlo(nr,nobcs)
./pkg/ctrl/ctrl_unpack.F 92 CTRL_UNPACK 
      integer        filenWetobcswGlo(nr,nobcs)
./pkg/ctrl/ctrl_unpack.F 95 CTRL_UNPACK 
      integer        filenWetobcseGlo(nr,nobcs)
./pkg/ctrl/ctrl_weights.h 11 NO PROCEDURE 
      _RL wtheta   ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 12 NO PROCEDURE 
      _RL wsalt    ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 13 NO PROCEDURE 
      _RL wuvvel   ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 15 NO PROCEDURE 
      _RL wdiffkr ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 16 NO PROCEDURE 
      _RL wkapgm ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 17 NO PROCEDURE 
      _RL wkapredi ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 18 NO PROCEDURE 
      _RL wedtaux ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 19 NO PROCEDURE 
      _RL wedtauy ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 24 NO PROCEDURE 
      _RL wobcsn     (                      nr,nobcs)
./pkg/ctrl/ctrl_weights.h 25 NO PROCEDURE 
      _RL wobcsnLev  (1-olx:snx+olx,nr,nsx,nsy,nobcs)
./pkg/ctrl/ctrl_weights.h 30 NO PROCEDURE 
      _RL wobcss     (                      nr,nobcs)
./pkg/ctrl/ctrl_weights.h 31 NO PROCEDURE 
      _RL wobcssLev  (1-olx:snx+olx,nr,nsx,nsy,nobcs)
./pkg/ctrl/ctrl_weights.h 36 NO PROCEDURE 
      _RL wobcsw     (                      nr,nobcs)
./pkg/ctrl/ctrl_weights.h 37 NO PROCEDURE 
      _RL wobcswLev  (1-oly:sny+oly,nr,nsx,nsy,nobcs)
./pkg/ctrl/ctrl_weights.h 42 NO PROCEDURE 
      _RL wobcse     (                      nr,nobcs)
./pkg/ctrl/ctrl_weights.h 43 NO PROCEDURE 
      _RL wobcseLev  (1-oly:sny+oly,nr,nsx,nsy,nobcs)
./pkg/ecco/cost_argo_salt.F 142 COST_ARGO_SALT 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, argosobs,
./pkg/ecco/cost_argo_salt.F 152 COST_ARGO_SALT 
            do k = 1,nr
./pkg/ecco/cost_argo_theta.F 145 COST_ARGO_THETA 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, argotobs,
./pkg/ecco/cost_argo_theta.F 156 COST_ARGO_THETA 
            do k = 1,nr
./pkg/ecco/cost_atlantic.F 144 COST_ATLANTIC 
            do k = 1,nr
./pkg/ecco/cost_atlantic.F 187 COST_ATLANTIC 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 178 COST_AVERAGESFIELDS 
     &     sum1mon, monrec, nr, mythid )
./pkg/ecco/cost_averagesfields.F 215 COST_AVERAGESFIELDS 
     &     sum1mon, monrec, nr, mythid )
./pkg/ecco/cost_averagesfields.F 231 COST_AVERAGESFIELDS 
     &     sum1mon, monrec, nr, mythid )
./pkg/ecco/cost_averagesfields.F 244 COST_AVERAGESFIELDS 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 257 COST_AVERAGESFIELDS 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 295 COST_AVERAGESFIELDS 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 525 COST_AVERAGESFIELDS 
         do k = 1,nr
./pkg/ecco/cost_averagesinit.F 109 COST_AVERAGESINIT 
          do k = 1,nr
./pkg/ecco/cost_averagesinit.F 117 COST_AVERAGESINIT 
          nnztbar = nr
./pkg/ecco/cost_averagesinit.F 148 COST_AVERAGESINIT 
          do k = 1,nr
./pkg/ecco/cost_averagesinit.F 156 COST_AVERAGESINIT 
          nnzsbar = nr
./pkg/ecco/cost_averagesinit.F 174 COST_AVERAGESINIT 
          do k = 1,nr
./pkg/ecco/cost_averagesinit.F 188 COST_AVERAGESINIT 
          do k = 1,nr
./pkg/ecco/cost_ctds.F 141 COST_CTDS 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, ctdsobs,
./pkg/ecco/cost_ctds.F 152 COST_CTDS 
            do k = 1,nr
./pkg/ecco/cost_ctdsclim.F 133 COST_CTDSCLIM 
                  do k = 1,nr
./pkg/ecco/cost_ctdsclim.F 167 COST_CTDSCLIM 
     &                     nr, sdat, levmon, mythid)
./pkg/ecco/cost_ctdsclim.F 174 COST_CTDSCLIM 
            do k = 1,nr
./pkg/ecco/cost_ctdt.F 142 COST_CTDT 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, ctdtobs,
./pkg/ecco/cost_ctdt.F 153 COST_CTDT 
            do k = 1,nr
./pkg/ecco/cost_ctdtclim.F 132 COST_CTDTCLIM 
                  do k = 1,nr
./pkg/ecco/cost_ctdtclim.F 166 COST_CTDTCLIM 
     &                     nr, tdat, levmon, mythid)
./pkg/ecco/cost_ctdtclim.F 173 COST_CTDTCLIM 
            do k = 1,nr
./pkg/ecco/cost_curmtr.F 148 COST_CURMTR 
        call MDSREADFIELD( curmtrufile,cost_iprec, 'RL', nr, curmtruobs,
./pkg/ecco/cost_curmtr.F 151 COST_CURMTR 
        call MDSREADFIELD( curmtrvfile,cost_iprec, 'RL', nr, curmtrvobs,
./pkg/ecco/cost_curmtr.F 162 COST_CURMTR 
            do k = 1,nr
./pkg/ecco/cost_diffkr.F 103 COST_DIFFKR 
            do k = 1,nr
./pkg/ecco/cost_drift.F 121 COST_DRIFT 
          do k = 1,nr
./pkg/ecco/cost_drift.F 158 COST_DRIFT 
            do k = 1,nr
./pkg/ecco/cost_drift.F 190 COST_DRIFT 
            do k = 1,nr
./pkg/ecco/cost_drift.F 213 COST_DRIFT 
          do k = 1,nr
./pkg/ecco/cost_drift.F 243 COST_DRIFT 
          do k = 1,nr
./pkg/ecco/cost_drift.F 78 COST_DRIFT 
      _RL diagnosfld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_driftw.F 107 COST_DRIFTW 
          do k = 1,nr
./pkg/ecco/cost_driftw.F 137 COST_DRIFTW 
            do k = 1,nr
./pkg/ecco/cost_driftw.F 162 COST_DRIFTW 
            do k = 1,nr
./pkg/ecco/cost_driftw.F 182 COST_DRIFTW 
          do k = 1,nr
./pkg/ecco/cost_forcing_gen.F 71 COST_FORCING_GEN 
      _RS genmask(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_generic.F 94 COST_GENERIC 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_kapgm.F 106 COST_KAPGM 
            do k = 1,nr
./pkg/ecco/cost_kapredi.F 106 COST_KAPREDI 
            do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 153 COST_OBCS_AGEOS 
          do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 220 COST_OBCS_AGEOS 
            do k = 1,nr-1
./pkg/ecco/cost_obcs_ageos.F 236 COST_OBCS_AGEOS 
            do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 287 COST_OBCS_AGEOS 
            do k = 1,nr-1
./pkg/ecco/cost_obcs_ageos.F 303 COST_OBCS_AGEOS 
            do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 351 COST_OBCS_AGEOS 
            do k = 1,nr-1
./pkg/ecco/cost_obcs_ageos.F 367 COST_OBCS_AGEOS 
            do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 414 COST_OBCS_AGEOS 
            do k = 1,nr-1
./pkg/ecco/cost_obcs_ageos.F 430 COST_OBCS_AGEOS 
            do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 77 COST_OBCS_AGEOS 
      _RL xzdvel1   (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 78 COST_OBCS_AGEOS 
      _RL xzdvel2   (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 79 COST_OBCS_AGEOS 
      _RL yzdvel1   (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 80 COST_OBCS_AGEOS 
      _RL yzdvel2   (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 81 COST_OBCS_AGEOS 
      _RL maskxzageos   (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 82 COST_OBCS_AGEOS 
      _RL maskyzageos   (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcse.F 119 COST_OBCSE 
     &                       nr, OBEt, irec, mythid)
./pkg/ecco/cost_obcse.F 125 COST_OBCSE 
            do k = 1,nr
./pkg/ecco/cost_obcse.F 156 COST_OBCSE 
     &                       nr, OBEs, irec, mythid)
./pkg/ecco/cost_obcse.F 162 COST_OBCSE 
            do k = 1,nr
./pkg/ecco/cost_obcse.F 193 COST_OBCSE 
     &                       nr, OBEu, irec, mythid)
./pkg/ecco/cost_obcse.F 198 COST_OBCSE 
            do k = 1,nr
./pkg/ecco/cost_obcse.F 229 COST_OBCSE 
     &                       nr, OBEv, irec, mythid)
./pkg/ecco/cost_obcse.F 235 COST_OBCSE 
            do k = 1,nr
./pkg/ecco/cost_obcsn.F 119 COST_OBCSN 
     &                       nr, OBNt, irec, mythid)
./pkg/ecco/cost_obcsn.F 125 COST_OBCSN 
            do k = 1,nr
./pkg/ecco/cost_obcsn.F 156 COST_OBCSN 
     &                       nr, OBNs, irec, mythid)
./pkg/ecco/cost_obcsn.F 162 COST_OBCSN 
            do k = 1,nr
./pkg/ecco/cost_obcsn.F 193 COST_OBCSN 
     &                       nr, OBNu, irec, mythid)
./pkg/ecco/cost_obcsn.F 198 COST_OBCSN 
            do k = 1,nr
./pkg/ecco/cost_obcsn.F 229 COST_OBCSN 
     &                       nr, OBNv, irec, mythid)
./pkg/ecco/cost_obcsn.F 235 COST_OBCSN 
            do k = 1,nr
./pkg/ecco/cost_obcss.F 119 COST_OBCSS 
     &                       nr, OBSt, irec, mythid)
./pkg/ecco/cost_obcss.F 125 COST_OBCSS 
            do k = 1,nr
./pkg/ecco/cost_obcss.F 156 COST_OBCSS 
     &                       nr, OBSs, irec, mythid)
./pkg/ecco/cost_obcss.F 162 COST_OBCSS 
            do k = 1,nr
./pkg/ecco/cost_obcss.F 193 COST_OBCSS 
     &                       nr, OBSu, irec, mythid)
./pkg/ecco/cost_obcss.F 198 COST_OBCSS 
            do k = 1,nr
./pkg/ecco/cost_obcss.F 229 COST_OBCSS 
     &                       nr, OBSv, irec, mythid)
./pkg/ecco/cost_obcss.F 235 COST_OBCSS 
            do k = 1,nr
./pkg/ecco/cost_obcsw.F 119 COST_OBCSW 
     &                       nr, OBWt, irec, mythid)
./pkg/ecco/cost_obcsw.F 125 COST_OBCSW 
            do k = 1,nr
./pkg/ecco/cost_obcsw.F 156 COST_OBCSW 
     &                       nr, OBWs, irec, mythid)
./pkg/ecco/cost_obcsw.F 162 COST_OBCSW 
            do k = 1,nr
./pkg/ecco/cost_obcsw.F 193 COST_OBCSW 
     &                       nr, OBWu, irec, mythid)
./pkg/ecco/cost_obcsw.F 198 COST_OBCSW 
            do k = 1,nr
./pkg/ecco/cost_obcsw.F 229 COST_OBCSW 
     &                       nr, OBWv, irec, mythid)
./pkg/ecco/cost_obcsw.F 235 COST_OBCSW 
            do k = 1,nr
./pkg/ecco/cost_readargos.F 84 COST_READARGOS 
      call MDSREADFIELD( argosfile, cost_iprec, cost_yftype, nr,
./pkg/ecco/cost_readargos.F 89 COST_READARGOS 
               do k = 1,nr
./pkg/ecco/cost_readargot.F 84 COST_READARGOT 
      call MDSREADFIELD( argotfile, cost_iprec, cost_yftype, nr,
./pkg/ecco/cost_readargot.F 89 COST_READARGOT 
               do k = 1,nr
./pkg/ecco/cost_salt.F 132 COST_SALT 
                  do k = 1,nr
./pkg/ecco/cost_salt.F 167 COST_SALT 
     &                     nr, sdat, levmon, mythid)
./pkg/ecco/cost_salt.F 174 COST_SALT 
            do k = 1,nr
./pkg/ecco/cost_salt.F 83 COST_SALT 
      _RL diagnosfld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_salt0.F 115 COST_SALT0 
            do k = 1,nr
./pkg/ecco/cost_salt0.F 155 COST_SALT0 
            do k = 1,nr
./pkg/ecco/cost_salt_ini_fin.F 105 COST_SALT_INI_FIN 
            do k = 1,nr
./pkg/ecco/cost_tau_eddy.F 109 COST_TAU_EDDY 
            do k = 1,nr
./pkg/ecco/cost_tau_eddy.F 144 COST_TAU_EDDY 
            do k = 1,nr
./pkg/ecco/cost_theta.F 131 COST_THETA 
                  do k = 1,nr
./pkg/ecco/cost_theta.F 166 COST_THETA 
     &                     nr, tdat, levmon, mythid)
./pkg/ecco/cost_theta.F 173 COST_THETA 
            do k = 1,nr
./pkg/ecco/cost_theta.F 82 COST_THETA 
      _RL diagnosfld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_theta0.F 115 COST_THETA0 
            do k = 1,nr
./pkg/ecco/cost_theta0.F 155 COST_THETA0 
            do k = 1,nr
./pkg/ecco/cost_theta_ini_fin.F 105 COST_THETA_INI_FIN 
            do k = 1,nr
./pkg/ecco/cost_trans_merid.F 193 COST_TRANS_MERID 
            do k = 1,nr
./pkg/ecco/cost_trans_merid.F 227 COST_TRANS_MERID 
        do k =1,nr
./pkg/ecco/cost_trans_merid.F 232 COST_TRANS_MERID 
        do k = 2,nr
./pkg/ecco/cost_trans_zonal.F 182 COST_TRANS_ZONAL 
            do k = 1,nr
./pkg/ecco/cost_trans_zonal.F 216 COST_TRANS_ZONAL 
        do k =1,nr
./pkg/ecco/cost_trans_zonal.F 221 COST_TRANS_ZONAL 
        do k = 2,nr
./pkg/ecco/cost_xbt.F 147 COST_XBT 
        call MDSREADFIELD( fnametmp, cost_iprec, 'RL', nr, xbtobs,
./pkg/ecco/cost_xbt.F 158 COST_XBT 
            do k = 1,nr
./pkg/ecco/ecco_cost.h 1062 NO PROCEDURE 
      _RL wtheta  (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1063 NO PROCEDURE 
      _RL wsalt   (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1064 NO PROCEDURE 
      _RL wtheta2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1065 NO PROCEDURE 
      _RL wsalt2  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1066 NO PROCEDURE 
      _RL wthetaLev (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1067 NO PROCEDURE 
      _RL wsaltLev  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1076 NO PROCEDURE 
      _RL wctdt   (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1077 NO PROCEDURE 
      _RL wctds   (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1080 NO PROCEDURE 
      _RL wcurrent(                              nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1081 NO PROCEDURE 
      _RL wcurrent2   (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1082 NO PROCEDURE 
      _RL wcurrentLev (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1084 NO PROCEDURE 
      _RL wdiffkr (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1085 NO PROCEDURE 
      _RL wdiffkr2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1086 NO PROCEDURE 
      _RL wdiffkrFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1087 NO PROCEDURE 
      _RL wkapgm (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1088 NO PROCEDURE 
      _RL wkapgm2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1089 NO PROCEDURE 
      _RL wkapgmFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1090 NO PROCEDURE 
      _RL wkapredi (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1091 NO PROCEDURE 
      _RL wkapredi2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1092 NO PROCEDURE 
      _RL wkaprediFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1093 NO PROCEDURE 
      _RL wedtaux (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1094 NO PROCEDURE 
      _RL wedtaux2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1095 NO PROCEDURE 
      _RL wedtauxFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1096 NO PROCEDURE 
      _RL wedtauy (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1097 NO PROCEDURE 
      _RL wedtauy2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1098 NO PROCEDURE 
      _RL wedtauyFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1160 NO PROCEDURE 
      _RL wobcsn     (                      nr,nobcs)
./pkg/ecco/ecco_cost.h 1161 NO PROCEDURE 
      _RL wobcsnLev  (1-olx:snx+olx,nr,nsx,nsy,nobcs)
./pkg/ecco/ecco_cost.h 1167 NO PROCEDURE 
      _RL wobcss     (                      nr,nobcs)
./pkg/ecco/ecco_cost.h 1168 NO PROCEDURE 
      _RL wobcssLev  (1-olx:snx+olx,nr,nsx,nsy,nobcs)
./pkg/ecco/ecco_cost.h 1174 NO PROCEDURE 
      _RL wobcsw     (                      nr,nobcs)
./pkg/ecco/ecco_cost.h 1175 NO PROCEDURE 
      _RL wobcswLev  (1-oly:sny+oly,nr,nsx,nsy,nobcs)
./pkg/ecco/ecco_cost.h 1181 NO PROCEDURE 
      _RL wobcse     (                      nr,nobcs)
./pkg/ecco/ecco_cost.h 1182 NO PROCEDURE 
      _RL wobcseLev  (1-oly:sny+oly,nr,nsx,nsy,nobcs)
./pkg/ecco/ecco_cost.h 1250 NO PROCEDURE 
      _RL tdat      (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1262 NO PROCEDURE 
      _RL sdat      (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1271 NO PROCEDURE 
      _RL ctdtobs   (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1272 NO PROCEDURE 
      _RL ctdsobs   (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1273 NO PROCEDURE 
      _RL xbtobs    (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1274 NO PROCEDURE 
      _RL argotobs  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1275 NO PROCEDURE 
      _RL argosobs  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1278 NO PROCEDURE 
      _RL curmtruobs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1279 NO PROCEDURE 
      _RL curmtrvobs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 163 NO PROCEDURE 
      _RL tbar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 172 NO PROCEDURE 
      _RL tbar_gen  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 173 NO PROCEDURE 
      _RL sbar_gen  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 190 NO PROCEDURE 
      _RL sbar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 213 NO PROCEDURE 
      _RL ubar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 214 NO PROCEDURE 
      _RL vbar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 221 NO PROCEDURE 
      _RL wbar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 227 NO PROCEDURE 
      _RL   Tlmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 228 NO PROCEDURE 
      _RL   Slmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 229 NO PROCEDURE 
      _RL   Tfmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 230 NO PROCEDURE 
      _RL   Sfmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 239 NO PROCEDURE 
      _RL   wlmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 240 NO PROCEDURE 
      _RL   wfmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost_init_barfiles.F 121 ECCO_COST_INIT_BARFILES 
          do k = 1,nr
./pkg/ecco/ecco_cost_init_barfiles.F 135 ECCO_COST_INIT_BARFILES 
          do k = 1,nr
./pkg/ecco/ecco_cost_init_barfiles.F 145 ECCO_COST_INIT_BARFILES 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 107 ECCO_COST_WEIGHTS 
      do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1464 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1488 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1512 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1536 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1784 ECCO_COST_WEIGHTS 
            do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1826 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 267 ECCO_COST_WEIGHTS 
        do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 293 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 310 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 346 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 364 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 387 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 405 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 433 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 452 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 480 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 499 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 62 ECCO_COST_WEIGHTS 
      _RL wti(nr)
./pkg/ecco/ecco_cost_weights.F 63 ECCO_COST_WEIGHTS 
      _RL wsi(nr)
./pkg/ecco/ecco_cost_weights.F 64 ECCO_COST_WEIGHTS 
      _RL wui(nr)
./pkg/ecco/ecco_cost_weights.F 65 ECCO_COST_WEIGHTS 
      _RL wvi(nr)
./pkg/exf/exf_swapffields.F 102 EXF_SWAPFFIELDS_3D 
      _RL ffld0(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/exf/exf_swapffields.F 103 EXF_SWAPFFIELDS_3D 
      _RL ffld1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/exf/exf_swapffields.F 124 EXF_SWAPFFIELDS_3D 
          do k = 1,nr