Symbol Description Uses
nr 790


File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 119 ECCO_COST_WEIGHTS 
      do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1539 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1563 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1587 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1611 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1674 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1903 ECCO_COST_WEIGHTS 
            do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 1946 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 295 ECCO_COST_WEIGHTS 
        do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 327 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 345 ECCO_COST_WEIGHTS 
          do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 385 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 403 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 428 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 446 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 474 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 493 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 521 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 540 ECCO_COST_WEIGHTS 
           do k = 1,nr
./pkg/ecco/ecco_cost_weights.F 71 ECCO_COST_WEIGHTS 
      _RL wti(nr)
./pkg/ecco/ecco_cost_weights.F 72 ECCO_COST_WEIGHTS 
      _RL wsi(nr)
./pkg/ecco/ecco_cost_weights.F 73 ECCO_COST_WEIGHTS 
      _RL wui(nr)
./pkg/ecco/ecco_cost_weights.F 74 ECCO_COST_WEIGHTS 
      _RL wvi(nr)
./pkg/ecco/ecco_phys.F 147 ECCO_PHYS 
          do k = 1,nr
./pkg/ecco/ecco_phys.F 178 ECCO_PHYS 
          do k = 1,nr
./pkg/ecco/ecco_phys.F 190 ECCO_PHYS 
          do k = 1,nr
./pkg/ecco/ecco_phys.F 247 ECCO_PHYS 
          do k = 1,nr
./pkg/ecco/ecco_phys.F 300 ECCO_PHYS 
          do k = 1,nr
./pkg/ecco/ecco_phys.F 76 ECCO_PHYS 
          do k = 1,nr
./pkg/ecco/ecco_phys.F 93 ECCO_PHYS 
          do k = 1,nr
./pkg/ecco/ecco_readparms.F 620 ECCO_READPARMS 
         do k2 = 1,nr
./pkg/ecco/ecco_toolbox.F 123 ECCO_DIFFMSK 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_toolbox.F 219 ECCO_DIFFANOMMSK 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_toolbox.F 312 ECCO_OBSMSK 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./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 112 GRDCHK_GET_OBCS_MASK 
               do k = 1,nr
./pkg/grdchk/grdchk_get_obcs_mask.F 135 GRDCHK_GET_OBCS_MASK 
               do k = 1,nr
./pkg/grdchk/grdchk_get_obcs_mask.F 158 GRDCHK_GET_OBCS_MASK 
               do k = 1,nr
./pkg/grdchk/grdchk_get_obcs_mask.F 52 GRDCHK_GET_OBCS_MASK 
      _RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy)
./pkg/grdchk/grdchk_get_obcs_mask.F 55 GRDCHK_GET_OBCS_MASK 
      _RL tmpfldyz (1-oly:sny+oly,nr,nsx,nsy)
./pkg/grdchk/grdchk_get_obcs_mask.F 89 GRDCHK_GET_OBCS_MASK 
               do k = 1,nr
./pkg/grdchk/grdchk_getadxx.F 72 GRDCHK_GETADXX 
      _RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy)
./pkg/grdchk/grdchk_getadxx.F 75 GRDCHK_GETADXX 
      _RL tmpfldyz (1-oly:sny+oly,nr,nsx,nsy)
./pkg/grdchk/grdchk_getxx.F 78 GRDCHK_GETXX 
      _RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy)
./pkg/grdchk/grdchk_getxx.F 81 GRDCHK_GETXX 
      _RL tmpfldyz (1-oly:sny+oly,nr,nsx,nsy)
./pkg/grdchk/grdchk_setxx.F 75 GRDCHK_SETXX 
      _RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy)
./pkg/grdchk/grdchk_setxx.F 78 GRDCHK_SETXX 
      _RL tmpfldyz (1-oly:sny+oly,nr,nsx,nsy)
./pkg/openad/the_model_main.F 306 THE_MODEL_MAIN 
      _RL foo(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/openad/the_model_main.F 471 THE_MODEL_MAIN 
          do i3=1,nr
./pkg/profiles/profiles.h 26 NO PROCEDURE 
      _RL prof_theta_mean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/profiles/profiles.h 27 NO PROCEDURE 
      _RL prof_salt_mean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/profiles/profiles_interp.F 137 PROFILES_INTERP 
        elseif (prof_depth(file_cur,kk,bi,bj).GE.-rC(nr)) then
./pkg/profiles/profiles_interp.F 139 PROFILES_INTERP 
     &    (-rC(nr)+drC(nr)/2) ) then
./pkg/profiles/profiles_interp.F 140 PROFILES_INTERP 
            traj_cur_out(kk)=traj_cur(nr)
./pkg/profiles/profiles_interp.F 141 PROFILES_INTERP 
            prof_mask1D_cur(kk,bi,bj)=mask_cur(nr)
./pkg/profiles/profiles_interp.F 146 PROFILES_INTERP 
          do k=1,nr-1
./pkg/profiles/profiles_interp.F 82 PROFILES_INTERP 
      do k=1,nr
./pkg/ptracers/ptracers_adcommon.h 21 NO PROCEDURE 
      _RL adgptr(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,
./pkg/ptracers/ptracers_adcommon.h 23 NO PROCEDURE 
      _RL adgptrnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,
./pkg/ptracers/ptracers_adcommon.h 25 NO PROCEDURE 
      _RL adptracer(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,
./pkg/seaice/seaice_cost_areasst.F 75 SEAICE_COST_AREASST 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/seaice/seaice_cost_concentration.F 70 SEAICE_COST_CONCENTRATION 
      _RS localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/seaice/seaice_cost_sss.F 66 SEAICE_COST_SSS 
      _RS localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/seaice/seaice_cost_sst.F 64 SEAICE_COST_SST 
      _RS localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/smooth/smooth_diff3d.F 40 SMOOTH_DIFF3D 
      _RL dTtracerLev_bak(nr)
./verification/1D_ocean_ice_column/code_ad/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./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/bottom_ctrl_5x5/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/dome/code/obcs_calc.F 44 OBCS_CALC 
      _RL z(nr)
./verification/dome/code/obcs_calc.F 81 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/global_ocean.90x40x15/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/global_ocean.cs32x15/code_ad/cost_test.F 81 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/global_with_exf/code_ad/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/halfpipe_streamice/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 54 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/hs94.1x64x5/code_oad/adcommon.h 19 NO PROCEDURE 
      _RL adgs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 20 NO PROCEDURE 
      _RL adgsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 21 NO PROCEDURE 
      _RL adgt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 22 NO PROCEDURE 
      _RL adgtnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 23 NO PROCEDURE 
      _RL adgu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 24 NO PROCEDURE 
      _RL adgunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 25 NO PROCEDURE 
      _RL adgv(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 26 NO PROCEDURE 
      _RL adgvnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 27 NO PROCEDURE 
      _RL adsalt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 28 NO PROCEDURE 
      _RL adtheta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 29 NO PROCEDURE 
      _RL aduvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 30 NO PROCEDURE 
      _RL advvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/hs94.1x64x5/code_oad/adcommon.h 31 NO PROCEDURE 
      _RL adwvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./verification/isomip/code_ad/cost_test.F 81 COST_TEST 
       do k=1,nr
./verification/isomip/code_ad/tamc.h 56 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/isomip/code_oad/cost_test.F 81 COST_TEST 
       do k=1,nr
./verification/lab_sea/code_ad/tamc.h 58 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/obcs_ctrl/code_ad/tamc.h 55 NO PROCEDURE 
      parameter (ngeom_chkpt    = nr*nsx*nsy )
./verification/offline_exf_seaice/code_ad/tamc.h 57 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
./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 )
./optim/optim_readdata.F 155 OPTIM_READDATA 
      read( funit ) (nWetcGlobal(k), k=1,nr)
./optim/optim_readdata.F 156 OPTIM_READDATA 
      read( funit ) (nWetsGlobal(k), k=1,nr)
./optim/optim_readdata.F 157 OPTIM_READDATA 
      read( funit ) (nWetwGlobal(k), k=1,nr)
./optim/optim_readdata.F 159 OPTIM_READDATA 
      read( funit ) (nWetvGlobal(k), k=1,nr)
./optim/optim_readdata.F 162 OPTIM_READDATA 
      read(funit) (nWetiGlobal(k), k=1,nr)
./optim/optim_readdata.F 168 OPTIM_READDATA 
      read( funit ) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_readdata.F 171 OPTIM_READDATA 
      read( funit ) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_readdata.F 174 OPTIM_READDATA 
      read( funit ) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_readdata.F 177 OPTIM_READDATA 
      read( funit ) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_readdata.F 201 OPTIM_READDATA 
     &        (nWetcGlobal(k),  k=1,nr)
./optim/optim_readdata.F 203 OPTIM_READDATA 
     &        (nWetsGlobal(k),  k=1,nr)
./optim/optim_readdata.F 205 OPTIM_READDATA 
     &        (nWetwGlobal(k),  k=1,nr)
./optim/optim_readdata.F 207 OPTIM_READDATA 
     &        (nWetvGlobal(k),  k=1,nr)
./optim/optim_readdata.F 210 OPTIM_READDATA 
     &        (nWetiGlobal(k), k=1,nr)
./optim/optim_readdata.F 215 OPTIM_READDATA 
     &         (nWetobcsnGlo(k,iobcs), k=1,nr)
./optim/optim_readdata.F 221 OPTIM_READDATA 
     &         (nWetobcssGlo(k,iobcs), k=1,nr)
./optim/optim_readdata.F 227 OPTIM_READDATA 
     &         (nWetobcswGlo(k,iobcs), k=1,nr)
./optim/optim_readdata.F 233 OPTIM_READDATA 
     &         (nWetobcseGlo(k,iobcs), k=1,nr)
./optim/optim_writedata.F 121 OPTIM_WRITEDATA 
     &        (nWetcGlobal(k), k=1,nr)
./optim/optim_writedata.F 123 OPTIM_WRITEDATA 
     &        (nWetsGlobal(k), k=1,nr)
./optim/optim_writedata.F 125 OPTIM_WRITEDATA 
     &        (nWetwGlobal(k), k=1,nr)
./optim/optim_writedata.F 127 OPTIM_WRITEDATA 
     &        (nWetvGlobal(k), k=1,nr)
./optim/optim_writedata.F 152 OPTIM_WRITEDATA 
      write( funit ) (nWetcGlobal(k), k=1,nr)
./optim/optim_writedata.F 153 OPTIM_WRITEDATA 
      write( funit ) (nWetsGlobal(k), k=1,nr)
./optim/optim_writedata.F 154 OPTIM_WRITEDATA 
      write( funit ) (nWetwGlobal(k), k=1,nr)
./optim/optim_writedata.F 156 OPTIM_WRITEDATA 
      write( funit ) (nWetvGlobal(k), k=1,nr)
./optim/optim_writedata.F 159 OPTIM_WRITEDATA 
      write(funit) (nWetiGlobal(k),   k=1,nr)
./optim/optim_writedata.F 165 OPTIM_WRITEDATA 
          write(funit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_writedata.F 168 OPTIM_WRITEDATA 
          write(funit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_writedata.F 171 OPTIM_WRITEDATA 
          write(funit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./optim/optim_writedata.F 174 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 223 ADMTLM_DSVD2MODEL 
          read(cunit) (filenWetcGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 224 ADMTLM_DSVD2MODEL 
          read(cunit) (filenWetsGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 225 ADMTLM_DSVD2MODEL 
          read(cunit) (filenWetwGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 227 ADMTLM_DSVD2MODEL 
          read(cunit) (filenWetvGlobal(k),   k=1,nr)
./pkg/admtlm/admtlm_dsvd2model.F 233 ADMTLM_DSVD2MODEL 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 237 ADMTLM_DSVD2MODEL 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 241 ADMTLM_DSVD2MODEL 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 245 ADMTLM_DSVD2MODEL 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 267 ADMTLM_DSVD2MODEL 
          do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 281 ADMTLM_DSVD2MODEL 
         do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 293 ADMTLM_DSVD2MODEL 
         do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 305 ADMTLM_DSVD2MODEL 
         do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 317 ADMTLM_DSVD2MODEL 
         do k = 1, nr
./pkg/admtlm/admtlm_dsvd2model.F 89 ADMTLM_DSVD2MODEL 
      integer        filenWetobcsnGlo(nr,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 92 ADMTLM_DSVD2MODEL 
      integer        filenWetobcssGlo(nr,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 95 ADMTLM_DSVD2MODEL 
      integer        filenWetobcswGlo(nr,nobcs)
./pkg/admtlm/admtlm_dsvd2model.F 98 ADMTLM_DSVD2MODEL 
      integer        filenWetobcseGlo(nr,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 216 ADMTLM_MODEL2DSVD 
          write(cunit) (nWetcGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 217 ADMTLM_MODEL2DSVD 
          write(cunit) (nWetsGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 218 ADMTLM_MODEL2DSVD 
          write(cunit) (nWetwGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 220 ADMTLM_MODEL2DSVD 
          write(cunit) (nWetvGlobal(k), k=1,nr)
./pkg/admtlm/admtlm_model2dsvd.F 224 ADMTLM_MODEL2DSVD 
          write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 227 ADMTLM_MODEL2DSVD 
          write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 230 ADMTLM_MODEL2DSVD 
          write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/admtlm/admtlm_model2dsvd.F 233 ADMTLM_MODEL2DSVD 
          write(cunit) ((nWetobcseGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/autodiff/adcommon.h 196 NO PROCEDURE 
      _RL adggl90tke     (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 197 NO PROCEDURE 
      _RL adggl90diffkr  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 203 NO PROCEDURE 
      _RL adhfacc(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 204 NO PROCEDURE 
      _RL adhfacs(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 205 NO PROCEDURE 
      _RL adhfacw(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 206 NO PROCEDURE 
      _RL adrecip_hfacc(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 207 NO PROCEDURE 
      _RL adrecip_hfacs(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 208 NO PROCEDURE 
      _RL adrecip_hfacw(1-olx:snx+olx,1-oly:sny+oly,1:nr,nsx,nsy)
./pkg/autodiff/adcommon.h 24 NO PROCEDURE 
      _RL adgs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 25 NO PROCEDURE 
      _RL adgt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 26 NO PROCEDURE 
      _RL adgu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 27 NO PROCEDURE 
      _RL adgv(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 28 NO PROCEDURE 
      _RL adsalt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 29 NO PROCEDURE 
      _RL adtheta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 30 NO PROCEDURE 
      _RL aduvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 31 NO PROCEDURE 
      _RL advvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 32 NO PROCEDURE 
      _RL adwvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 34 NO PROCEDURE 
      _RL adgtnm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/adcommon.h 35 NO PROCEDURE 
      _RL adgsnm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/adcommon.h 36 NO PROCEDURE 
      _RL adgunm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/adcommon.h 37 NO PROCEDURE 
      _RL adgvnm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,2)
./pkg/autodiff/adcommon.h 39 NO PROCEDURE 
      _RL adgtnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 40 NO PROCEDURE 
      _RL adgsnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 41 NO PROCEDURE 
      _RL adgunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 42 NO PROCEDURE 
      _RL adgvnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 52 NO PROCEDURE 
      _RL adrhoinsitu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 53 NO PROCEDURE 
      _RL adtotphihyd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 61 NO PROCEDURE 
      _RL aduveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 62 NO PROCEDURE 
      _RL advveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 64 NO PROCEDURE 
      _RL adunm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/adcommon.h 65 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 62 NO PROCEDURE 
      _RL g_rhoinsitu(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 63 NO PROCEDURE 
      _RL g_totphihyd(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 71 NO PROCEDURE 
      _RL g_uveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 72 NO PROCEDURE 
      _RL g_vveld(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 74 NO PROCEDURE 
      _RL g_unm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 75 NO PROCEDURE 
      _RL g_vnm1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/autodiff/g_common.h 82 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/bling/bling_dvm.F 285 BLING_DVM 
        do k = 1, nr
./pkg/bling/bling_dvm.F 300 BLING_DVM 
        do k = 2, nr
./pkg/cost/cost_state_final.F 35 COST_STATE_FINAL 
          DO k=1,nr
./pkg/ctrl/CTRL_GENARR.h 115 NO PROCEDURE 
     &              nr,nsx,nsy,maxCtrlArr3D)
./pkg/ctrl/CTRL_OBCS.h 102 NO PROCEDURE 
      integer nwetobcsw     ( nsx,nsy,nr,nobcs )
./pkg/ctrl/CTRL_OBCS.h 103 NO PROCEDURE 
      integer nwetobcswglo  ( nr,nobcs )
./pkg/ctrl/CTRL_OBCS.h 107 NO PROCEDURE 
      integer nwetobcse     ( nsx,nsy,nr,nobcs )
./pkg/ctrl/CTRL_OBCS.h 108 NO PROCEDURE 
      integer nwetobcseglo  ( nr,nobcs )
./pkg/ctrl/CTRL_OBCS.h 113 NO PROCEDURE 
      _RL wobcsn     (                      nr,nobcs)
./pkg/ctrl/CTRL_OBCS.h 114 NO PROCEDURE 
      _RL wobcsnLev  (1-olx:snx+olx,nr,nsx,nsy,nobcs)
./pkg/ctrl/CTRL_OBCS.h 125 NO PROCEDURE 
      _RL wobcss     (                      nr,nobcs)
./pkg/ctrl/CTRL_OBCS.h 126 NO PROCEDURE 
      _RL wobcssLev  (1-olx:snx+olx,nr,nsx,nsy,nobcs)
./pkg/ctrl/CTRL_OBCS.h 137 NO PROCEDURE 
      _RL wobcsw     (                      nr,nobcs)
./pkg/ctrl/CTRL_OBCS.h 138 NO PROCEDURE 
      _RL wobcswLev  (1-oly:sny+oly,nr,nsx,nsy,nobcs)
./pkg/ctrl/CTRL_OBCS.h 149 NO PROCEDURE 
      _RL wobcse     (                      nr,nobcs)
./pkg/ctrl/CTRL_OBCS.h 150 NO PROCEDURE 
      _RL wobcseLev  (1-oly:sny+oly,nr,nsx,nsy,nobcs)
./pkg/ctrl/CTRL_OBCS.h 32 NO PROCEDURE 
      _RL modesv (nr,nr,nr)
./pkg/ctrl/CTRL_OBCS.h 92 NO PROCEDURE 
      integer nwetobcsn     ( nsx,nsy,nr,nobcs )
./pkg/ctrl/CTRL_OBCS.h 93 NO PROCEDURE 
      integer nwetobcsnglo  ( nr,nobcs )
./pkg/ctrl/CTRL_OBCS.h 97 NO PROCEDURE 
      integer nwetobcss     ( nsx,nsy,nr,nobcs )
./pkg/ctrl/CTRL_OBCS.h 98 NO PROCEDURE 
      integer nwetobcssglo  ( nr,nobcs )
./pkg/ctrl/ctrl.h 119 NO PROCEDURE 
      integer nwetctile     ( nsx,nsy,nr )
./pkg/ctrl/ctrl.h 120 NO PROCEDURE 
      integer nwetstile     ( nsx,nsy,nr )
./pkg/ctrl/ctrl.h 121 NO PROCEDURE 
      integer nwetwtile     ( nsx,nsy,nr )
./pkg/ctrl/ctrl.h 122 NO PROCEDURE 
      integer nwetvtile     ( nsx,nsy,nr )
./pkg/ctrl/ctrl.h 123 NO PROCEDURE 
      integer nwetcglobal     ( nr )
./pkg/ctrl/ctrl.h 124 NO PROCEDURE 
      integer nwetsglobal     ( nr )
./pkg/ctrl/ctrl.h 125 NO PROCEDURE 
      integer nwetwglobal     ( nr )
./pkg/ctrl/ctrl.h 126 NO PROCEDURE 
      integer nwetvglobal     ( nr )
./pkg/ctrl/ctrl.h 132 NO PROCEDURE 
      integer nwetitile     ( nsx,nsy,nr )
./pkg/ctrl/ctrl.h 133 NO PROCEDURE 
      integer nwetiglobal     ( nr )
./pkg/ctrl/ctrl.h 134 NO PROCEDURE 
      integer filenWetiGlobal(nr)
./pkg/ctrl/ctrl.h 175 NO PROCEDURE 
      integer        filenWetcGlobal(nr)
./pkg/ctrl/ctrl.h 176 NO PROCEDURE 
      integer        filenWetsGlobal(nr)
./pkg/ctrl/ctrl.h 177 NO PROCEDURE 
      integer        filenWetwGlobal(nr)
./pkg/ctrl/ctrl.h 178 NO PROCEDURE 
      integer        filenWetvGlobal(nr)
./pkg/ctrl/ctrl.h 199 NO PROCEDURE 
      _RL wunit     (nr,nsx,nsy)
./pkg/ctrl/ctrl.h 208 NO PROCEDURE 
     &    (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 337 NO PROCEDURE 
      _RL xx_theta(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 338 NO PROCEDURE 
      _RL xx_salt(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 339 NO PROCEDURE 
      _RL xx_uvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 340 NO PROCEDURE 
      _RL xx_vvel(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 343 NO PROCEDURE 
      _RL xx_diffkr(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 346 NO PROCEDURE 
      _RL xx_kapgm(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 349 NO PROCEDURE 
      _RL xx_tr1(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl.h 363 NO PROCEDURE 
      _RL xx_genarr3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy,
./pkg/ctrl/ctrl_cost_gen.F 446 CTRL_COST_GEN3D 
      _RL xx_gen_weight(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_cost_gen.F 450 CTRL_COST_GEN3D 
      _RS xx_gen_mask(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_cost_gen.F 524 CTRL_COST_GEN3D 
            do k = 1,nr
./pkg/ctrl/ctrl_cost_gen.F 83 CTRL_COST_GEN2D 
      _RS xx_gen_mask(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_get_gen.F 52 CTRL_GET_GEN 
      _RS     genmask(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_getobcse.F 169 CTRL_GETOBCSE 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcse.F 184 CTRL_GETOBCSE 
           do k = 1,nr
./pkg/ctrl/ctrl_getobcse.F 238 CTRL_GETOBCSE 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcse.F 252 CTRL_GETOBCSE 
         do k = 1,nr
./pkg/ctrl/ctrl_getobcse.F 72 CTRL_GETOBCSE 
      _RL tmpfldyz (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_getobcse.F 81 CTRL_GETOBCSE 
      _RL     tmpz (nr,nsx,nsy)
./pkg/ctrl/ctrl_getobcsn.F 174 CTRL_GETOBCSN 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcsn.F 188 CTRL_GETOBCSN 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcsn.F 243 CTRL_GETOBCSN 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcsn.F 258 CTRL_GETOBCSN 
         do k = 1,nr
./pkg/ctrl/ctrl_getobcsn.F 73 CTRL_GETOBCSN 
      _RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ctrl/ctrl_getobcsn.F 82 CTRL_GETOBCSN 
      _RL     tmpz (nr,nsx,nsy)
./pkg/ctrl/ctrl_getobcss.F 170 CTRL_GETOBCSS 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcss.F 184 CTRL_GETOBCSS 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcss.F 239 CTRL_GETOBCSS 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcss.F 253 CTRL_GETOBCSS 
         do k = 1,nr
./pkg/ctrl/ctrl_getobcss.F 74 CTRL_GETOBCSS 
      _RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ctrl/ctrl_getobcss.F 83 CTRL_GETOBCSS 
      _RL     tmpz (nr,nsx,nsy)
./pkg/ctrl/ctrl_getobcsw.F 169 CTRL_GETOBCSW 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcsw.F 183 CTRL_GETOBCSW 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcsw.F 238 CTRL_GETOBCSW 
          do k = 1,nr
./pkg/ctrl/ctrl_getobcsw.F 252 CTRL_GETOBCSW 
         do k = 1,nr
./pkg/ctrl/ctrl_getobcsw.F 73 CTRL_GETOBCSW 
      _RL tmpfldyz (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_getobcsw.F 82 CTRL_GETOBCSW 
      _RL     tmpz (nr,nsx,nsy)
./pkg/ctrl/ctrl_hfacc_ini.F 102 CTRL_HFACC_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_hfacc_ini.F 127 CTRL_HFACC_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_init.F 173 CTRL_INIT 
     &     snx, sny, nr, 'c', '3d', myThid )
./pkg/ctrl/ctrl_init.F 182 CTRL_INIT 
     &     snx, sny, nr, 'c', '3d', myThid )
./pkg/ctrl/ctrl_init.F 359 CTRL_INIT 
     &     snx, 1, nr, 'm', 'xz', myThid )
./pkg/ctrl/ctrl_init.F 372 CTRL_INIT 
     &     snx, 1, nr, 'm', 'xz', myThid )
./pkg/ctrl/ctrl_init.F 385 CTRL_INIT 
     &     1, sny, nr, 'm', 'yz', myThid )
./pkg/ctrl/ctrl_init.F 398 CTRL_INIT 
     &     1, sny, nr, 'm', 'yz', myThid )
./pkg/ctrl/ctrl_init.F 438 CTRL_INIT 
     &     snx, sny, nr, 'c', '3d', myThid )
./pkg/ctrl/ctrl_init.F 446 CTRL_INIT 
     &     snx, sny, nr, 'c', '3d', myThid )
./pkg/ctrl/ctrl_init.F 454 CTRL_INIT 
     &     snx, sny, nr, 'c', '3d', myThid )
./pkg/ctrl/ctrl_init.F 506 CTRL_INIT 
     &       snx, sny, nr, 's', '3d', myThid )
./pkg/ctrl/ctrl_init.F 514 CTRL_INIT 
     &       snx, sny, nr, 'v', '3d', myThid )
./pkg/ctrl/ctrl_init.F 538 CTRL_INIT 
     &       snx, sny, nr, 'w', '3d', myThid )
./pkg/ctrl/ctrl_init.F 542 CTRL_INIT 
     &       snx, sny, nr, 's', '3d', myThid )
./pkg/ctrl/ctrl_init.F 550 CTRL_INIT 
     &       snx, sny, nr, 'w', '3d', myThid )
./pkg/ctrl/ctrl_init.F 558 CTRL_INIT 
     &       snx, sny, nr, 's', '3d', myThid )
./pkg/ctrl/ctrl_init.F 582 CTRL_INIT 
     &       snx, sny, nr, 'c', '3d', myThid )
./pkg/ctrl/ctrl_init.F 766 CTRL_INIT 
     &     snx, sny, nr, 'c', '3d', myThid )
./pkg/ctrl/ctrl_init.F 850 CTRL_INIT 
     &       snx, sny, nr, 'c', '3d', myThid )
./pkg/ctrl/ctrl_init_obcs_variables.F 109 CTRL_INIT_OBCS_VARIABLES 
            do k = 1,nr
./pkg/ctrl/ctrl_init_obcs_variables.F 64 CTRL_INIT_OBCS_VARIABLES 
            do k = 1,nr
./pkg/ctrl/ctrl_init_obcs_variables.F 79 CTRL_INIT_OBCS_VARIABLES 
            do k = 1,nr
./pkg/ctrl/ctrl_init_obcs_variables.F 94 CTRL_INIT_OBCS_VARIABLES 
            do k = 1,nr
./pkg/ctrl/ctrl_init_wet.F 113 CTRL_INIT_WET 
          do k = 1,nr
./pkg/ctrl/ctrl_init_wet.F 353 CTRL_INIT_WET 
     &     'ctrl-wet 13: global nvarlength for Nr =', nr, nvarlength
./pkg/ctrl/ctrl_init_wet.F 365 CTRL_INIT_WET 
      do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 415 CTRL_INIT_WET 
      do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 492 CTRL_INIT_WET 
        do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 504 CTRL_INIT_WET 
        do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 516 CTRL_INIT_WET 
        do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 528 CTRL_INIT_WET 
        do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 549 CTRL_INIT_WET 
      do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 569 CTRL_INIT_WET 
      do k = 1, nr
./pkg/ctrl/ctrl_init_wet.F 74 CTRL_INIT_WET 
          do k = 1,nr
./pkg/ctrl/ctrl_init_wet.F 90 CTRL_INIT_WET 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 118 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 152 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 183 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 255 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 279 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 309 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 333 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 360 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 408 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 427 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 449 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini.F 476 CTRL_MAP_INI 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_ecco.F 122 CTRL_MAP_INI_ECCO 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_gen.F 104 CTRL_MAP_INI_GEN3D 
        DO k = 1,nr
./pkg/ctrl/ctrl_map_ini_gen.F 135 CTRL_MAP_INI_GEN3D 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_gen.F 160 CTRL_MAP_INI_GEN3D 
     & 'RL',nr,1,nr,xxFld3d,dummyRS,1,optimcycle,mythid)
./pkg/ctrl/ctrl_map_ini_gen.F 166 CTRL_MAP_INI_GEN3D 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_gen.F 188 CTRL_MAP_INI_GEN3D 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_gen.F 216 CTRL_MAP_INI_GEN3D 
     &   'RL',nr,1,nr,paramFld3d,dummyRS,1,optimcycle,mythid)
./pkg/ctrl/ctrl_map_ini_gen.F 270 CTRL_MAP_INI_GEN2D 
      _RS maskFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_gen.F 53 CTRL_MAP_INI_GEN3D 
      _RL wFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_gen.F 54 CTRL_MAP_INI_GEN3D 
      _RL xxFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_gen.F 55 CTRL_MAP_INI_GEN3D 
      _RL paramFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_gen.F 56 CTRL_MAP_INI_GEN3D 
      _RS maskFld3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_genarr.F 343 CTRL_MAP_GENARR3D 
      _RL fld   (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_genarr.F 357 CTRL_MAP_GENARR3D 
      _RL xx_gen  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_genarr.F 368 CTRL_MAP_GENARR3D 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_map_ini_genarr.F 378 CTRL_MAP_GENARR3D 
        DO k = 1,nr
./pkg/ctrl/ctrl_map_ini_genarr.F 438 CTRL_MAP_GENARR3D 
        call ECCO_CPRSRL(maskW,nr,localmask,nr,myThid)
./pkg/ctrl/ctrl_map_ini_genarr.F 440 CTRL_MAP_GENARR3D 
        call ECCO_CPRSRL(maskS,nr,localmask,nr,myThid)
./pkg/ctrl/ctrl_map_ini_genarr.F 442 CTRL_MAP_GENARR3D 
        call ECCO_CPRSRL(maskC,nr,localmask,nr,myThid)
./pkg/ctrl/ctrl_map_ini_genarr.F 448 CTRL_MAP_GENARR3D 
          do k = 1,nr
./pkg/ctrl/ctrl_map_ini_genarr.F 489 CTRL_MAP_GENARR3D 
     & 'RL',nr,1,nr,fld,dummyRS,1,optimcycle,mythid)
./pkg/ctrl/ctrl_mask_set_xz.F 131 CTRL_MASK_SET_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_xz.F 35 CTRL_MASK_SET_XZ 
      integer nwetobcs (nsx,nsy,nr,nobcs)
./pkg/ctrl/ctrl_mask_set_xz.F 58 CTRL_MASK_SET_XZ 
      _RL     maskxz   (1-olx:snx+olx,nr,nsx,nsy,nobcs)
./pkg/ctrl/ctrl_mask_set_xz.F 59 CTRL_MASK_SET_XZ 
      _RL     gg       (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ctrl/ctrl_mask_set_xz.F 86 CTRL_MASK_SET_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_xz.F 98 CTRL_MASK_SET_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_yz.F 132 CTRL_MASK_SET_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_yz.F 35 CTRL_MASK_SET_YZ 
      integer nwetobcs (nsx,nsy,nr,nobcs)
./pkg/ctrl/ctrl_mask_set_yz.F 58 CTRL_MASK_SET_YZ 
      _RL     maskyz   (1-oly:sny+oly,nr,nsx,nsy,nobcs)
./pkg/ctrl/ctrl_mask_set_yz.F 59 CTRL_MASK_SET_YZ 
      _RL     gg       (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ctrl/ctrl_mask_set_yz.F 87 CTRL_MASK_SET_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_mask_set_yz.F 99 CTRL_MASK_SET_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_pack.F 238 CTRL_PACK 
          write(cunit) (nWetcGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 239 CTRL_PACK 
          write(cunit) (nWetsGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 240 CTRL_PACK 
          write(cunit) (nWetwGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 242 CTRL_PACK 
          write(cunit) (nWetvGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 245 CTRL_PACK 
          write(cunit) (nWetiGlobal(k), k=1,nr)
./pkg/ctrl/ctrl_pack.F 251 CTRL_PACK 
          write(cunit) ((nWetobcsnGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 254 CTRL_PACK 
          write(cunit) ((nWetobcssGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 257 CTRL_PACK 
          write(cunit) ((nWetobcswGlo(k,iobcs), k=1,nr),iobcs= 1,nobcs)
./pkg/ctrl/ctrl_pack.F 260 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 182 CTRL_SET_PACK_XY 
         irectrue = (irec-1)*nr + k
./pkg/ctrl/ctrl_set_pack_xy.F 60 CTRL_SET_PACK_XY 
      _RL     globmsk  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xy.F 61 CTRL_SET_PACK_XY 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xy.F 97 CTRL_SET_PACK_XY 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xyz.F 107 CTRL_SET_PACK_XYZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xyz.F 166 CTRL_SET_PACK_XYZ 
       do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xyz.F 198 CTRL_SET_PACK_XYZ 
         do k = 1, nr
./pkg/ctrl/ctrl_set_pack_xyz.F 199 CTRL_SET_PACK_XYZ 
         irectrue = (irec-1)*nr + k
./pkg/ctrl/ctrl_set_pack_xyz.F 439 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 63 CTRL_SET_PACK_XYZ 
      _RL     globmsk  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xyz.F 64 CTRL_SET_PACK_XYZ 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xyz.F 68 CTRL_SET_PACK_XYZ 
      _RL   weightfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xz.F 117 CTRL_SET_PACK_XZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xz.F 187 CTRL_SET_PACK_XZ 
     &        nr, globfld3d, irec, mythid)
./pkg/ctrl/ctrl_set_pack_xz.F 194 CTRL_SET_PACK_XZ 
            do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xz.F 195 CTRL_SET_PACK_XZ 
             irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_pack_xz.F 202 CTRL_SET_PACK_XZ 
                  jj=mod((j-1)*nr+k-1,sny)+1
./pkg/ctrl/ctrl_set_pack_xz.F 203 CTRL_SET_PACK_XZ 
                  kk=int((j-1)*nr+K-1)/sny+1
./pkg/ctrl/ctrl_set_pack_xz.F 264 CTRL_SET_PACK_XZ 
     &        nr, globfldxz, irec, mythid)
./pkg/ctrl/ctrl_set_pack_xz.F 269 CTRL_SET_PACK_XZ 
         do k = 1,nr
./pkg/ctrl/ctrl_set_pack_xz.F 270 CTRL_SET_PACK_XZ 
            irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_pack_xz.F 47 CTRL_SET_PACK_XZ 
      _RL     weightfld( nr,nobcs )
./pkg/ctrl/ctrl_set_pack_xz.F 72 CTRL_SET_PACK_XZ 
      _RL     globfldxz  ( snx,nsx,npx,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xz.F 73 CTRL_SET_PACK_XZ 
      _RL     globfld3d  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_xz.F 74 CTRL_SET_PACK_XZ 
      _RL     globmskxz  ( snx,nsx,npx,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_pack_xz.F 78 CTRL_SET_PACK_XZ 
      _RL     weightfldxz( snx,nsx,npx,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_pack_xz.F 98 CTRL_SET_PACK_XZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_yz.F 117 CTRL_SET_PACK_YZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_pack_yz.F 189 CTRL_SET_PACK_YZ 
     &        nr, globfld3D, irec, mythid)
./pkg/ctrl/ctrl_set_pack_yz.F 197 CTRL_SET_PACK_YZ 
            do k = 1,nr
./pkg/ctrl/ctrl_set_pack_yz.F 198 CTRL_SET_PACK_YZ 
             irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_pack_yz.F 205 CTRL_SET_PACK_YZ 
                  ii=mod ( (i-1)*nr*sny+(k-1)*sny+j-1      , snx ) + 1
./pkg/ctrl/ctrl_set_pack_yz.F 206 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 207 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 268 CTRL_SET_PACK_YZ 
     &        nr, globfldyz, irec, mythid)
./pkg/ctrl/ctrl_set_pack_yz.F 273 CTRL_SET_PACK_YZ 
         do k = 1,nr
./pkg/ctrl/ctrl_set_pack_yz.F 274 CTRL_SET_PACK_YZ 
            irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_pack_yz.F 47 CTRL_SET_PACK_YZ 
      _RL     weightfld( nr,nobcs )
./pkg/ctrl/ctrl_set_pack_yz.F 72 CTRL_SET_PACK_YZ 
      _RL     globfldyz  ( nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_yz.F 73 CTRL_SET_PACK_YZ 
      _RL     globfld3d  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_pack_yz.F 74 CTRL_SET_PACK_YZ 
      _RL     globmskyz  ( nsx,npx,sny,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_pack_yz.F 78 CTRL_SET_PACK_YZ 
      _RL     weightfldyz( nsx,npx,sny,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_pack_yz.F 98 CTRL_SET_PACK_YZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xy.F 180 CTRL_SET_UNPACK_XY 
         irectrue = (irec-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_xy.F 41 CTRL_SET_UNPACK_XY 
      integer nwetglobal(nr)
./pkg/ctrl/ctrl_set_unpack_xy.F 61 CTRL_SET_UNPACK_XY 
      _RL     globmsk  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xy.F 62 CTRL_SET_UNPACK_XY 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xy.F 98 CTRL_SET_UNPACK_XY 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xyz.F 109 CTRL_SET_UNPACK_XYZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xyz.F 132 CTRL_SET_UNPACK_XYZ 
      do k = 1, nr
./pkg/ctrl/ctrl_set_unpack_xyz.F 175 CTRL_SET_UNPACK_XYZ 
       do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xyz.F 210 CTRL_SET_UNPACK_XYZ 
         irectrue = (irec-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_xyz.F 414 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 63 CTRL_SET_UNPACK_XYZ 
      _RL     globmsk  ( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xyz.F 64 CTRL_SET_UNPACK_XYZ 
      _RL     globfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xyz.F 68 CTRL_SET_UNPACK_XYZ 
      _RL   weightfld3d( snx,nsx,npx,sny,nsy,npy,nr )
./pkg/ctrl/ctrl_set_unpack_xz.F 103 CTRL_SET_UNPACK_XZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xz.F 122 CTRL_SET_UNPACK_XZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_xz.F 205 CTRL_SET_UNPACK_XZ 
               irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_xz.F 224 CTRL_SET_UNPACK_XZ 
               jj=mod((j-1)*nr+k-1,sny)+1
./pkg/ctrl/ctrl_set_unpack_xz.F 225 CTRL_SET_UNPACK_XZ 
               kk=int((j-1)*nr+k-1)/sny+1
./pkg/ctrl/ctrl_set_unpack_xz.F 292 CTRL_SET_UNPACK_XZ 
            irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_xz.F 46 CTRL_SET_UNPACK_XZ 
      _RL     weightfld( nr,nobcs )
./pkg/ctrl/ctrl_set_unpack_xz.F 47 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 81 CTRL_SET_UNPACK_XZ 
      _RL   weightfldxz( snx,nsx,npx,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_set_unpack_yz.F 103 CTRL_SET_UNPACK_YZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_yz.F 122 CTRL_SET_UNPACK_YZ 
      do k = 1,nr
./pkg/ctrl/ctrl_set_unpack_yz.F 205 CTRL_SET_UNPACK_YZ 
               irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_yz.F 228 CTRL_SET_UNPACK_YZ 
                    ii=mod((i-1)*nr*sny+(k-1)*sny+j-1,snx)+1
./pkg/ctrl/ctrl_set_unpack_yz.F 229 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 230 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 292 CTRL_SET_UNPACK_YZ 
            irectrue = (irec-1)*nobcs*nr + (iobcs-1)*nr + k
./pkg/ctrl/ctrl_set_unpack_yz.F 46 CTRL_SET_UNPACK_YZ 
      _RL     weightfld( nr,nobcs )
./pkg/ctrl/ctrl_set_unpack_yz.F 47 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 81 CTRL_SET_UNPACK_YZ 
      _RL   weightfldyz( nsx,npx,sny,nsy,npy,nr,nobcs )
./pkg/ctrl/ctrl_summary.F 115 CTRL_SUMMARY 
          do k = 1,nr
./pkg/ctrl/ctrl_summary.F 95 CTRL_SUMMARY 
      write(msgbuf,'(a,i8)') ' snx*sny*nr = ',snx*sny*nr
./pkg/ctrl/ctrl_unpack.F 112 CTRL_UNPACK 
      integer        filenWetobcsnGlo(nr,nobcs)
./pkg/ctrl/ctrl_unpack.F 115 CTRL_UNPACK 
      integer        filenWetobcssGlo(nr,nobcs)
./pkg/ctrl/ctrl_unpack.F 118 CTRL_UNPACK 
      integer        filenWetobcswGlo(nr,nobcs)
./pkg/ctrl/ctrl_unpack.F 121 CTRL_UNPACK 
      integer        filenWetobcseGlo(nr,nobcs)
./pkg/ctrl/ctrl_unpack.F 238 CTRL_UNPACK 
          read(cunit) (filenWetcGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 239 CTRL_UNPACK 
          read(cunit) (filenWetsGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 240 CTRL_UNPACK 
          read(cunit) (filenWetwGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 242 CTRL_UNPACK 
          read(cunit) (filenWetvGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 245 CTRL_UNPACK 
          read(cunit) (filenWetiGlobal(k),   k=1,nr)
./pkg/ctrl/ctrl_unpack.F 253 CTRL_UNPACK 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/ctrl/ctrl_unpack.F 257 CTRL_UNPACK 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/ctrl/ctrl_unpack.F 261 CTRL_UNPACK 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/ctrl/ctrl_unpack.F 265 CTRL_UNPACK 
     &         k=1,nr), iobcs= 1,nobcs)
./pkg/ctrl/ctrl_unpack.F 289 CTRL_UNPACK 
          do k = 1, nr
./pkg/ctrl/ctrl_unpack.F 311 CTRL_UNPACK 
         do k = 1, nr
./pkg/ctrl/ctrl_unpack.F 322 CTRL_UNPACK 
         do k = 1, nr
./pkg/ctrl/ctrl_unpack.F 333 CTRL_UNPACK 
         do k = 1, nr
./pkg/ctrl/ctrl_unpack.F 344 CTRL_UNPACK 
         do k = 1, nr
./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 14 NO PROCEDURE 
      _RL wuvel    ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 15 NO PROCEDURE 
      _RL wvvel    ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 17 NO PROCEDURE 
      _RL wdiffkr  ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 18 NO PROCEDURE 
      _RL wkapgm   ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 19 NO PROCEDURE 
      _RL wkapredi ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 20 NO PROCEDURE 
      _RL wedtaux ( nr,nsx,nsy )
./pkg/ctrl/ctrl_weights.h 21 NO PROCEDURE 
      _RL wedtauy ( nr,nsx,nsy )
./pkg/ecco/cost_averagesfields.F 138 COST_AVERAGESFIELDS 
      _RL csmm(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nr,nsx,nsy)
./pkg/ecco/cost_averagesfields.F 259 COST_AVERAGESFIELDS 
     &     sum1mon, monrec, nr, mythid )
./pkg/ecco/cost_averagesfields.F 276 COST_AVERAGESFIELDS 
     &     sum1mon, monrec, nr, mythid )
./pkg/ecco/cost_averagesfields.F 315 COST_AVERAGESFIELDS 
     &     sum1mon, monrec, nr, mythid )
./pkg/ecco/cost_averagesfields.F 331 COST_AVERAGESFIELDS 
     &     sum1mon, monrec, nr, mythid )
./pkg/ecco/cost_averagesfields.F 344 COST_AVERAGESFIELDS 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 357 COST_AVERAGESFIELDS 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 395 COST_AVERAGESFIELDS 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 609 COST_AVERAGESFIELDS 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 620 COST_AVERAGESFIELDS 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 659 COST_AVERAGESFIELDS 
            do k = 1,nr
./pkg/ecco/cost_averagesfields.F 710 COST_AVERAGESFIELDS 
     &     sum1gen(k), genrec(k), nr, mythid )
./pkg/ecco/cost_averagesfields.F 738 COST_AVERAGESFIELDS 
         do k = 1,nr
./pkg/ecco/cost_averagesinit.F 137 COST_AVERAGESINIT 
          do k = 1,nr
./pkg/ecco/cost_averagesinit.F 145 COST_AVERAGESINIT 
          nnzsigmaRbar = nr
./pkg/ecco/cost_averagesinit.F 154 COST_AVERAGESINIT 
          do k = 1,nr
./pkg/ecco/cost_averagesinit.F 162 COST_AVERAGESINIT 
          nnztbar = nr
./pkg/ecco/cost_averagesinit.F 193 COST_AVERAGESINIT 
          do k = 1,nr
./pkg/ecco/cost_averagesinit.F 201 COST_AVERAGESINIT 
          nnzsbar = nr
./pkg/ecco/cost_averagesinit.F 219 COST_AVERAGESINIT 
          do k = 1,nr
./pkg/ecco/cost_averagesinit.F 233 COST_AVERAGESINIT 
          do k = 1,nr
./pkg/ecco/cost_averagesinit.F 93 COST_AVERAGESINIT 
                do k = 1,nr
./pkg/ecco/cost_gencost_all.F 70 COST_GENCOST_ALL 
           nnzbar = nr
./pkg/ecco/cost_gencost_all.F 71 COST_GENCOST_ALL 
           nnzobs = nr
./pkg/ecco/cost_gencost_customize.F 215 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 221 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 228 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 235 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 241 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 247 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 252 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 257 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 263 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 272 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_customize.F 280 COST_GENCOST_CUSTOMIZE 
           do k2=1,nr
./pkg/ecco/cost_gencost_seaicev4.F 89 COST_GENCOST_SEAICEV4 
      _RL localmask  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_gencost_transp.F 45 COST_GENCOST_TRANSP 
      _RL myobs     (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_gencost_transp.F 46 COST_GENCOST_TRANSP 
      _RL mybar     (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_gencost_transp.F 47 COST_GENCOST_TRANSP 
      _RL localdif  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_gencost_transp.F 48 COST_GENCOST_TRANSP 
      _RL difmask   (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_gencost_transp.F 49 COST_GENCOST_TRANSP 
      _RL localweight(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_gencost_transp.F 50 COST_GENCOST_TRANSP 
      _RL localtmp   (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_generic.F 315 COST_GENLOOP 
        call ECCO_CPRSRL(maskC,nr,localmask,nr,myThid)
./pkg/ecco/cost_generic.F 317 COST_GENLOOP 
        call ECCO_CPRSRL(maskS,nr,localmask,nr,myThid)
./pkg/ecco/cost_generic.F 319 COST_GENLOOP 
        call ECCO_CPRSRL(maskW,nr,localmask,nr,myThid)
./pkg/ecco/cost_generic.F 395 COST_GENLOOP 
          if ( nnzobs.EQ.nr ) CALL
./pkg/ecco/cost_generic.F 422 COST_GENLOOP 
          if ( nnzobs.EQ.nr ) CALL
./pkg/ecco/cost_generic.F 431 COST_GENLOOP 
          if ( nnzobs.EQ.nr ) CALL
./pkg/ecco/cost_obcs_ageos.F 162 COST_OBCS_AGEOS 
          do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 229 COST_OBCS_AGEOS 
            do k = 1,nr-1
./pkg/ecco/cost_obcs_ageos.F 245 COST_OBCS_AGEOS 
            do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 298 COST_OBCS_AGEOS 
            do k = 1,nr-1
./pkg/ecco/cost_obcs_ageos.F 314 COST_OBCS_AGEOS 
            do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 367 COST_OBCS_AGEOS 
            do k = 1,nr-1
./pkg/ecco/cost_obcs_ageos.F 383 COST_OBCS_AGEOS 
            do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 434 COST_OBCS_AGEOS 
            do k = 1,nr-1
./pkg/ecco/cost_obcs_ageos.F 450 COST_OBCS_AGEOS 
            do k = 1,nr
./pkg/ecco/cost_obcs_ageos.F 86 COST_OBCS_AGEOS 
      _RL xzdvel1   (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 87 COST_OBCS_AGEOS 
      _RL xzdvel2   (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 88 COST_OBCS_AGEOS 
      _RL yzdvel1   (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 89 COST_OBCS_AGEOS 
      _RL yzdvel2   (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 90 COST_OBCS_AGEOS 
      _RL maskxzageos   (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcs_ageos.F 91 COST_OBCS_AGEOS 
      _RL maskyzageos   (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcse.F 97 COST_OBCSE 
      _RL tmpfield (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcse.F 98 COST_OBCSE 
      _RL maskyz   (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcsn.F 95 COST_OBCSN 
      _RL tmpfield (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcsn.F 96 COST_OBCSN 
      _RL maskxz   (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcss.F 95 COST_OBCSS 
      _RL tmpfield (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcss.F 96 COST_OBCSS 
      _RL maskxz   (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcsvol.F 88 COST_OBCSVOL 
      _RL tmpfldxz (1-olx:snx+olx,nr,nsx,nsy)
./pkg/ecco/cost_obcsvol.F 91 COST_OBCSVOL 
      _RL tmpfldyz (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcsw.F 95 COST_OBCSW 
      _RL tmpfield (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/cost_obcsw.F 96 COST_OBCSW 
      _RL maskyz   (1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco.h 151 NO PROCEDURE 
      _RL m_UE (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco.h 152 NO PROCEDURE 
      _RL m_VN (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco.h 261 NO PROCEDURE 
      _RL  gencost_mskVertical(nr,NGENCOST)
./pkg/ecco/ecco.h 264 NO PROCEDURE 
     &       nr,nsx,nsy,NGENCOST3D)
./pkg/ecco/ecco.h 266 NO PROCEDURE 
     &       nr,nsx,nsy,NGENCOST3D)
./pkg/ecco/ecco.h 268 NO PROCEDURE 
     &       nr,nsx,nsy,NGENCOST3D)
./pkg/ecco/ecco.h 270 NO PROCEDURE 
     &       nr,nsx,nsy,NGENCOST3D)
./pkg/ecco/ecco.h 272 NO PROCEDURE 
     &       nr,nsx,nsy,NGENCOST3D)
./pkg/ecco/ecco.h 274 NO PROCEDURE 
     &       nr,nsx,nsy,NGENCOST3D)
./pkg/ecco/ecco_check.F 64 ECCO_CHECK 
          do k = 1,nr
./pkg/ecco/ecco_cost.h 1030 NO PROCEDURE 
      _RL wtheta  (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1031 NO PROCEDURE 
      _RL wsalt   (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1032 NO PROCEDURE 
      _RL wtheta2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1033 NO PROCEDURE 
      _RL wsalt2  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1034 NO PROCEDURE 
      _RL wthetaLev (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1035 NO PROCEDURE 
      _RL wsaltLev  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1037 NO PROCEDURE 
      _RL wsigmaR   (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1038 NO PROCEDURE 
      _RL wsigmaR2  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1039 NO PROCEDURE 
      _RL wsigmaRLev(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1041 NO PROCEDURE 
      _RL wuvel   (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1042 NO PROCEDURE 
      _RL wvvel   (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1052 NO PROCEDURE 
      _RL wctdt   (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1053 NO PROCEDURE 
      _RL wctds   (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1056 NO PROCEDURE 
      _RL wcurrent(                              nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1057 NO PROCEDURE 
      _RL wcurrent2   (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1058 NO PROCEDURE 
      _RL wcurrentLev (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1060 NO PROCEDURE 
      _RL wdiffkr (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1061 NO PROCEDURE 
      _RL wdiffkr2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1062 NO PROCEDURE 
      _RL wdiffkrFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1063 NO PROCEDURE 
      _RL wkapgm (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1064 NO PROCEDURE 
      _RL wkapgm2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1065 NO PROCEDURE 
      _RL wkapgmFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1066 NO PROCEDURE 
      _RL wkapredi (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1067 NO PROCEDURE 
      _RL wkapredi2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1068 NO PROCEDURE 
      _RL wkaprediFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1069 NO PROCEDURE 
      _RL wedtaux (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1070 NO PROCEDURE 
      _RL wedtaux2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1071 NO PROCEDURE 
      _RL wedtauxFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1072 NO PROCEDURE 
      _RL wedtauy (                            nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1073 NO PROCEDURE 
      _RL wedtauy2 (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1074 NO PROCEDURE 
      _RL wedtauyFld (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1085 NO PROCEDURE 
      _RL wuvel3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1086 NO PROCEDURE 
      _RL wvvel3d(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 111 NO PROCEDURE 
      _RL sigmaRfield    (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 112 NO PROCEDURE 
      _RL sigmaRbar      (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 113 NO PROCEDURE 
      _RL sigmaRbar_gen  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1218 NO PROCEDURE 
      _RL sigmaRdat (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 121 NO PROCEDURE 
      _RL tbar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1220 NO PROCEDURE 
      _RL tdat      (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1234 NO PROCEDURE 
      _RL sdat      (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1243 NO PROCEDURE 
      _RL ctdtobs   (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1244 NO PROCEDURE 
      _RL ctdsobs   (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1245 NO PROCEDURE 
      _RL xbtobs    (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1246 NO PROCEDURE 
      _RL argotobs  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1247 NO PROCEDURE 
      _RL argosobs  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1250 NO PROCEDURE 
      _RL curmtruobs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 1251 NO PROCEDURE 
      _RL curmtrvobs(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 130 NO PROCEDURE 
      _RL tbar_gen  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 131 NO PROCEDURE 
      _RL sbar_gen  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 149 NO PROCEDURE 
      _RL sbar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 179 NO PROCEDURE 
      _RL ubar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 180 NO PROCEDURE 
      _RL vbar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 187 NO PROCEDURE 
      _RL wbar  (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 193 NO PROCEDURE 
      _RL   Tlmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 194 NO PROCEDURE 
      _RL   Slmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 195 NO PROCEDURE 
      _RL   Tfmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 196 NO PROCEDURE 
      _RL   Sfmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 205 NO PROCEDURE 
      _RL   wlmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost.h 206 NO PROCEDURE 
      _RL   wfmean(1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)
./pkg/ecco/ecco_cost_init_barfiles.F 146 ECCO_COST_INIT_BARFILES 
          do k = 1,nr
./pkg/ecco/ecco_cost_init_barfiles.F 75 ECCO_COST_INIT_BARFILES 
      _RL tmpfld3d (1-olx:snx+olx,1-oly:sny+oly,nr,nsx,nsy)