Symbol Description Uses
imax number of vertical grid points 857


File Line number Procedure Code
./pkg/exf/exf_check_range.F 42 EXF_CHECK_RANGE 
      integer imax
./pkg/exf/exf_check_range.F 70 EXF_CHECK_RANGE 
      imax = snx
./pkg/exf/exf_check_range.F 76 EXF_CHECK_RANGE 
         do i = imin,imax
./pkg/exf/exf_mapfields.F 107 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 113 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 123 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 130 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 223 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 234 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 242 EXF_MAPFIELDS 
            DO i = imin+1,imax
./pkg/exf/exf_mapfields.F 248 EXF_MAPFIELDS 
            DO i = imin+1,imax
./pkg/exf/exf_mapfields.F 261 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 272 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 280 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 286 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 298 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 306 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 314 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 322 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 330 EXF_MAPFIELDS 
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 80 EXF_MAPFIELDS 
      INTEGER imin, imax
./pkg/exf/exf_mapfields.F 82 EXF_MAPFIELDS 
      PARAMETER ( imin = 1-OLx , imax = sNx+OLx )
./pkg/fizhi/fizhi_fillnegs.F 223 TRACER_FILL 
      call MAXVAL1 (array,6,-qval,qmax,imax)
./pkg/fizhi/fizhi_fillnegs.F 225 TRACER_FILL 
      if( imax.eq.0 ) then
./pkg/fizhi/fizhi_fillnegs.F 243 TRACER_FILL 
          if( imax.eq.1 ) pq(ip1,j,L) = pq(ip1,j,L) +
./pkg/fizhi/fizhi_fillnegs.F 245 TRACER_FILL 
          if( imax.eq.2 ) pq(im1,j,L) = pq(im1,j,L) +
./pkg/fizhi/fizhi_fillnegs.F 247 TRACER_FILL 
          if( imax.eq.3 ) pq(i,j+1,L) = pq(i,j+1,L) +
./pkg/fizhi/fizhi_fillnegs.F 249 TRACER_FILL 
          if( imax.eq.4 ) pq(i,j-1,L) = pq(i,j-1,L) +
./pkg/fizhi/fizhi_fillnegs.F 251 TRACER_FILL 
          if( imax.eq.5 ) pq(i,j,L-1) = pq(i,j,L-1) +
./pkg/fizhi/fizhi_fillnegs.F 253 TRACER_FILL 
          if( imax.eq.6 ) pq(i,j,L+1) = pq(i,j,L+1) +
./pkg/fizhi/fizhi_fillnegs.F 269 MAXVAL1 
      subroutine MAXVAL1 (q,im,qval,qmax,imax)
./pkg/fizhi/fizhi_fillnegs.F 289 MAXVAL1 
      integer  im, i, imax
./pkg/fizhi/fizhi_fillnegs.F 292 MAXVAL1 
      imax = 0
./pkg/fizhi/fizhi_fillnegs.F 296 MAXVAL1 
      imax =   i
./pkg/fizhi/fizhi_fillnegs.F 89 TRACER_FILL 
      integer  i,j,l,im1,ip1,imax,m
./pkg/flt/flt_exch2.F 111 FLT_EXCH2 
               ic = (icountE-1)*imax
./pkg/flt/flt_exch2.F 140 FLT_EXCH2 
               ic = (icountW-1)*imax
./pkg/flt/flt_exch2.F 228 FLT_EXCH2 
               ic = (icountN-1)*imax
./pkg/flt/flt_exch2.F 262 FLT_EXCH2 
               ic = (icountS-1)*imax
./pkg/flt/flt_exch2.F 375 FLT_EXCH2 
            ic=(ip-1)*imax
./pkg/flt/flt_exch2.F 404 FLT_EXCH2 
            ic=(ip-1)*imax
./pkg/flt/flt_exch2.F 433 FLT_EXCH2 
            ic=(ip-1)*imax
./pkg/flt/flt_exch2.F 462 FLT_EXCH2 
            ic=(ip-1)*imax
./pkg/flt/flt_exch2.F 46 FLT_EXCH2 
      INTEGER imax, imax2, m
./pkg/flt/flt_exch2.F 50 FLT_EXCH2 
      PARAMETER(imax=9)
./pkg/flt/flt_exch2.F 51 FLT_EXCH2 
      PARAMETER(imax2=imax*max_npart_exch)
./pkg/flt/flt_exchg.F 111 FLT_EXCHG 
               ic = (icountE-1)*imax
./pkg/flt/flt_exchg.F 144 FLT_EXCHG 
               ic = (icountW-1)*imax
./pkg/flt/flt_exchg.F 236 FLT_EXCHG 
            ic=(ip-1)*imax
./pkg/flt/flt_exchg.F 265 FLT_EXCHG 
            ic=(ip-1)*imax
./pkg/flt/flt_exchg.F 344 FLT_EXCHG 
               ic = (icountN-1)*imax
./pkg/flt/flt_exchg.F 35 FLT_EXCHG 
      INTEGER imax, imax2
./pkg/flt/flt_exchg.F 36 FLT_EXCHG 
      PARAMETER(imax=9)
./pkg/flt/flt_exchg.F 37 FLT_EXCHG 
      PARAMETER(imax2=imax*max_npart_exch)
./pkg/flt/flt_exchg.F 382 FLT_EXCHG 
               ic = (icountS-1)*imax
./pkg/flt/flt_exchg.F 479 FLT_EXCHG 
            ic=(ip-1)*imax
./pkg/flt/flt_exchg.F 508 FLT_EXCHG 
            ic=(ip-1)*imax
./pkg/flt/flt_init_varia.F 116 FLT_INIT_VARIA 
     &                        'RL', imax, tmp, dummyRS,
./pkg/flt/flt_init_varia.F 131 FLT_INIT_VARIA 
     &                          'RL', imax, tmp, dummyRS,
./pkg/flt/flt_init_varia.F 178 FLT_INIT_VARIA 
     &                           'RL', imax, tmp, dummyRS,
./pkg/flt/flt_init_varia.F 191 FLT_INIT_VARIA 
     &                             'RL', imax, tmp, dummyRS,
./pkg/flt/flt_init_varia.F 49 FLT_INIT_VARIA 
      INTEGER imax
./pkg/flt/flt_init_varia.F 50 FLT_INIT_VARIA 
      PARAMETER(imax=9)
./pkg/flt/flt_init_varia.F 51 FLT_INIT_VARIA 
      _RL tmp(imax)
./pkg/flt/flt_traj.F 52 FLT_TRAJ 
      INTEGER imax
./pkg/flt/flt_traj.F 53 FLT_TRAJ 
      PARAMETER (imax=13)
./pkg/flt/flt_traj.F 54 FLT_TRAJ 
      _RL tmp(imax)
./pkg/flt/flt_up.F 47 FLT_UP 
      INTEGER imax
./pkg/flt/flt_up.F 48 FLT_UP 
      PARAMETER (imax=(9+4*Nr))
./pkg/flt/flt_up.F 49 FLT_UP 
      _RL tmp(imax)
./pkg/flt/flt_write_pickup.F 44 FLT_WRITE_PICKUP 
      INTEGER bi, bj, imax, iLen
./pkg/flt/flt_write_pickup.F 45 FLT_WRITE_PICKUP 
      PARAMETER(imax=9)
./pkg/flt/flt_write_pickup.F 47 FLT_WRITE_PICKUP 
      _RL tmp(imax)
./pkg/flt/flt_write_pickup.F 70 FLT_WRITE_PICKUP 
          tmp(7) = imax
./pkg/flt/flt_write_pickup.F 76 FLT_WRITE_PICKUP 
     &                           'RL', imax, tmp, dummyRS,
./pkg/flt/flt_write_pickup.F 95 FLT_WRITE_PICKUP 
     &                             'RL', imax, tmp, dummyRS,
./pkg/gchem/gchem_forcing_sep.F 157 GCHEM_FORCING_SEP 
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/gchem/gchem_forcing_sep.F 166 GCHEM_FORCING_SEP 
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/gchem/gchem_forcing_sep.F 173 GCHEM_FORCING_SEP 
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/gchem/gchem_forcing_sep.F 188 GCHEM_FORCING_SEP 
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/gchem/gchem_forcing_sep.F 191 GCHEM_FORCING_SEP 
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/gchem/gchem_forcing_sep.F 194 GCHEM_FORCING_SEP 
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/gchem/gchem_forcing_sep.F 197 GCHEM_FORCING_SEP 
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/gchem/gchem_forcing_sep.F 204 GCHEM_FORCING_SEP 
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/grdchk/grdchk_get_obcs_mask.F 112 GRDCHK_GET_OBCS_MASK 
                  do i = imin,imax
./pkg/grdchk/grdchk_get_obcs_mask.F 46 GRDCHK_GET_OBCS_MASK 
      integer imin,imax
./pkg/grdchk/grdchk_get_obcs_mask.F 73 GRDCHK_GET_OBCS_MASK 
      imax = snx
./pkg/grdchk/grdchk_get_obcs_mask.F 89 GRDCHK_GET_OBCS_MASK 
                  do i = imin,imax
./pkg/grdchk/grdchk_get_position.F 69 GRDCHK_GET_POSITION 
      integer imin,imax
./pkg/grdchk/grdchk_get_position.F 86 GRDCHK_GET_POSITION 
      imax = snx
./pkg/grdchk/grdchk_init.F 48 GRDCHK_INIT 
      integer imin,imax
./pkg/grdchk/grdchk_init.F 62 GRDCHK_INIT 
      imax = snx
./pkg/grdchk/grdchk_loc.F 85 GRDCHK_LOC 
      integer imin,imax
./pkg/grdchk/grdchk_loc.F 99 GRDCHK_LOC 
      imax = snx
./pkg/kpp/kpp_calc.F 150 KPP_CALC 
      integer   imin      ,imax          ,jmin      ,jmax
./pkg/kpp/kpp_calc.F 151 KPP_CALC 
      parameter(imin=2-OLx,imax=sNx+OLx-1,jmin=2-OLy,jmax=sNy+OLy-1)
./pkg/kpp/kpp_calc.F 460 KPP_CALC 
        DO i = imin, imax
./pkg/kpp/kpp_calc.F 561 KPP_CALC 
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 178 KPP_FORCING_SURF 
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 192 KPP_FORCING_SURF 
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 207 KPP_FORCING_SURF 
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 226 KPP_FORCING_SURF 
            DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 239 KPP_FORCING_SURF 
          DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 296 KPP_FORCING_SURF 
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 380 KPP_FORCING_SURF 
        DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 421 KPP_FORCING_SURF 
        DO i = imin, imax
./pkg/kpp/kpp_routines.F 1174 SMOOTH_HORIZ 
      integer   imin      , imax          , jmin      , jmax
./pkg/kpp/kpp_routines.F 1175 SMOOTH_HORIZ 
      parameter(imin=2-OLx, imax=sNx+OLx-1, jmin=2-OLy, jmax=sNy+OLy-1)
./pkg/kpp/kpp_routines.F 1183 SMOOTH_HORIZ 
         DO i = imin, imax
./pkg/kpp/kpp_routines.F 1216 SMOOTH_HORIZ 
         DO i = imin, imax
./pkg/kpp/kpp_routines.F 1757 KPP_DOUBLEDIFF 
     I     ikppkey, imin, imax, jmin, jmax, bi, bj, myThid )
./pkg/kpp/kpp_routines.F 1794 KPP_DOUBLEDIFF 
      INTEGER ikppkey, imin, imax, jmin, jmax, bi, bj, myThid
./model/src/calc_ivdc.F 49 CALC_IVDC 
        DO i=iMin,imax
./pkg/obcs/obcs_sponge.F 135 OBCS_SPONGE_U 
         IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 169 OBCS_SPONGE_U 
         IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 325 OBCS_SPONGE_V 
         IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 359 OBCS_SPONGE_V 
         IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 552 OBCS_SPONGE_T 
         IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 595 OBCS_SPONGE_T 
         IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 790 OBCS_SPONGE_S 
         IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 834 OBCS_SPONGE_S 
         IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/salt_plume/salt_plume_frac.F 10 SALT_PLUME_FRAC 
     I                  imax, fact,SPDepth,
./pkg/salt_plume/salt_plume_frac.F 55 SALT_PLUME_FRAC 
      INTEGER imax
./pkg/salt_plume/salt_plume_frac.F 64 SALT_PLUME_FRAC 
      _RL     plumek(imax), SPDepth(imax)
./pkg/salt_plume/salt_plume_frac.F 66 SALT_PLUME_FRAC 
      _RL     lon(imax), lat(imax)
./pkg/salt_plume/salt_plume_frac.F 85 SALT_PLUME_FRAC 
      DO i = 1,imax
./pkg/salt_plume/salt_plume_frac.F 90 SALT_PLUME_FRAC 
         IF(lat(imax).LT. 85.0 .AND. lat(imax).GT. 71.0
./pkg/salt_plume/salt_plume_frac.F 91 SALT_PLUME_FRAC 
     &      .AND. lon(imax) .LT. -90.0) Npowerloc = Npower(1)
./pkg/seaice/seaice_cost_concentration.F 126 SEAICE_COST_CONCENTRATION 
      imax = snx
./pkg/seaice/seaice_cost_concentration.F 244 SEAICE_COST_CONCENTRATION 
                  do i = imin,imax
./pkg/seaice/seaice_cost_concentration.F 258 SEAICE_COST_CONCENTRATION 
                do i = imin,imax
./pkg/seaice/seaice_cost_concentration.F 316 SEAICE_COST_CONCENTRATION 
                do i = imin,imax
./pkg/seaice/seaice_cost_concentration.F 336 SEAICE_COST_CONCENTRATION 
              do i = imin,imax
./pkg/seaice/seaice_cost_concentration.F 349 SEAICE_COST_CONCENTRATION 
              do i = imin,imax
./pkg/seaice/seaice_cost_concentration.F 78 SEAICE_COST_CONCENTRATION 
      integer imin,imax
./pkg/seaice/seaice_cost_init_varia.F 42 SEAICE_COST_INIT_VARIA 
      integer imin, imax
./pkg/seaice/seaice_cost_init_varia.F 58 SEAICE_COST_INIT_VARIA 
      imax = sNx+OLx
./pkg/seaice/seaice_cost_init_varia.F 80 SEAICE_COST_INIT_VARIA 
            do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 127 SEAICE_COST_SSS 
      imax = snx
./pkg/seaice/seaice_cost_sss.F 262 SEAICE_COST_SSS 
                  do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 276 SEAICE_COST_SSS 
                do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 296 SEAICE_COST_SSS 
              do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 309 SEAICE_COST_SSS 
              do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 79 SEAICE_COST_SSS 
      integer imin,imax
./pkg/seaice/seaice_cost_sst.F 130 SEAICE_COST_SST 
      imax = snx
./pkg/seaice/seaice_cost_sst.F 262 SEAICE_COST_SST 
                  do i = imin,imax
./pkg/seaice/seaice_cost_sst.F 276 SEAICE_COST_SST 
                do i = imin,imax
./pkg/seaice/seaice_cost_sst.F 296 SEAICE_COST_SST 
              do i = imin,imax
./pkg/seaice/seaice_cost_sst.F 309 SEAICE_COST_SST 
              do i = imin,imax
./pkg/seaice/seaice_cost_sst.F 77 SEAICE_COST_SST 
      integer imin,imax
./pkg/seaice/seaice_cost_weights.F 109 SEAICE_COST_WEIGHTS 
               do i = imin,imax
./pkg/seaice/seaice_cost_weights.F 120 SEAICE_COST_WEIGHTS 
               do i = imin,imax
./pkg/seaice/seaice_cost_weights.F 132 SEAICE_COST_WEIGHTS 
            do i = imin,imax
./pkg/seaice/seaice_cost_weights.F 46 SEAICE_COST_WEIGHTS 
      integer imin,imax
./pkg/seaice/seaice_cost_weights.F 69 SEAICE_COST_WEIGHTS 
      imax = snx+olx
./pkg/seaice/seaice_cost_weights.F 73 SEAICE_COST_WEIGHTS 
        do i = imin,imax
./pkg/seaice/seaice_cost_weights.F 89 SEAICE_COST_WEIGHTS 
            do i = imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 102 SEAICE_CTRL_MAP_INI 
              do i = imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 122 SEAICE_CTRL_MAP_INI 
              do i = imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 142 SEAICE_CTRL_MAP_INI 
              do i = imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 52 SEAICE_CTRL_MAP_INI 
      integer imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 78 SEAICE_CTRL_MAP_INI 
      imax = snx
./pkg/seaice/seaice_fgmres.F 467 SEAICE_FGMRES 
      integer imax
./pkg/seaice/seaice_fgmres.F 468 SEAICE_FGMRES 
      parameter ( imax = 50 )
./pkg/seaice/seaice_fgmres.F 469 SEAICE_FGMRES 
      _RL hh(4*imax+1,4*imax),c(4*imax),s(4*imax)
./pkg/seaice/seaice_fgmres.F 470 SEAICE_FGMRES 
      _RL rs(4*imax+1),t,ro
./pkg/seaice/seaice_fgmres.F 489 SEAICE_FGMRES 
      if ( im .gt. imax ) stop 'size of krylov space > 50'
./pkg/seaice/seaice_preconditioner.F 330 SEAICE_PRECONDITIONER 
     I        imin, imax, jmin, jmax, bi, bj, myTime, myIter, myThid )
./pkg/seaice/seaice_preconditioner.F 367 SEAICE_PRECONDITIONER 
     I        imin, imax, jmin, jmax, bi, bj, myTime, myIter, myThid )
./pkg/smooth/smooth_init3d.F 29 SMOOTH_INIT3D 
      integer i,j,k, bi, bj, imin, imax, jmin, jmax
./pkg/smooth/smooth_init_fixed.F 24 SMOOTH_INIT_FIXED 
      integer i,j,k, bi, bj, imin, imax, jmin, jmax
./pkg/streamice/streamice_tridiag_solve.F 102 STREAMICE_TRIDIAG_SOLVE 
      DO i=imin+1,imax
./pkg/streamice/streamice_tridiag_solve.F 115 STREAMICE_TRIDIAG_SOLVE 
      DO i=imin+1,imax
./pkg/streamice/streamice_tridiag_solve.F 122 STREAMICE_TRIDIAG_SOLVE 
      DO i=imax-1,imin,-1
./pkg/streamice/streamice_tridiag_solve.F 128 STREAMICE_TRIDIAG_SOLVE 
       DO i=imin,imax
./pkg/streamice/streamice_tridiag_solve.F 67 STREAMICE_TRIDIAG_SOLVE 
      imax = 0
./pkg/streamice/streamice_tridiag_solve.F 90 STREAMICE_TRIDIAG_SOLVE 
      IF(imax.eq.0) THEN
./pkg/streamice/streamice_tridiag_solve.F 91 STREAMICE_TRIDIAG_SOLVE 
       imax=Nx
./verification/flt_example/extra/cvprofiles.F 150 NO PROCEDURE 
      imax=(6+4*Nr)
./verification/flt_example/extra/cvprofiles.F 151 NO PROCEDURE 
      ilen=imax*8
./verification/flt_example/extra/cvprofiles.F 153 NO PROCEDURE 
      allocate (tmp(imax))
./verification/global_ocean.90x40x15/code_ad/ctrl_map_ini_genarr.F 55 CTRL_MAP_INI_GENARR 
      integer imin,imax
./verification/global_ocean.90x40x15/code_ad/ctrl_map_ini_genarr.F 70 CTRL_MAP_INI_GENARR 
      imax = sNx
./verification/global_ocean.90x40x15/code_ad/ctrl_map_ini_genarr.F 96 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 151 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 59 CTRL_MAP_INI_GENARR 
      integer imin,imax
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 72 CTRL_MAP_INI_GENARR 
      imax = sNx
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 94 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 159 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 59 CTRL_MAP_INI_GENARR 
      integer imin,imax
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 74 CTRL_MAP_INI_GENARR 
      imax = sNx
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 97 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F 51 CTRL_MAP_GENTIM2D 
      integer imin,imax
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F 162 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F 55 CTRL_MAP_INI_GENARR 
      integer imin,imax
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F 70 CTRL_MAP_INI_GENARR 
      imax = sNx
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F 96 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 51 CTRL_MAP_GENTIM2D 
      integer imin,imax
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F 161 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F 54 CTRL_MAP_INI_GENARR 
      integer imin,imax
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F 69 CTRL_MAP_INI_GENARR 
      imax = sNx
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F 95 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F 144 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F 54 CTRL_MAP_INI_GENARR 
      integer imin,imax
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F 69 CTRL_MAP_INI_GENARR 
      imax = sNx
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F 95 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 141 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 54 CTRL_MAP_INI_GENARR 
      integer imin,imax
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 68 CTRL_MAP_INI_GENARR 
      imax = sNx
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 93 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F 144 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F 54 CTRL_MAP_INI_GENARR 
      integer imin,imax
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F 69 CTRL_MAP_INI_GENARR 
      imax = sNx
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F 95 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./model/src/swfrac.F 100 SWFRAC 
      DO i = 1,imax
./model/src/swfrac.F 11 SWFRAC 
     I                  imax, fact,
./model/src/swfrac.F 46 SWFRAC 
      INTEGER imax
./model/src/swfrac.F 55 SWFRAC 
      _RL     swdk(imax)
./pkg/admtlm/admtlm_bypassad.F 115 ADMTLM_BYPASSAD 
              do i = imin, imax
./pkg/admtlm/admtlm_bypassad.F 133 ADMTLM_BYPASSAD 
              do i = imin, imax
./pkg/admtlm/admtlm_bypassad.F 151 ADMTLM_BYPASSAD 
              do i = imin, imax
./pkg/admtlm/admtlm_bypassad.F 169 ADMTLM_BYPASSAD 
              do i = imin, imax
./pkg/admtlm/admtlm_bypassad.F 35 ADMTLM_BYPASSAD 
      integer imin, imax
./pkg/admtlm/admtlm_bypassad.F 62 ADMTLM_BYPASSAD 
      imax = snx
./pkg/admtlm/admtlm_bypassad.F 75 ADMTLM_BYPASSAD 
         DO i = imin, imax
./pkg/admtlm/admtlm_bypassad.F 98 ADMTLM_BYPASSAD 
            do i = imin, imax
./pkg/ctrl/ctrl_depth_ini.F 106 CTRL_DEPTH_INI 
            do i = imin,imax
./pkg/ctrl/ctrl_depth_ini.F 122 CTRL_DEPTH_INI 
         do i = imin,imax
./pkg/ctrl/ctrl_depth_ini.F 45 CTRL_DEPTH_INI 
      integer imin,imax
./pkg/ctrl/ctrl_depth_ini.F 71 CTRL_DEPTH_INI 
      imax = snx+olx
./pkg/ctrl/ctrl_depth_ini.F 95 CTRL_DEPTH_INI 
         do i = imin,imax
./pkg/ctrl/ctrl_get_gen.F 66 CTRL_GET_GEN 
      integer imin,imax
./pkg/ctrl/ctrl_get_gen.F 97 CTRL_GET_GEN 
      imax = snx+olx
./pkg/ctrl/ctrl_getobcse.F 58 CTRL_GETOBCSE 
      integer imin,imax
./pkg/ctrl/ctrl_getobcse.F 99 CTRL_GETOBCSE 
      imax = snx+olx
./pkg/ctrl/ctrl_getobcsn.F 105 CTRL_GETOBCSN 
      imax = snx
./pkg/ctrl/ctrl_getobcsn.F 136 CTRL_GETOBCSN 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 174 CTRL_GETOBCSN 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 188 CTRL_GETOBCSN 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 205 CTRL_GETOBCSN 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 243 CTRL_GETOBCSN 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 59 CTRL_GETOBCSN 
      integer imin,imax
./pkg/ctrl/ctrl_getobcss.F 101 CTRL_GETOBCSS 
      imax = snx+olx
./pkg/ctrl/ctrl_getobcss.F 132 CTRL_GETOBCSS 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 170 CTRL_GETOBCSS 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 184 CTRL_GETOBCSS 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 201 CTRL_GETOBCSS 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 239 CTRL_GETOBCSS 
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 60 CTRL_GETOBCSS 
      integer imin,imax
./pkg/ctrl/ctrl_getobcsw.F 100 CTRL_GETOBCSW 
      imax = snx+olx
./pkg/ctrl/ctrl_getobcsw.F 59 CTRL_GETOBCSW 
      integer imin,imax
./pkg/ctrl/ctrl_hfacc_ini.F 104 CTRL_HFACC_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_hfacc_ini.F 129 CTRL_HFACC_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_hfacc_ini.F 144 CTRL_HFACC_INI 
               do i = imin,imax
./pkg/ctrl/ctrl_hfacc_ini.F 45 CTRL_HFACC_INI 
      integer imin,imax
./pkg/ctrl/ctrl_hfacc_ini.F 71 CTRL_HFACC_INI 
      imax = snx+olx
./pkg/ctrl/ctrl_init.F 53 CTRL_INIT 
      integer imin,imax
./pkg/ctrl/ctrl_init.F 81 CTRL_INIT 
      imax = snx+olx
./pkg/ctrl/ctrl_init.F 845 CTRL_INIT 
         do i = imin,imax
./pkg/ctrl/ctrl_init_obcs_variables.F 43 CTRL_INIT_OBCS_VARIABLES 
      integer imin,imax
./pkg/ctrl/ctrl_init_obcs_variables.F 57 CTRL_INIT_OBCS_VARIABLES 
      imax = snx+olx
./pkg/ctrl/ctrl_init_obcs_variables.F 64 CTRL_INIT_OBCS_VARIABLES 
              do i = imin,imax
./pkg/ctrl/ctrl_init_obcs_variables.F 79 CTRL_INIT_OBCS_VARIABLES 
              do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 102 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 115 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 128 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 141 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 154 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 167 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 180 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 193 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 206 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 219 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 232 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 245 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 258 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 271 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 284 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 297 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 310 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 323 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 335 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 44 CTRL_INIT_VARIABLES 
      integer imin,imax
./pkg/ctrl/ctrl_init_variables.F 57 CTRL_INIT_VARIABLES 
      imax = sNx+OLx
./pkg/ctrl/ctrl_init_variables.F 63 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 76 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 89 CTRL_INIT_VARIABLES 
            do i = imin,imax
./pkg/ctrl/ctrl_init_wet.F 114 CTRL_INIT_WET 
              do i = imin,imax
./pkg/ctrl/ctrl_init_wet.F 40 CTRL_INIT_WET 
      integer imin,imax
./pkg/ctrl/ctrl_init_wet.F 65 CTRL_INIT_WET 
      imax = snx
./pkg/ctrl/ctrl_map_forcing.F 123 CTRL_MAP_FORCING 
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 148 CTRL_MAP_FORCING 
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 173 CTRL_MAP_FORCING 
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 198 CTRL_MAP_FORCING 
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 217 CTRL_MAP_FORCING 
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 236 CTRL_MAP_FORCING 
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 51 CTRL_MAP_FORCING 
      integer imin,imax
./pkg/ctrl/ctrl_map_forcing.F 82 CTRL_MAP_FORCING 
      imax = snx
./pkg/ctrl/ctrl_map_forcing.F 98 CTRL_MAP_FORCING 
            do i = imin,imax
./pkg/ctrl/ctrl_map_gentim2d.F 51 CTRL_MAP_GENTIM2D 
      integer imin,imax
./pkg/ctrl/ctrl_map_ini.F 112 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 152 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 189 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 217 CTRL_MAP_INI 
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 238 CTRL_MAP_INI 
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 261 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 291 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 321 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 345 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 372 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 399 CTRL_MAP_INI 
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 420 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 439 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 461 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 488 CTRL_MAP_INI 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 514 CTRL_MAP_INI 
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 541 CTRL_MAP_INI 
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 562 CTRL_MAP_INI 
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 60 CTRL_MAP_INI 
      integer imin,imax
./pkg/ctrl/ctrl_map_ini.F 86 CTRL_MAP_INI 
      imax = snx
./pkg/ctrl/ctrl_map_ini_ecco.F 103 CTRL_MAP_INI_ECCO 
      imax = snx
./pkg/ctrl/ctrl_map_ini_ecco.F 113 CTRL_MAP_INI_ECCO 
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini_ecco.F 125 CTRL_MAP_INI_ECCO 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_ecco.F 70 CTRL_MAP_INI_ECCO 
      integer imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 120 CTRL_MAP_INI_GEN3D 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 151 CTRL_MAP_INI_GEN3D 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 173 CTRL_MAP_INI_GEN3D 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 265 CTRL_MAP_INI_GEN2D 
      integer imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 295 CTRL_MAP_INI_GEN2D 
      imax = snx
./pkg/ctrl/ctrl_map_ini_gen.F 316 CTRL_MAP_INI_GEN2D 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 345 CTRL_MAP_INI_GEN2D 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 365 CTRL_MAP_INI_GEN2D 
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 68 CTRL_MAP_INI_GEN3D 
      integer imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 98 CTRL_MAP_INI_GEN3D 
      imax = snx
./pkg/ctrl/ctrl_map_ini_genarr.F 139 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini_genarr.F 54 CTRL_MAP_INI_GENARR 
      integer imin,imax
./pkg/ctrl/ctrl_map_ini_genarr.F 67 CTRL_MAP_INI_GENARR 
      imax = sNx
./pkg/ctrl/ctrl_map_ini_genarr.F 92 CTRL_MAP_INI_GENARR 
            do i = imin,imax
./pkg/ctrl/ctrl_mask_set_xz.F 130 CTRL_MASK_SET_XZ 
              do i = imin,imax
./pkg/ctrl/ctrl_mask_set_xz.F 45 CTRL_MASK_SET_XZ 
      integer imin,imax
./pkg/ctrl/ctrl_mask_set_xz.F 76 CTRL_MASK_SET_XZ 
      imax = snx
./pkg/ctrl/ctrl_mask_set_xz.F 98 CTRL_MASK_SET_XZ 
              do i = imin,imax
./pkg/ctrl/ctrl_mask_set_yz.F 45 CTRL_MASK_SET_YZ 
      integer imin,imax
./pkg/ctrl/ctrl_mask_set_yz.F 76 CTRL_MASK_SET_YZ 
      imax = snx
./pkg/ctrl/ctrl_set_globfld_xy.F 51 CTRL_SET_GLOBFLD_XY 
      integer imin,imax
./pkg/ctrl/ctrl_set_globfld_xy.F 68 CTRL_SET_GLOBFLD_XY 
      imax = snx+oLx
./pkg/ctrl/ctrl_set_globfld_xy.F 74 CTRL_SET_GLOBFLD_XY 
               do i = imin,imax
./pkg/ctrl/ctrl_set_globfld_xy.F 85 CTRL_SET_GLOBFLD_XY 
                  do i = imin,imax
./pkg/ctrl/ctrl_set_globfld_xyz.F 46 CTRL_SET_GLOBFLD_XYZ 
      integer imin,imax
./pkg/ctrl/ctrl_set_globfld_xyz.F 62 CTRL_SET_GLOBFLD_XYZ 
      imax = snx+oLx
./pkg/ctrl/ctrl_set_globfld_xyz.F 69 CTRL_SET_GLOBFLD_XYZ 
                  do i = imin,imax
./pkg/ctrl/ctrl_set_globfld_xz.F 51 CTRL_SET_GLOBFLD_XZ 
      integer imin,imax
./pkg/ctrl/ctrl_set_globfld_xz.F 68 CTRL_SET_GLOBFLD_XZ 
      imax = snx+oLx
./pkg/ctrl/ctrl_set_globfld_xz.F 74 CTRL_SET_GLOBFLD_XZ 
               do i = imin,imax
./pkg/ctrl/ctrl_set_globfld_xz.F 85 CTRL_SET_GLOBFLD_XZ 
                  do i = imin,imax
./pkg/ctrl/ctrl_set_globfld_yz.F 51 CTRL_SET_GLOBFLD_YZ 
      integer imin,imax
./pkg/ctrl/ctrl_set_globfld_yz.F 69 CTRL_SET_GLOBFLD_YZ 
      imax = snx+oLx
./pkg/ctrl/ctrl_set_globfld_yz.F 86 CTRL_SET_GLOBFLD_YZ 
                  do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xy.F 100 CTRL_SET_PACK_XY 
            do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xy.F 158 CTRL_SET_PACK_XY 
             do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xy.F 191 CTRL_SET_PACK_XY 
                 do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xy.F 285 CTRL_SET_PACK_XY 
                 do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xy.F 56 CTRL_SET_PACK_XY 
      integer imin,imax
./pkg/ctrl/ctrl_set_pack_xy.F 89 CTRL_SET_PACK_XY 
      imax = snx
./pkg/ctrl/ctrl_set_pack_xyz.F 109 CTRL_SET_PACK_XYZ 
            do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xyz.F 168 CTRL_SET_PACK_XYZ 
             do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xyz.F 207 CTRL_SET_PACK_XYZ 
                 do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xyz.F 59 CTRL_SET_PACK_XYZ 
      integer imin,imax
./pkg/ctrl/ctrl_set_pack_xyz.F 93 CTRL_SET_PACK_XYZ 
      imax = snx
./pkg/ctrl/ctrl_set_pack_xz.F 102 CTRL_SET_PACK_XZ 
                     do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 122 CTRL_SET_PACK_XZ 
                        do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 200 CTRL_SET_PACK_XZ 
                 do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 275 CTRL_SET_PACK_XZ 
                do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 61 CTRL_SET_PACK_XZ 
      integer imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 94 CTRL_SET_PACK_XZ 
      imax = snx
./pkg/ctrl/ctrl_set_pack_yz.F 122 CTRL_SET_PACK_YZ 
                        do i = imin,imax
./pkg/ctrl/ctrl_set_pack_yz.F 61 CTRL_SET_PACK_YZ 
      integer imin,imax
./pkg/ctrl/ctrl_set_pack_yz.F 94 CTRL_SET_PACK_YZ 
      imax = snx
./pkg/ctrl/ctrl_set_unpack_xy.F 101 CTRL_SET_UNPACK_XY 
            do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xy.F 159 CTRL_SET_UNPACK_XY 
             do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xy.F 215 CTRL_SET_UNPACK_XY 
                 do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xy.F 325 CTRL_SET_UNPACK_XY 
                 do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xy.F 57 CTRL_SET_UNPACK_XY 
      integer imin,imax
./pkg/ctrl/ctrl_set_unpack_xy.F 90 CTRL_SET_UNPACK_XY 
      imax = snx
./pkg/ctrl/ctrl_set_unpack_xyz.F 111 CTRL_SET_UNPACK_XYZ 
            do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xyz.F 177 CTRL_SET_UNPACK_XYZ 
             do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xyz.F 238 CTRL_SET_UNPACK_XYZ 
                 do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xyz.F 59 CTRL_SET_UNPACK_XYZ 
      integer imin,imax
./pkg/ctrl/ctrl_set_unpack_xyz.F 95 CTRL_SET_UNPACK_XYZ 
      imax = snx
./pkg/ctrl/ctrl_set_unpack_xz.F 107 CTRL_SET_UNPACK_XZ 
                     do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 127 CTRL_SET_UNPACK_XZ 
                        do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 229 CTRL_SET_UNPACK_XZ 
                   do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 314 CTRL_SET_UNPACK_XZ 
                do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 62 CTRL_SET_UNPACK_XZ 
      integer imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 97 CTRL_SET_UNPACK_XZ 
      imax = snx
./pkg/ctrl/ctrl_set_unpack_yz.F 127 CTRL_SET_UNPACK_YZ 
                        do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_yz.F 62 CTRL_SET_UNPACK_YZ 
      integer imin,imax
./pkg/ctrl/ctrl_set_unpack_yz.F 97 CTRL_SET_UNPACK_YZ 
      imax = snx
./pkg/ctrl/ctrl_smooth.F 31 CTRL_SMOOTH 
      integer   imin      , imax          , jmin      , jmax
./pkg/ctrl/ctrl_smooth.F 32 CTRL_SMOOTH 
      parameter(imin=2-OLx, imax=sNx+OLx-1, jmin=2-OLy, jmax=sNy+OLy-1)
./pkg/ctrl/ctrl_smooth.F 44 CTRL_SMOOTH 
          DO i = imin, imax
./pkg/ctrl/ctrl_smooth.F 77 CTRL_SMOOTH 
          DO i = imin, imax
./pkg/dic/alk_surfforcing.F 11 ALK_SURFFORCING 
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/alk_surfforcing.F 53 ALK_SURFFORCING 
          DO i=imin,imax
./pkg/dic/bio_export.F 104 BIO_EXPORT 
        DO i=imin,imax
./pkg/dic/bio_export.F 15 BIO_EXPORT 
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/bio_export.F 46 BIO_EXPORT 
      INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/bio_export.F 84 BIO_EXPORT 
       DO i=imin,imax
./pkg/dic/calcite_saturation.F 11 CALCITE_SATURATION 
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/calcite_saturation.F 38 CALCITE_SATURATION 
       INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/calcite_saturation.F 82 CALCITE_SATURATION 
         DO i=imin,imax
./pkg/dic/car_flux.F 103 CAR_FLUX 
         DO i=imin,imax
./pkg/dic/car_flux.F 11 CAR_FLUX 
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/car_flux.F 128 CAR_FLUX 
        DO i=imin,imax
./pkg/dic/car_flux.F 35 CAR_FLUX 
      INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/car_flux.F 64 CAR_FLUX 
        DO i=imin,imax
./pkg/dic/car_flux.F 85 CAR_FLUX 
        DO i=imin,imax
./pkg/dic/car_flux_omega_top.F 11 CAR_FLUX_OMEGA_TOP 
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/car_flux_omega_top.F 37 CAR_FLUX_OMEGA_TOP 
       INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/car_flux_omega_top.F 81 CAR_FLUX_OMEGA_TOP 
        DO i=imin,imax
./pkg/dic/carbon_chem.F 586 CARBON_COEFFS 
        do i=imin,imax
./pkg/dic/carbon_chem.F 866 CARBON_COEFFS_PRESSURE_DEP 
        do i=imin,imax
./pkg/dic/dic_biotic_forcing.F 143 DIC_BIOTIC_FORCING 
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 148 DIC_BIOTIC_FORCING 
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 154 DIC_BIOTIC_FORCING 
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 171 DIC_BIOTIC_FORCING 
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 176 DIC_BIOTIC_FORCING 
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 182 DIC_BIOTIC_FORCING 
          DO i=imin,imax
./pkg/dic/dic_biotic_forcing.F 18 DIC_BIOTIC_FORCING 
     &                            bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 197 DIC_BIOTIC_FORCING 
     I                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 202 DIC_BIOTIC_FORCING 
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 207 DIC_BIOTIC_FORCING 
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 214 DIC_BIOTIC_FORCING 
          DO i=imin,imax
./pkg/dic/dic_biotic_forcing.F 247 DIC_BIOTIC_FORCING 
          DO i=imin,imax
./pkg/dic/dic_biotic_forcing.F 265 DIC_BIOTIC_FORCING 
          DO i=imin,imax
./pkg/dic/dic_biotic_forcing.F 300 DIC_BIOTIC_FORCING 
          DO i=imin,imax
./pkg/dic/dic_biotic_forcing.F 317 DIC_BIOTIC_FORCING 
          DO i=imin,imax
./pkg/dic/dic_biotic_forcing.F 59 DIC_BIOTIC_FORCING 
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/dic/dic_surfforcing.F 12 DIC_SURFFORCING 
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_surfforcing.F 132 DIC_SURFFORCING 
        DO i=imin,imax
./pkg/dic/dic_surfforcing.F 157 DIC_SURFFORCING 
        DO i=imin,imax
./pkg/dic/dic_surfforcing.F 180 DIC_SURFFORCING 
        DO i=imin,imax
./pkg/dic/dic_surfforcing.F 252 DIC_SURFFORCING 
          DO i=imin,imax
./pkg/dic/dic_surfforcing.F 87 DIC_SURFFORCING 
         DO i=imin,imax
./pkg/dic/o2_surfforcing.F 123 O2_SURFFORCING 
          DO i=imin,imax
./pkg/dic/o2_surfforcing.F 71 O2_SURFFORCING 
          DO i=imin,imax
./pkg/dic/phos_flux.F 107 PHOS_FLUX 
         DO i=imin,imax
./pkg/dic/phos_flux.F 11 PHOS_FLUX 
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/phos_flux.F 135 PHOS_FLUX 
        DO i=imin,imax
./pkg/dic/phos_flux.F 35 PHOS_FLUX 
      INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/phos_flux.F 65 PHOS_FLUX 
        DO i=imin,imax
./pkg/dic/phos_flux.F 87 PHOS_FLUX 
        DO i=imin,imax
./pkg/ecco/cost_argo_salt.F 164 COST_ARGO_SALT 
               do i = imin,imax
./pkg/ecco/cost_argo_salt.F 55 COST_ARGO_SALT 
      integer imin,imax
./pkg/ecco/cost_argo_salt.F 98 COST_ARGO_SALT 
      imax = snx
./pkg/ecco/cost_argo_theta.F 167 COST_ARGO_THETA 
               do i = imin,imax
./pkg/ecco/cost_argo_theta.F 55 COST_ARGO_THETA 
      integer imin,imax
./pkg/ecco/cost_argo_theta.F 99 COST_ARGO_THETA 
      imax = snx
./pkg/ecco/cost_atlantic.F 107 COST_ATLANTIC 
      imax = snx
./pkg/ecco/cost_atlantic.F 151 COST_ATLANTIC 
                do i =  imin,imax
./pkg/ecco/cost_atlantic.F 198 COST_ATLANTIC 
                do i =  imin,imax
./pkg/ecco/cost_atlantic.F 65 COST_ATLANTIC 
      integer imin,imax
./pkg/ecco/cost_averagesfields.F 149 COST_AVERAGESFIELDS 
      imax = snx
./pkg/ecco/cost_averagesfields.F 200 COST_AVERAGESFIELDS 
              do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 332 COST_AVERAGESFIELDS 
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 345 COST_AVERAGESFIELDS 
                do i = imin,imax
./pkg/ecco/cost_averagesfields.F 383 COST_AVERAGESFIELDS 
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 406 COST_AVERAGESFIELDS 
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 417 COST_AVERAGESFIELDS 
                do i = imin,imax
./pkg/ecco/cost_averagesfields.F 452 COST_AVERAGESFIELDS 
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 587 COST_AVERAGESFIELDS 
              do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 597 COST_AVERAGESFIELDS 
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 608 COST_AVERAGESFIELDS 
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 647 COST_AVERAGESFIELDS 
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 709 COST_AVERAGESFIELDS 
           do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 78 COST_AVERAGESFIELDS 
      integer imin,imax
./pkg/ecco/cost_averagesgeneric.F 106 COST_AVERAGESGENERIC 
                do i = imin,imax
./pkg/ecco/cost_averagesgeneric.F 136 COST_AVERAGESGENERIC 
                do i = imin,imax
./pkg/ecco/cost_averagesgeneric.F 64 COST_AVERAGESGENERIC 
      integer imin,imax
./pkg/ecco/cost_averagesgeneric.F 84 COST_AVERAGESGENERIC 
      imax = snx
./pkg/ecco/cost_averagesgeneric.F 93 COST_AVERAGESGENERIC 
                do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 108 COST_AVERAGESINIT 
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 119 COST_AVERAGESINIT 
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 136 COST_AVERAGESINIT 
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 148 COST_AVERAGESINIT 
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 161 COST_AVERAGESINIT 
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 175 COST_AVERAGESINIT 
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 187 COST_AVERAGESINIT 
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 201 COST_AVERAGESINIT 
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 215 COST_AVERAGESINIT 
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 227 COST_AVERAGESINIT 
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 239 COST_AVERAGESINIT 
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 249 COST_AVERAGESINIT 
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 261 COST_AVERAGESINIT 
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 53 COST_AVERAGESINIT 
      integer imin,imax
./pkg/ecco/cost_averagesinit.F 66 COST_AVERAGESINIT 
      imax = snx
./pkg/ecco/cost_averagesinit.F 74 COST_AVERAGESINIT 
              do i = imin,imax
./pkg/ecco/cost_averagesinit.F 86 COST_AVERAGESINIT 
            do i = imin,imax
./pkg/ecco/cost_averagesinit.F 97 COST_AVERAGESINIT 
            do i = imin,imax
./pkg/ecco/cost_bottomdrag.F 105 COST_BOTTOMDRAG 
              do i = imin,imax
./pkg/ecco/cost_bottomdrag.F 45 COST_BOTTOMDRAG 
      integer imin,imax
./pkg/ecco/cost_bottomdrag.F 75 COST_BOTTOMDRAG 
      imax = snx
./pkg/ecco/cost_bp_read.F 117 COST_BP_READ 
           do i = imin,imax
./pkg/ecco/cost_bp_read.F 131 COST_BP_READ 
            do i = imin,imax
./pkg/ecco/cost_bp_read.F 50 COST_BP_READ 
      integer imin,imax
./pkg/ecco/cost_bp_read.F 86 COST_BP_READ 
      imax = snx
./pkg/ecco/cost_ctds.F 157 COST_CTDS 
                do i = imin,imax
./pkg/ecco/cost_ctds.F 54 COST_CTDS 
      integer imin,imax
./pkg/ecco/cost_ctds.F 98 COST_CTDS 
      imax = snx
./pkg/ecco/cost_ctdsclim.F 102 COST_CTDSCLIM 
      imax = snx
./pkg/ecco/cost_ctdsclim.F 136 COST_CTDSCLIM 
                        do i = imin,imax
./pkg/ecco/cost_ctdsclim.F 179 COST_CTDSCLIM 
                do i = imin,imax
./pkg/ecco/cost_ctdsclim.F 193 COST_CTDSCLIM 
                do i = imin,imax
./pkg/ecco/cost_ctdsclim.F 66 COST_CTDSCLIM 
      integer imin,imax
./pkg/ecco/cost_ctdt.F 158 COST_CTDT 
                do i = imin,imax
./pkg/ecco/cost_ctdt.F 55 COST_CTDT 
      integer imin,imax
./pkg/ecco/cost_ctdt.F 99 COST_CTDT 
      imax = snx
./pkg/ecco/cost_ctdtclim.F 101 COST_CTDTCLIM 
      imax = snx
./pkg/ecco/cost_ctdtclim.F 135 COST_CTDTCLIM 
                        do i = imin,imax
./pkg/ecco/cost_ctdtclim.F 178 COST_CTDTCLIM 
                do i = imin,imax
./pkg/ecco/cost_ctdtclim.F 193 COST_CTDTCLIM 
                do i = imin,imax
./pkg/ecco/cost_ctdtclim.F 66 COST_CTDTCLIM 
      integer imin,imax
./pkg/ecco/cost_curmtr.F 167 COST_CURMTR 
                do i = imin,imax
./pkg/ecco/cost_curmtr.F 210 COST_CURMTR 
                do i = imin,imax
./pkg/ecco/cost_curmtr.F 255 COST_CURMTR 
                do i = imin,imax
./pkg/ecco/cost_curmtr.F 55 COST_CURMTR 
      integer imin,imax
./pkg/ecco/cost_curmtr.F 96 COST_CURMTR 
      imax = snx
./pkg/ecco/cost_diffkr.F 106 COST_DIFFKR 
              do i = imin,imax
./pkg/ecco/cost_diffkr.F 45 COST_DIFFKR 
      integer imin,imax
./pkg/ecco/cost_diffkr.F 75 COST_DIFFKR 
      imax = snx
./pkg/ecco/cost_drift.F 120 COST_DRIFT 
              do i = imin,imax
./pkg/ecco/cost_drift.F 157 COST_DRIFT 
                do i = imin,imax
./pkg/ecco/cost_drift.F 189 COST_DRIFT 
                do i = imin,imax
./pkg/ecco/cost_drift.F 209 COST_DRIFT 
             do i = imin,imax
./pkg/ecco/cost_drift.F 246 COST_DRIFT 
             do i = imin,imax
./pkg/ecco/cost_drift.F 60 COST_DRIFT 
      integer imin,imax
./pkg/ecco/cost_drift.F 93 COST_DRIFT 
      imax = snx
./pkg/ecco/cost_drifter.F 112 COST_DRIFTER 
      imax = snx
./pkg/ecco/cost_drifter.F 162 COST_DRIFTER 
           do i = imin,imax
./pkg/ecco/cost_drifter.F 192 COST_DRIFTER 
            do i = imin,imax
./pkg/ecco/cost_drifter.F 215 COST_DRIFTER 
           do i = i6min,imax-5,6
./pkg/ecco/cost_drifter.F 245 COST_DRIFTER 
           do i = i6min,imax-5,6
./pkg/ecco/cost_drifter.F 275 COST_DRIFTER 
           do i = i6min,imax-5, 6
./pkg/ecco/cost_drifter.F 304 COST_DRIFTER 
            do i = i6min,imax-5, 6
./pkg/ecco/cost_drifter.F 69 COST_DRIFTER 
      integer imin,imax
./pkg/ecco/cost_driftw.F 110 COST_DRIFTW 
              do i = imin,imax
./pkg/ecco/cost_driftw.F 140 COST_DRIFTW 
                do i = imin,imax
./pkg/ecco/cost_driftw.F 165 COST_DRIFTW 
                do i = imin,imax
./pkg/ecco/cost_driftw.F 188 COST_DRIFTW 
             do i = imin,imax
./pkg/ecco/cost_driftw.F 60 COST_DRIFTW 
      integer imin,imax
./pkg/ecco/cost_driftw.F 90 COST_DRIFTW 
      imax = snx
./pkg/ecco/cost_etan0.F 117 COST_ETAN0 
              do i = imin,imax
./pkg/ecco/cost_etan0.F 57 COST_ETAN0 
      integer imin,imax
./pkg/ecco/cost_etan0.F 87 COST_ETAN0 
      imax = snx
./pkg/ecco/cost_forcing_gen.F 115 COST_FORCING_GEN 
      imax = snx
./pkg/ecco/cost_forcing_gen.F 136 COST_FORCING_GEN 
            do i = imin,imax
./pkg/ecco/cost_forcing_gen.F 160 COST_FORCING_GEN 
              do i = imin,imax
./pkg/ecco/cost_forcing_gen.F 179 COST_FORCING_GEN 
          do i = imin,imax
./pkg/ecco/cost_forcing_gen.F 213 COST_FORCING_GEN 
              do i = imin,imax
./pkg/ecco/cost_forcing_gen.F 263 COST_FORCING_GEN 
              do i = imin,imax
./pkg/ecco/cost_forcing_gen.F 80 COST_FORCING_GEN 
      integer imin,imax
./pkg/ecco/cost_gencost_customize.F 45 COST_GENCOST_CUSTOMIZE 
      integer imin,imax
./pkg/ecco/cost_gencost_customize.F 56 COST_GENCOST_CUSTOMIZE 
      imax = snx
./pkg/ecco/cost_gencost_customize.F 61 COST_GENCOST_CUSTOMIZE 
         do i =  imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 153 COST_GENCOST_SEAICEV4 
      imax = snx
./pkg/ecco/cost_gencost_seaicev4.F 184 COST_GENCOST_SEAICEV4 
              do i = imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 318 COST_GENCOST_SEAICEV4 
                  do i = imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 352 COST_GENCOST_SEAICEV4 
                  do i = imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 370 COST_GENCOST_SEAICEV4 
              do i = imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 406 COST_GENCOST_SEAICEV4 
              do i = imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 82 COST_GENCOST_SEAICEV4 
      integer imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1052 COST_GENCOST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1067 COST_GENCOST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1131 COST_GENCOST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 168 COST_GENCOST_SSHV4 
      imax = snx
./pkg/ecco/cost_gencost_sshv4.F 253 COST_GENCOST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 281 COST_GENCOST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 317 COST_GENCOST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 354 COST_GENCOST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 379 COST_GENCOST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 436 COST_GENCOST_SSHV4 
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 486 COST_GENCOST_SSHV4 
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 602 COST_GENCOST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 698 COST_GENCOST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 737 COST_GENCOST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 787 COST_GENCOST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 80 COST_GENCOST_SSHV4 
      integer imin,imax
./pkg/ecco/cost_gencost_sshv4.F 840 COST_GENCOST_SSHV4 
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 869 COST_GENCOST_SSHV4 
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 913 COST_GENCOST_SSHV4 
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 973 COST_GENCOST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 122 COST_GENCOST_SSTV4 
      imax = snx
./pkg/ecco/cost_gencost_sstv4.F 162 COST_GENCOST_SSTV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 225 COST_GENCOST_SSTV4 
                      do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 237 COST_GENCOST_SSTV4 
                do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 257 COST_GENCOST_SSTV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 308 COST_GENCOST_SSTV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 377 COST_GENCOST_SSTV4 
                      do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 389 COST_GENCOST_SSTV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 415 COST_GENCOST_SSTV4 
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 62 COST_GENCOST_SSTV4 
      integer imin,imax
./pkg/ecco/cost_generic.F 129 COST_GENERIC 
      imax = snx
./pkg/ecco/cost_generic.F 141 COST_GENERIC 
              do i = imin,imax
./pkg/ecco/cost_generic.F 254 COST_GENERIC 
                  do i = imin,imax
./pkg/ecco/cost_generic.F 272 COST_GENERIC 
              do i = imin,imax
./pkg/ecco/cost_generic.F 285 COST_GENERIC 
              do i = imin,imax
./pkg/ecco/cost_generic.F 78 COST_GENERIC 
      integer imin,imax
./pkg/ecco/cost_ies.F 130 COST_IES 
              do i = imin,imax
./pkg/ecco/cost_ies.F 148 COST_IES 
              do i = imin,imax
./pkg/ecco/cost_ies.F 192 COST_IES 
              do i = imin,imax
./pkg/ecco/cost_ies.F 60 COST_IES 
      integer imin,imax
./pkg/ecco/cost_ies.F 90 COST_IES 
      imax = snx
./pkg/ecco/cost_ies.F 97 COST_IES 
            do i = imin,imax
./pkg/ecco/cost_ies_read.F 110 COST_IES_READ 
            do i = imin,imax
./pkg/ecco/cost_ies_read.F 50 COST_IES_READ 
      integer imin,imax
./pkg/ecco/cost_ies_read.F 84 COST_IES_READ 
      imax = snx
./pkg/ecco/cost_kapgm.F 109 COST_KAPGM 
              do i = imin,imax
./pkg/ecco/cost_kapgm.F 48 COST_KAPGM 
      integer imin,imax
./pkg/ecco/cost_kapgm.F 78 COST_KAPGM 
      imax = snx
./pkg/ecco/cost_kapredi.F 109 COST_KAPREDI 
              do i = imin,imax
./pkg/ecco/cost_kapredi.F 48 COST_KAPREDI 
      integer imin,imax
./pkg/ecco/cost_kapredi.F 78 COST_KAPREDI 
      imax = snx
./pkg/ecco/cost_mean_heatflux.F 115 COST_MEAN_HEATFLUX 
              do i = imin,imax
./pkg/ecco/cost_mean_heatflux.F 55 COST_MEAN_HEATFLUX 
      integer imin,imax
./pkg/ecco/cost_mean_heatflux.F 87 COST_MEAN_HEATFLUX 
      imax = snx
./pkg/ecco/cost_mean_saltflux.F 115 COST_MEAN_SALTFLUX 
              do i = imin,imax
./pkg/ecco/cost_mean_saltflux.F 55 COST_MEAN_SALTFLUX 
      integer imin,imax
./pkg/ecco/cost_mean_saltflux.F 87 COST_MEAN_SALTFLUX 
      imax = snx
./pkg/ecco/cost_obcs_ageos.F 104 COST_OBCS_AGEOS 
      imax = snx
./pkg/ecco/cost_obcs_ageos.F 216 COST_OBCS_AGEOS 
              do i = imin, imax
./pkg/ecco/cost_obcs_ageos.F 245 COST_OBCS_AGEOS 
              do i = imin, imax
./pkg/ecco/cost_obcs_ageos.F 258 COST_OBCS_AGEOS 
              do i = imin,imax
./pkg/ecco/cost_obcs_ageos.F 285 COST_OBCS_AGEOS 
              do i = imin, imax
./pkg/ecco/cost_obcs_ageos.F 315 COST_OBCS_AGEOS 
               do i = imin, imax
./pkg/ecco/cost_obcs_ageos.F 326 COST_OBCS_AGEOS 
               do i = imin,imax
./pkg/ecco/cost_obcs_ageos.F 56 COST_OBCS_AGEOS 
      integer imin,imax
./pkg/ecco/cost_obcse.F 109 COST_OBCSE 
      imax = snx
./pkg/ecco/cost_obcse.F 73 COST_OBCSE 
      integer imin,imax
./pkg/ecco/cost_obcsn.F 107 COST_OBCSN 
      imax = snx
./pkg/ecco/cost_obcsn.F 168 COST_OBCSN 
              do i = imin,imax
./pkg/ecco/cost_obcsn.F 73 COST_OBCSN 
      integer imin,imax
./pkg/ecco/cost_obcss.F 107 COST_OBCSS 
      imax = snx
./pkg/ecco/cost_obcss.F 170 COST_OBCSS 
              do i = imin,imax
./pkg/ecco/cost_obcss.F 73 COST_OBCSS 
      integer imin,imax
./pkg/ecco/cost_obcsvol.F 109 COST_OBCSVOL 
      imax = snx
./pkg/ecco/cost_obcsvol.F 205 COST_OBCSVOL 
                do i = imin,imax
./pkg/ecco/cost_obcsvol.F 247 COST_OBCSVOL 
                do i = imin,imax
./pkg/ecco/cost_obcsvol.F 58 COST_OBCSVOL 
      integer imin,imax
./pkg/ecco/cost_obcsw.F 107 COST_OBCSW 
      imax = snx
./pkg/ecco/cost_obcsw.F 73 COST_OBCSW 
      integer imin,imax
./pkg/ecco/cost_readargos.F 50 COST_READARGOS 
      integer imin,imax
./pkg/ecco/cost_readargos.F 71 COST_READARGOS 
      imax = snx
./pkg/ecco/cost_readargos.F 91 COST_READARGOS 
                  do i = imin,imax
./pkg/ecco/cost_readargot.F 50 COST_READARGOT 
      integer imin,imax
./pkg/ecco/cost_readargot.F 71 COST_READARGOT 
      imax = snx
./pkg/ecco/cost_readargot.F 91 COST_READARGOT 
                  do i = imin,imax
./pkg/ecco/cost_readers.F 133 COST_READERS 
          do i = imin,imax
./pkg/ecco/cost_readers.F 145 COST_READERS 
            do i = imin,imax
./pkg/ecco/cost_readers.F 51 COST_READERS 
      integer imin,imax
./pkg/ecco/cost_readers.F 86 COST_READERS 
      imax = snx
./pkg/ecco/cost_readgfo.F 133 COST_READGFO 
          do i = imin,imax
./pkg/ecco/cost_readgfo.F 145 COST_READGFO 
            do i = imin,imax
./pkg/ecco/cost_readgfo.F 51 COST_READGFO 
      integer imin,imax
./pkg/ecco/cost_readgfo.F 86 COST_READGFO 
      imax = snx
./pkg/ecco/cost_readscatxfields.F 102 COST_READSCATXFIELDS 
      imax = snx
./pkg/ecco/cost_readscatxfields.F 172 COST_READSCATXFIELDS 
                do i = imin,imax
./pkg/ecco/cost_readscatxfields.F 187 COST_READSCATXFIELDS 
            do i = imin,imax
./pkg/ecco/cost_readscatxfields.F 214 COST_READSCATXFIELDS 
            do i = imin,imax
./pkg/ecco/cost_readscatxfields.F 53 COST_READSCATXFIELDS 
      integer imin,imax
./pkg/ecco/cost_readscatyfields.F 102 COST_READSCATYFIELDS 
      imax = snx
./pkg/ecco/cost_readscatyfields.F 171 COST_READSCATYFIELDS 
                do i = imin,imax
./pkg/ecco/cost_readscatyfields.F 185 COST_READSCATYFIELDS 
            do i = imin,imax
./pkg/ecco/cost_readscatyfields.F 212 COST_READSCATYFIELDS 
            do i = imin,imax
./pkg/ecco/cost_readscatyfields.F 53 COST_READSCATYFIELDS 
      integer imin,imax
./pkg/ecco/cost_readtopex.F 160 COST_READTOPEX 
          do i = imin,imax
./pkg/ecco/cost_readtopex.F 172 COST_READTOPEX 
            do i = imin,imax
./pkg/ecco/cost_readtopex.F 51 COST_READTOPEX 
      integer imin,imax
./pkg/ecco/cost_readtopex.F 91 COST_READTOPEX 
      imax = snx
./pkg/ecco/cost_readtopexmean.F 51 COST_READTOPEXMEAN 
      integer imin,imax
./pkg/ecco/cost_readtopexmean.F 64 COST_READTOPEXMEAN 
      imax = snx
./pkg/ecco/cost_readtopexmean.F 77 COST_READTOPEXMEAN 
            do i = imin,imax
./pkg/ecco/cost_salt.F 123 COST_SALT 
                        do i = imin,imax
./pkg/ecco/cost_salt.F 142 COST_SALT 
                        do i = imin,imax
./pkg/ecco/cost_salt.F 179 COST_SALT 
                do i = imin,imax
./pkg/ecco/cost_salt.F 194 COST_SALT 
                do i = imin,imax
./pkg/ecco/cost_salt.F 63 COST_SALT 
      integer imin,imax
./pkg/ecco/cost_salt.F 98 COST_SALT 
      imax = snx
./pkg/ecco/cost_salt0.F 118 COST_SALT0 
              do i = imin,imax
./pkg/ecco/cost_salt0.F 158 COST_SALT0 
              do i = imin,imax
./pkg/ecco/cost_salt0.F 57 COST_SALT0 
      integer imin,imax
./pkg/ecco/cost_salt0.F 87 COST_SALT0 
      imax = snx
./pkg/ecco/cost_salt_ini_fin.F 108 COST_SALT_INI_FIN 
              do i = imin,imax
./pkg/ecco/cost_salt_ini_fin.F 49 COST_SALT_INI_FIN 
      integer imin,imax
./pkg/ecco/cost_salt_ini_fin.F 79 COST_SALT_INI_FIN 
      imax = snx
./pkg/ecco/cost_scat.F 135 COST_SCAT 
              do i = imin,imax
./pkg/ecco/cost_scat.F 163 COST_SCAT 
              do i = imin,imax
./pkg/ecco/cost_scat.F 183 COST_SCAT 
              do i = imin,imax
./pkg/ecco/cost_scat.F 54 COST_SCAT 
      integer imin,imax
./pkg/ecco/cost_scat.F 93 COST_SCAT 
      imax = snx
./pkg/ecco/cost_sigmar.F 100 COST_SIGMAR 
      imax = snx
./pkg/ecco/cost_sigmar.F 125 COST_SIGMAR 
                        do i = imin,imax
./pkg/ecco/cost_sigmar.F 144 COST_SIGMAR 
                        do i = imin,imax
./pkg/ecco/cost_sigmar.F 172 COST_SIGMAR 
                do i = imin,imax
./pkg/ecco/cost_sigmar.F 187 COST_SIGMAR 
                do i = imin,imax
./pkg/ecco/cost_sigmar.F 64 COST_SIGMAR 
      integer imin,imax
./pkg/ecco/cost_sla_read.F 128 COST_SLA_READ 
          do i = imin,imax
./pkg/ecco/cost_sla_read.F 141 COST_SLA_READ 
            do i = imin,imax
./pkg/ecco/cost_sla_read.F 48 COST_SLA_READ 
      integer imin,imax
./pkg/ecco/cost_sla_read.F 91 COST_SLA_READ 
      imax = snx
./pkg/ecco/cost_sla_read_yd.F 119 COST_SLA_READ_YD 
            do i = imin,imax
./pkg/ecco/cost_sla_read_yd.F 158 COST_SLA_READ_YD 
            do i = imin,imax
./pkg/ecco/cost_sla_read_yd.F 57 COST_SLA_READ_YD 
      integer imin,imax
./pkg/ecco/cost_sla_read_yd.F 94 COST_SLA_READ_YD 
      imax = snx
./pkg/ecco/cost_ssh.F 100 COST_SSH 
      imax = snx
./pkg/ecco/cost_ssh.F 106 COST_SSH 
        do i = imin, imax
./pkg/ecco/cost_ssh.F 129 COST_SSH 
            do i = imin,imax
./pkg/ecco/cost_ssh.F 150 COST_SSH 
              do i = imin,imax
./pkg/ecco/cost_ssh.F 263 COST_SSH 
              do i = imin,imax
./pkg/ecco/cost_ssh.F 290 COST_SSH 
              do i = imin,imax
./pkg/ecco/cost_ssh.F 317 COST_SSH 
              do i = imin,imax
./pkg/ecco/cost_ssh.F 67 COST_SSH 
      integer imin,imax
./pkg/ecco/cost_ssh_mean.F 110 COST_SSH_MEAN 
      imax = snx
./pkg/ecco/cost_ssh_mean.F 120 COST_SSH_MEAN 
            do i = imin,imax
./pkg/ecco/cost_ssh_mean.F 139 COST_SSH_MEAN 
            do i = imin,imax
./pkg/ecco/cost_ssh_mean.F 187 COST_SSH_MEAN 
              do i = imin,imax
./pkg/ecco/cost_ssh_mean.F 237 COST_SSH_MEAN 
            do i = imin,imax
./pkg/ecco/cost_ssh_mean.F 265 COST_SSH_MEAN 
            do i = imin,imax
./pkg/ecco/cost_ssh_mean.F 71 COST_SSH_MEAN 
      integer imin,imax
./pkg/ecco/cost_ssh_new.F 111 COST_SSH_NEW 
      imax = snx
./pkg/ecco/cost_ssh_new.F 132 COST_SSH_NEW 
            do i = imin,imax
./pkg/ecco/cost_ssh_new.F 181 COST_SSH_NEW 
              do i = imin,imax
./pkg/ecco/cost_ssh_new.F 219 COST_SSH_NEW 
              do i = imin,imax
./pkg/ecco/cost_ssh_new.F 346 COST_SSH_NEW 
              do i = imin,imax
./pkg/ecco/cost_ssh_new.F 375 COST_SSH_NEW 
              do i = imin,imax
./pkg/ecco/cost_ssh_new.F 404 COST_SSH_NEW 
              do i = imin,imax
./pkg/ecco/cost_ssh_new.F 67 COST_SSH_NEW 
      integer imin,imax
./pkg/ecco/cost_sshv4.F 164 COST_SSHV4 
      imax = snx
./pkg/ecco/cost_sshv4.F 213 COST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_sshv4.F 241 COST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_sshv4.F 277 COST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_sshv4.F 313 COST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_sshv4.F 337 COST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_sshv4.F 391 COST_SSHV4 
              do i = imin,imax
./pkg/ecco/cost_sshv4.F 441 COST_SSHV4 
              do i = imin,imax
./pkg/ecco/cost_sshv4.F 535 COST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_sshv4.F 621 COST_SSHV4 
            do i = imin,imax
./pkg/ecco/cost_sshv4.F 654 COST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_sshv4.F 702 COST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_sshv4.F 73 COST_SSHV4 
      integer imin,imax
./pkg/ecco/cost_sshv4.F 764 COST_SSHV4 
              do i = imin,imax
./pkg/ecco/cost_sshv4.F 844 COST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_sshv4.F 890 COST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_sshv4.F 905 COST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_sshv4.F 963 COST_SSHV4 
          do i = imin,imax
./pkg/ecco/cost_tau_eddy.F 112 COST_TAU_EDDY 
              do i = imin,imax
./pkg/ecco/cost_tau_eddy.F 147 COST_TAU_EDDY 
              do i = imin,imax
./pkg/ecco/cost_tau_eddy.F 48 COST_TAU_EDDY 
      integer imin,imax
./pkg/ecco/cost_tau_eddy.F 87 COST_TAU_EDDY 
      imax = snx
./pkg/ecco/cost_theta.F 123 COST_THETA 
                        do i = imin,imax
./pkg/ecco/cost_theta.F 142 COST_THETA 
                        do i = imin,imax
./pkg/ecco/cost_theta.F 179 COST_THETA 
                do i = imin,imax
./pkg/ecco/cost_theta.F 194 COST_THETA 
                do i = imin,imax
./pkg/ecco/cost_theta.F 64 COST_THETA 
      integer imin,imax
./pkg/ecco/cost_theta.F 98 COST_THETA 
      imax = snx
./pkg/ecco/cost_theta0.F 118 COST_THETA0 
              do i = imin,imax
./pkg/ecco/cost_theta0.F 158 COST_THETA0 
              do i = imin,imax
./pkg/ecco/cost_theta0.F 57 COST_THETA0 
      integer imin,imax
./pkg/ecco/cost_theta0.F 87 COST_THETA0 
      imax = snx
./pkg/ecco/cost_theta_ini_fin.F 108 COST_THETA_INI_FIN 
              do i = imin,imax
./pkg/ecco/cost_theta_ini_fin.F 49 COST_THETA_INI_FIN 
      integer imin,imax
./pkg/ecco/cost_theta_ini_fin.F 79 COST_THETA_INI_FIN 
      imax = snx
./pkg/ecco/cost_trans_merid.F 130 COST_TRANS_MERID 
      imax = snx
./pkg/ecco/cost_trans_merid.F 198 COST_TRANS_MERID 
                do i =  imin,imax
./pkg/ecco/cost_trans_merid.F 56 COST_TRANS_MERID 
      integer imin,imax
./pkg/ecco/cost_trans_zonal.F 119 COST_TRANS_ZONAL 
      imax = snx
./pkg/ecco/cost_trans_zonal.F 187 COST_TRANS_ZONAL 
                do i =  imin,imax
./pkg/ecco/cost_trans_zonal.F 56 COST_TRANS_ZONAL 
      integer imin,imax
./pkg/ecco/cost_uvel0.F 118 COST_UVEL0 
              do i = imin,imax
./pkg/ecco/cost_uvel0.F 57 COST_UVEL0 
      integer imin,imax
./pkg/ecco/cost_uvel0.F 87 COST_UVEL0 
      imax = snx
./pkg/ecco/cost_vvel0.F 118 COST_VVEL0 
              do i = imin,imax
./pkg/ecco/cost_vvel0.F 57 COST_VVEL0 
      integer imin,imax
./pkg/ecco/cost_vvel0.F 87 COST_VVEL0 
      imax = snx
./pkg/ecco/cost_xbt.F 100 COST_XBT 
      imax = snx
./pkg/ecco/cost_xbt.F 163 COST_XBT 
                do i = imin,imax
./pkg/ecco/cost_xbt.F 183 COST_XBT 
                do i = imin,imax
./pkg/ecco/cost_xbt.F 55 COST_XBT 
      integer imin,imax
./pkg/ecco/ecco_cost_init_barfiles.F 116 ECCO_COST_INIT_BARFILES 
      imax = snx
./pkg/ecco/ecco_cost_init_barfiles.F 121 ECCO_COST_INIT_BARFILES 
            do i =  imin,imax
./pkg/ecco/ecco_cost_init_barfiles.F 131 ECCO_COST_INIT_BARFILES 
              do i =  imin,imax
./pkg/ecco/ecco_cost_init_barfiles.F 52 ECCO_COST_INIT_BARFILES 
      integer imin,imax
./pkg/ecco/ecco_cost_init_varia.F 242 ECCO_COST_INIT_VARIA 
            do i = imin,imax
./pkg/ecco/ecco_cost_init_varia.F 314 ECCO_COST_INIT_VARIA 
          do i = imin,imax
./pkg/ecco/ecco_cost_init_varia.F 47 ECCO_COST_INIT_VARIA 
      integer imin, imax
./pkg/ecco/ecco_cost_init_varia.F 64 ECCO_COST_INIT_VARIA 
      imax = snx+OLy
./pkg/ecco/ecco_cost_weights.F 1007 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 102 ECCO_COST_WEIGHTS 
      imax = snx+olx
./pkg/ecco/ecco_cost_weights.F 1045 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1077 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1112 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1146 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1181 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 119 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1213 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1245 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1277 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1309 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1341 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1373 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1406 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1438 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1471 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1495 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1518 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1542 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1566 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1590 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1622 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1653 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1694 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1727 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 179 ECCO_COST_WEIGHTS 
              do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 2000 ECCO_COST_WEIGHTS 
              do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 235 ECCO_COST_WEIGHTS 
        do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 256 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 298 ECCO_COST_WEIGHTS 
      imax = snx
./pkg/ecco/ecco_cost_weights.F 367 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 385 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 410 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 428 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 456 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 475 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 503 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 522 ECCO_COST_WEIGHTS 
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 54 ECCO_COST_WEIGHTS 
      integer imin,imax
./pkg/ecco/ecco_cost_weights.F 553 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 624 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 642 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 663 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 702 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 739 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 768 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 779 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 790 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 818 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 839 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 867 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 904 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 938 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 976 ECCO_COST_WEIGHTS 
            do i = imin,imax
./pkg/ecco/ecco_phys.F 45 ECCO_PHYS 
      integer imin,imax