Symbol Description Uses
imax number of vertical grid points 742



File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 247 ECCO_COST_INIT_VARIA
            do i = imin,imax
./pkg/ecco/ecco_cost_init_varia.F 262 ECCO_COST_INIT_VARIA
            do i = imin,imax
./pkg/ecco/ecco_cost_init_varia.F 334 ECCO_COST_INIT_VARIA
          do i = imin,imax
./pkg/ecco/ecco_cost_init_varia.F 56 ECCO_COST_INIT_VARIA
      integer imin, imax
./pkg/ecco/ecco_cost_init_varia.F 73 ECCO_COST_INIT_VARIA
      imax = snx+OLy
./pkg/ecco/ecco_cost_weights.F 1000 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1031 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1069 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1101 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 111 ECCO_COST_WEIGHTS
      imax = snx+olx
./pkg/ecco/ecco_cost_weights.F 1136 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1169 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1204 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1236 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1268 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 128 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1300 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1332 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1364 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1396 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1429 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1461 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1494 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 1541 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1565 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1589 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1613 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1635 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1676 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1709 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 188 ECCO_COST_WEIGHTS
              do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 1973 ECCO_COST_WEIGHTS
              do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 248 ECCO_COST_WEIGHTS
        do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 269 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 315 ECCO_COST_WEIGHTS
      imax = snx
./pkg/ecco/ecco_cost_weights.F 387 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 405 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 430 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 448 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 476 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 495 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 523 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 542 ECCO_COST_WEIGHTS
             do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 573 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 63 ECCO_COST_WEIGHTS
      integer imin,imax
./pkg/ecco/ecco_cost_weights.F 645 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 664 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 685 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 724 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 761 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 801 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 812 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 840 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 861 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 891 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 928 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_cost_weights.F 962 ECCO_COST_WEIGHTS
            do i = imin,imax
./pkg/ecco/ecco_phys.F 131 ECCO_PHYS
              do i =  imin,imax
./pkg/ecco/ecco_phys.F 43 ECCO_PHYS
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 1001 ECCO_MULT
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 1012 ECCO_MULT
      imax = snx
./pkg/ecco/ecco_toolbox.F 1018 ECCO_MULT
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 1063 ECCO_MULTFIELD
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 1074 ECCO_MULTFIELD
      imax = snx
./pkg/ecco/ecco_toolbox.F 1080 ECCO_MULTFIELD
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 1217 ECCO_READWEI
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 1228 ECCO_READWEI
      imax = snx
./pkg/ecco/ecco_toolbox.F 1236 ECCO_READWEI
         DO i = imin,imax
./pkg/ecco/ecco_toolbox.F 138 ECCO_DIFFMSK
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 149 ECCO_DIFFMSK
      imax = snx
./pkg/ecco/ecco_toolbox.F 157 ECCO_DIFFMSK
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 234 ECCO_DIFFANOMMSK
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 245 ECCO_DIFFANOMMSK
      imax = snx
./pkg/ecco/ecco_toolbox.F 253 ECCO_DIFFANOMMSK
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 327 ECCO_OBSMSK
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 338 ECCO_OBSMSK
      imax = snx
./pkg/ecco/ecco_toolbox.F 346 ECCO_OBSMSK
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 412 ECCO_CP
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 423 ECCO_CP
      imax = snx
./pkg/ecco/ecco_toolbox.F 431 ECCO_CP
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 485 ECCO_CPRSRL
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 496 ECCO_CPRSRL
      imax = snx
./pkg/ecco/ecco_toolbox.F 504 ECCO_CPRSRL
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 565 ECCO_ADDCOST
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 57 ECCO_ZERO
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 580 ECCO_ADDCOST
      imax = snx
./pkg/ecco/ecco_toolbox.F 590 ECCO_ADDCOST
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 654 ECCO_ADD
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 665 ECCO_ADD
      imax = snx
./pkg/ecco/ecco_toolbox.F 673 ECCO_ADD
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 68 ECCO_ZERO
      imax = snx+olx
./pkg/ecco/ecco_toolbox.F 728 ECCO_SUBTRACT
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 739 ECCO_SUBTRACT
      imax = snx
./pkg/ecco/ecco_toolbox.F 745 ECCO_SUBTRACT
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 76 ECCO_ZERO
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 803 ECCO_ADDMASK
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 814 ECCO_ADDMASK
      imax = snx
./pkg/ecco/ecco_toolbox.F 822 ECCO_ADDMASK
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 872 ECCO_DIV
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 883 ECCO_DIV
      imax = snx
./pkg/ecco/ecco_toolbox.F 889 ECCO_DIV
              do i = imin,imax
./pkg/ecco/ecco_toolbox.F 934 ECCO_DIVFIELD
      integer imin,imax
./pkg/ecco/ecco_toolbox.F 945 ECCO_DIVFIELD
      imax = snx
./pkg/ecco/ecco_toolbox.F 951 ECCO_DIVFIELD
              do i = imin,imax
./pkg/exf/exf_mapfields.F 110 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 116 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 126 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 133 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 226 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 237 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 245 EXF_MAPFIELDS
            DO i = imin+1,imax
./pkg/exf/exf_mapfields.F 251 EXF_MAPFIELDS
            DO i = imin+1,imax
./pkg/exf/exf_mapfields.F 264 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 275 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 283 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 289 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 301 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 309 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 317 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 325 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 333 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 341 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 349 EXF_MAPFIELDS
            DO i = imin,imax
./pkg/exf/exf_mapfields.F 83 EXF_MAPFIELDS
      INTEGER imin, imax
./pkg/exf/exf_mapfields.F 85 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/exch2_recv_get_vec.F 137 EXCH2_RECV_GET_VEC_RL
            IF (array(imax*(ip-1)+1,bi,bj,dir).NE.0.) THEN
./pkg/flt/exch2_recv_get_vec.F 138 EXCH2_RECV_GET_VEC_RL
             itc=array(imax*(ip-1)+3,bi,bj,dir)+itb
./pkg/flt/exch2_recv_get_vec.F 139 EXCH2_RECV_GET_VEC_RL
             jtc=array(imax*(ip-1)+4,bi,bj,dir)+jtb
./pkg/flt/exch2_recv_get_vec.F 144 EXCH2_RECV_GET_VEC_RL
     &       array(imax*(ip-1)+1,bi,bj,dir),
./pkg/flt/exch2_recv_get_vec.F 145 EXCH2_RECV_GET_VEC_RL
     &       array(imax*(ip-1)+2,bi,bj,dir),
./pkg/flt/exch2_recv_get_vec.F 146 EXCH2_RECV_GET_VEC_RL
     &       array(imax*(ip-1)+3,bi,bj,dir),
./pkg/flt/exch2_recv_get_vec.F 147 EXCH2_RECV_GET_VEC_RL
     &       array(imax*(ip-1)+4,bi,bj,dir),
./pkg/flt/exch2_recv_get_vec.F 154 EXCH2_RECV_GET_VEC_RL
            IF (array(imax*(ip-1)+1,bi,bj,dir).NE.0.) THEN
./pkg/flt/exch2_recv_get_vec.F 155 EXCH2_RECV_GET_VEC_RL
             itc=array(imax*(ip-1)+3,bi,bj,dir)+itb
./pkg/flt/exch2_recv_get_vec.F 156 EXCH2_RECV_GET_VEC_RL
             jtc=array(imax*(ip-1)+4,bi,bj,dir)+jtb
./pkg/flt/exch2_recv_get_vec.F 157 EXCH2_RECV_GET_VEC_RL
             array(imax*(ip-1)+3,bi,bj,dir) = pi(1)*itc+pi(2)*jtc+oi-isb
./pkg/flt/exch2_recv_get_vec.F 158 EXCH2_RECV_GET_VEC_RL
             array(imax*(ip-1)+4,bi,bj,dir) = pj(1)*itc+pj(2)*jtc+oj-jsb
./pkg/flt/exch2_recv_get_vec.F 74 EXCH2_RECV_GET_VEC_RL
      INTEGER imax, imax2
./pkg/flt/exch2_recv_get_vec.F 75 EXCH2_RECV_GET_VEC_RL
      PARAMETER(imax=9)
./pkg/flt/exch2_recv_get_vec.F 76 EXCH2_RECV_GET_VEC_RL
      PARAMETER(imax2=imax*max_npart_exch)
./pkg/flt/flt_exch2.F 111 FLT_EXCH2
               ic = (icountE-1)*imax
./pkg/flt/flt_exch2.F 144 FLT_EXCH2
               ic = (icountW-1)*imax
./pkg/flt/flt_exch2.F 236 FLT_EXCH2
               ic = (icountN-1)*imax
./pkg/flt/flt_exch2.F 274 FLT_EXCH2
               ic = (icountS-1)*imax
./pkg/flt/flt_exch2.F 391 FLT_EXCH2
            ic=(ip-1)*imax
./pkg/flt/flt_exch2.F 420 FLT_EXCH2
            ic=(ip-1)*imax
./pkg/flt/flt_exch2.F 449 FLT_EXCH2
            ic=(ip-1)*imax
./pkg/flt/flt_exch2.F 46 FLT_EXCH2
      INTEGER imax, imax2, m
./pkg/flt/flt_exch2.F 478 FLT_EXCH2
            ic=(ip-1)*imax
./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 129 FLT_INIT_VARIA
     &                        'RL', imax, tmp, dummyRS,
./pkg/flt/flt_init_varia.F 144 FLT_INIT_VARIA
     &                          'RL', imax, tmp, dummyRS,
./pkg/flt/flt_init_varia.F 217 FLT_INIT_VARIA
     &                           'RL', imax, tmp, dummyRS,
./pkg/flt/flt_init_varia.F 230 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/grdchk/grdchk_get_obcs_mask.F 113 GRDCHK_GET_OBCS_MASK
                  do i = imin,imax
./pkg/grdchk/grdchk_get_obcs_mask.F 47 GRDCHK_GET_OBCS_MASK
      integer imin,imax
./pkg/grdchk/grdchk_get_obcs_mask.F 74 GRDCHK_GET_OBCS_MASK
      imax = snx
./pkg/grdchk/grdchk_get_obcs_mask.F 90 GRDCHK_GET_OBCS_MASK
                  do i = imin,imax
./pkg/grdchk/grdchk_get_position.F 70 GRDCHK_GET_POSITION
      integer imin,imax
./pkg/grdchk/grdchk_get_position.F 87 GRDCHK_GET_POSITION
      imax = snx
./pkg/grdchk/grdchk_init.F 49 GRDCHK_INIT
      integer imin,imax
./pkg/grdchk/grdchk_init.F 63 GRDCHK_INIT
      imax = snx
./pkg/grdchk/grdchk_loc.F 100 GRDCHK_LOC
      imax = snx
./pkg/grdchk/grdchk_loc.F 86 GRDCHK_LOC
      integer imin,imax
./pkg/kpp/kpp_calc.F 152 KPP_CALC
      integer   imin      ,imax          ,jmin      ,jmax
./pkg/kpp/kpp_calc.F 153 KPP_CALC
      parameter(imin=2-OLx,imax=sNx+OLx-1,jmin=2-OLy,jmax=sNy+OLy-1)
./pkg/kpp/kpp_calc.F 468 KPP_CALC
        DO i = imin, imax
./pkg/kpp/kpp_calc.F 571 KPP_CALC
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 181 KPP_FORCING_SURF
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 195 KPP_FORCING_SURF
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 210 KPP_FORCING_SURF
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 229 KPP_FORCING_SURF
            DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 242 KPP_FORCING_SURF
          DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 299 KPP_FORCING_SURF
       DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 383 KPP_FORCING_SURF
        DO i = imin, imax
./pkg/kpp/kpp_forcing_surf.F 424 KPP_FORCING_SURF
        DO i = imin, imax
./pkg/kpp/kpp_routines.F 1241 SMOOTH_HORIZ
      integer   imin      , imax          , jmin      , jmax
./pkg/kpp/kpp_routines.F 1242 SMOOTH_HORIZ
      parameter(imin=2-OLx, imax=sNx+OLx-1, jmin=2-OLy, jmax=sNy+OLy-1)
./pkg/kpp/kpp_routines.F 1250 SMOOTH_HORIZ
         DO i = imin, imax
./pkg/kpp/kpp_routines.F 1283 SMOOTH_HORIZ
         DO i = imin, imax
./pkg/kpp/kpp_routines.F 1840 KPP_DOUBLEDIFF
     I     ikppkey, imin, imax, jmin, jmax, bi, bj, myThid )
./pkg/kpp/kpp_routines.F 1877 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 137 OBCS_SPONGE_U
           IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 172 OBCS_SPONGE_U
           IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 331 OBCS_SPONGE_V
           IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 366 OBCS_SPONGE_V
           IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 556 OBCS_SPONGE_T
           IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 596 OBCS_SPONGE_T
           IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 788 OBCS_SPONGE_S
          IF ((i.ge.imin).and.(i.le.imax)) THEN
./pkg/obcs/obcs_sponge.F 828 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 84 SALT_PLUME_FRAC
      DO i = 1,imax
./pkg/salt_plume/salt_plume_frac.F 89 SALT_PLUME_FRAC
         IF(lat(imax).LT. 85.0 .AND. lat(imax).GT. 71.0
./pkg/salt_plume/salt_plume_frac.F 90 SALT_PLUME_FRAC
     &      .AND. lon(imax) .LT. -90.0) Npowerloc = Npower(1)
./pkg/seaice/seaice_cost_concentration.F 139 SEAICE_COST_CONCENTRATION
      imax = snx
./pkg/seaice/seaice_cost_concentration.F 257 SEAICE_COST_CONCENTRATION
                  do i = imin,imax
./pkg/seaice/seaice_cost_concentration.F 271 SEAICE_COST_CONCENTRATION
                do i = imin,imax
./pkg/seaice/seaice_cost_concentration.F 329 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 362 SEAICE_COST_CONCENTRATION
              do i = imin,imax
./pkg/seaice/seaice_cost_concentration.F 94 SEAICE_COST_CONCENTRATION
      integer imin,imax
./pkg/seaice/seaice_cost_init_varia.F 44 SEAICE_COST_INIT_VARIA
      integer imin, imax
./pkg/seaice/seaice_cost_init_varia.F 60 SEAICE_COST_INIT_VARIA
      imax = sNx+OLx
./pkg/seaice/seaice_cost_init_varia.F 82 SEAICE_COST_INIT_VARIA
            do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 137 SEAICE_COST_SSS
      imax = snx
./pkg/seaice/seaice_cost_sss.F 272 SEAICE_COST_SSS
                  do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 286 SEAICE_COST_SSS
                do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 306 SEAICE_COST_SSS
              do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 319 SEAICE_COST_SSS
              do i = imin,imax
./pkg/seaice/seaice_cost_sss.F 92 SEAICE_COST_SSS
      integer imin,imax
./pkg/seaice/seaice_cost_sst.F 140 SEAICE_COST_SST
      imax = snx
./pkg/seaice/seaice_cost_sst.F 272 SEAICE_COST_SST
                  do i = imin,imax
./pkg/seaice/seaice_cost_sst.F 286 SEAICE_COST_SST
                do i = imin,imax
./pkg/seaice/seaice_cost_sst.F 306 SEAICE_COST_SST
              do i = imin,imax
./pkg/seaice/seaice_cost_sst.F 319 SEAICE_COST_SST
              do i = imin,imax
./pkg/seaice/seaice_cost_sst.F 90 SEAICE_COST_SST
      integer imin,imax
./pkg/seaice/seaice_cost_weights.F 114 SEAICE_COST_WEIGHTS
               do i = imin,imax
./pkg/seaice/seaice_cost_weights.F 125 SEAICE_COST_WEIGHTS
               do i = imin,imax
./pkg/seaice/seaice_cost_weights.F 137 SEAICE_COST_WEIGHTS
            do i = imin,imax
./pkg/seaice/seaice_cost_weights.F 51 SEAICE_COST_WEIGHTS
      integer imin,imax
./pkg/seaice/seaice_cost_weights.F 74 SEAICE_COST_WEIGHTS
      imax = snx+olx
./pkg/seaice/seaice_cost_weights.F 78 SEAICE_COST_WEIGHTS
        do i = imin,imax
./pkg/seaice/seaice_cost_weights.F 94 SEAICE_COST_WEIGHTS
            do i = imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 105 SEAICE_CTRL_MAP_INI
              do i = imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 125 SEAICE_CTRL_MAP_INI
              do i = imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 145 SEAICE_CTRL_MAP_INI
              do i = imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 55 SEAICE_CTRL_MAP_INI
      integer imin,imax
./pkg/seaice/seaice_ctrl_map_ini.F 81 SEAICE_CTRL_MAP_INI
      imax = snx
./pkg/seaice/seaice_fgmres.F 334 SEAICE_FGMRES
      integer imax
./pkg/seaice/seaice_fgmres.F 335 SEAICE_FGMRES
      parameter ( imax = 50 )
./pkg/seaice/seaice_fgmres.F 336 SEAICE_FGMRES
      _RL hh(4*imax+1,4*imax,MAX_NO_THREADS)
./pkg/seaice/seaice_fgmres.F 337 SEAICE_FGMRES
      _RL c(4*imax,MAX_NO_THREADS),s(4*imax,MAX_NO_THREADS)
./pkg/seaice/seaice_fgmres.F 338 SEAICE_FGMRES
      _RL rs(4*imax+1,MAX_NO_THREADS),t,ro
./pkg/seaice/seaice_fgmres.F 357 SEAICE_FGMRES
      if ( im .gt. imax ) stop 'size of krylov space > 50'
./pkg/seaice/seaice_preconditioner.F 336 SEAICE_PRECONDITIONER
     I        imin, imax, jmin, jmax, bi, bj, myTime, myIter, myThid )
./pkg/seaice/seaice_preconditioner.F 374 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/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F 55 CTRL_MAP_GENTIM2D
      integer imin,imax
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 155 CTRL_MAP_INI_GENARR
            do i = imin,imax
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 58 CTRL_MAP_INI_GENARR
      integer imin,imax
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 73 CTRL_MAP_INI_GENARR
      imax = sNx
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 96 CTRL_MAP_INI_GENARR
            do i = imin,imax
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F 55 CTRL_MAP_GENTIM2D
      integer imin,imax
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 155 CTRL_MAP_INI_GENARR
            do i = imin,imax
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 58 CTRL_MAP_INI_GENARR
      integer imin,imax
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 73 CTRL_MAP_INI_GENARR
      imax = sNx
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 96 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 136 CTRL_MAP_INI_GENARR
            do i = imin,imax
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F 54 CTRL_MAP_INI_GENARR
      integer imin,imax
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F 69 CTRL_MAP_INI_GENARR
      imax = sNx
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F 95 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 136 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
./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)
./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
./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/bling/bling_airseaflux.F 115 BLING_AIRSEAFLUX
         DO i=imin,imax
./pkg/bling/bling_airseaflux.F 11 BLING_AIRSEAFLUX
     I           bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_airseaflux.F 136 BLING_AIRSEAFLUX
        DO i=imin,imax
./pkg/bling/bling_airseaflux.F 160 BLING_AIRSEAFLUX
        DO i=imin,imax
./pkg/bling/bling_airseaflux.F 184 BLING_AIRSEAFLUX
        DO i=imin,imax
./pkg/bling/bling_airseaflux.F 236 BLING_AIRSEAFLUX
          DO i=imin,imax
./pkg/bling/bling_airseaflux.F 248 BLING_AIRSEAFLUX
          DO i=imin,imax
./pkg/bling/bling_airseaflux.F 309 BLING_AIRSEAFLUX
          DO i=imin,imax
./pkg/bling/bling_carbon_chem.F 574 CARBON_COEFFS
        do i=imin,imax
./pkg/bling/bling_carbon_chem.F 868 CARBON_COEFFS_PRESSURE_DEP
        do i=imin,imax
./pkg/bling/bling_carbonate_sys.F 100 BLING_CARBONATE_SYS
     I                       bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_carbonate_sys.F 41 BLING_CARBONATE_SYS
      INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/bling/bling_carbonate_sys.F 9 BLING_CARBONATE_SYS
     I           bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_dvm.F 119 BLING_DVM
       DO i=imin,imax
./pkg/bling/bling_dvm.F 11 BLING_DVM
     I           bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_dvm.F 42 BLING_DVM
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/bling/bling_dvm.F 95 BLING_DVM
          DO i=imin,imax
./pkg/bling/bling_light.F 10 BLING_LIGHT
     I               bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_light.F 150 BLING_LIGHT
       DO i=imin,imax
./pkg/bling/bling_light.F 205 BLING_LIGHT
        DO i=imin,imax  
./pkg/bling/bling_light.F 55 BLING_LIGHT
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/bling/bling_light.F 89 BLING_LIGHT
          DO i=imin,imax
./pkg/bling/bling_main.F 112 BLING_MAIN
       DO i=imin,imax
./pkg/bling/bling_main.F 12 BLING_MAIN
     &                      bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_main.F 147 BLING_MAIN
     I                       bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_main.F 157 BLING_MAIN
     I                         bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_main.F 171 BLING_MAIN
     I                 bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_main.F 197 BLING_MAIN
       DO i=imin,imax
./pkg/bling/bling_main.F 227 BLING_MAIN
          DO i=imin,imax
./pkg/bling/bling_main.F 250 BLING_MAIN
          DO i=imin,imax
./pkg/bling/bling_main.F 50 BLING_MAIN
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/bling/bling_mixedlayer.F 41 BLING_MIXEDLAYER
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/bling/bling_mixedlayer.F 60 BLING_MIXEDLAYER
        DO i=imin,imax
./pkg/bling/bling_mixedlayer.F 74 BLING_MIXEDLAYER
          DO i=imin,imax
./pkg/bling/bling_mixedlayer.F 94 BLING_MIXEDLAYER
          DO i=imin,imax
./pkg/bling/bling_mixedlayer.F 9 BLING_MIXEDLAYER
     I               bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_production.F 16 BLING_PROD
     I           bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_production.F 211 BLING_PROD
          DO i=imin,imax
./pkg/bling/bling_production.F 217 BLING_PROD
          DO i=imin,imax
./pkg/bling/bling_production.F 278 BLING_PROD
         DO i=imin,imax
./pkg/bling/bling_production.F 303 BLING_PROD
     I                         bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_production.F 317 BLING_PROD
       DO i=imin,imax  
./pkg/bling/bling_production.F 366 BLING_PROD
     I               bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_production.F 372 BLING_PROD
        DO i=imin,imax  
./pkg/bling/bling_production.F 387 BLING_PROD
        DO i=imin,imax  
./pkg/bling/bling_production.F 527 BLING_PROD
        DO i=imin,imax
./pkg/bling/bling_production.F 559 BLING_PROD
        DO i=imin,imax
./pkg/bling/bling_production.F 56 BLING_PROD
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/bling/bling_production.F 593 BLING_PROD
        DO i=imin,imax
./pkg/bling/bling_production.F 686 BLING_PROD
     I                 bi, bj, imin, imax, jmin, jmax, 
./pkg/bling/bling_production.F 697 BLING_PROD
     I                 bi, bj, imin, imax, jmin, jmax, 
./pkg/bling/bling_production.F 706 BLING_PROD
        DO i=imin,imax  
./pkg/bling/bling_remineralization.F 114 BLING_REMIN
          DO i=imin,imax
./pkg/bling/bling_remineralization.F 127 BLING_REMIN
          DO i=imin,imax
./pkg/bling/bling_remineralization.F 12 BLING_REMIN
     I           bi, bj, imin, imax, jmin, jmax,
./pkg/bling/bling_remineralization.F 141 BLING_REMIN
        DO i=imin,imax
./pkg/bling/bling_remineralization.F 48 BLING_REMIN
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/bling/bling_sgs.F 39 BLING_SGS
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/bling/bling_sgs.F 8 BLING_SGS
     I           bi, bj, imin, imax, jmin, jmax,
./pkg/ctrl/ctrl_cost_gen.F 128 CTRL_COST_GEN2D
      imax = snx
./pkg/ctrl/ctrl_cost_gen.F 152 CTRL_COST_GEN2D
            do i = imin,imax
./pkg/ctrl/ctrl_cost_gen.F 184 CTRL_COST_GEN2D
              do i = imin,imax
./pkg/ctrl/ctrl_cost_gen.F 226 CTRL_COST_GEN2D
              do i = imin,imax
./pkg/ctrl/ctrl_cost_gen.F 245 CTRL_COST_GEN2D
          do i = imin,imax
./pkg/ctrl/ctrl_cost_gen.F 288 CTRL_COST_GEN2D
              do i = imin,imax
./pkg/ctrl/ctrl_cost_gen.F 354 CTRL_COST_GEN2D
              do i = imin,imax
./pkg/ctrl/ctrl_cost_gen.F 462 CTRL_COST_GEN3D
      integer imin,imax
./pkg/ctrl/ctrl_cost_gen.F 487 CTRL_COST_GEN3D
      imax = snx
./pkg/ctrl/ctrl_cost_gen.F 526 CTRL_COST_GEN3D
              do i = imin,imax
./pkg/ctrl/ctrl_cost_gen.F 95 CTRL_COST_GEN2D
      integer 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
./pkg/ctrl/ctrl_get_gen.F 108 CTRL_GET_GEN
      imax = snx+olx
./pkg/ctrl/ctrl_get_gen.F 72 CTRL_GET_GEN
      integer imin,imax
./pkg/ctrl/ctrl_getobcse.F 100 CTRL_GETOBCSE
      imax = snx+olx
./pkg/ctrl/ctrl_getobcse.F 59 CTRL_GETOBCSE
      integer imin,imax
./pkg/ctrl/ctrl_getobcsn.F 106 CTRL_GETOBCSN
      imax = snx
./pkg/ctrl/ctrl_getobcsn.F 137 CTRL_GETOBCSN
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 175 CTRL_GETOBCSN
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 189 CTRL_GETOBCSN
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 206 CTRL_GETOBCSN
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 244 CTRL_GETOBCSN
           do i = imin,imax
./pkg/ctrl/ctrl_getobcsn.F 60 CTRL_GETOBCSN
      integer imin,imax
./pkg/ctrl/ctrl_getobcss.F 102 CTRL_GETOBCSS
      imax = snx+olx
./pkg/ctrl/ctrl_getobcss.F 133 CTRL_GETOBCSS
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 171 CTRL_GETOBCSS
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 185 CTRL_GETOBCSS
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 202 CTRL_GETOBCSS
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 240 CTRL_GETOBCSS
           do i = imin,imax
./pkg/ctrl/ctrl_getobcss.F 61 CTRL_GETOBCSS
      integer imin,imax
./pkg/ctrl/ctrl_getobcsw.F 101 CTRL_GETOBCSW
      imax = snx+olx
./pkg/ctrl/ctrl_getobcsw.F 60 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 59 CTRL_INIT
      integer imin,imax
./pkg/ctrl/ctrl_init.F 950 CTRL_INIT
         do i = imin,imax
./pkg/ctrl/ctrl_init.F 95 CTRL_INIT
      imax = snx+olx
./pkg/ctrl/ctrl_init_obcs_variables.F 44 CTRL_INIT_OBCS_VARIABLES
      integer imin,imax
./pkg/ctrl/ctrl_init_obcs_variables.F 58 CTRL_INIT_OBCS_VARIABLES
      imax = snx+olx
./pkg/ctrl/ctrl_init_obcs_variables.F 65 CTRL_INIT_OBCS_VARIABLES
              do i = imin,imax
./pkg/ctrl/ctrl_init_obcs_variables.F 80 CTRL_INIT_OBCS_VARIABLES
              do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 103 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 116 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 129 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 142 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 155 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 168 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 181 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 194 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 207 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 220 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 233 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 246 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 259 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 272 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 285 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 298 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 311 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 324 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 337 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 349 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 48 CTRL_INIT_VARIABLES
      integer imin,imax
./pkg/ctrl/ctrl_init_variables.F 61 CTRL_INIT_VARIABLES
      imax = sNx+OLx
./pkg/ctrl/ctrl_init_variables.F 77 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_variables.F 90 CTRL_INIT_VARIABLES
            do i = imin,imax
./pkg/ctrl/ctrl_init_wet.F 115 CTRL_INIT_WET
              do i = imin,imax
./pkg/ctrl/ctrl_init_wet.F 41 CTRL_INIT_WET
      integer imin,imax
./pkg/ctrl/ctrl_init_wet.F 66 CTRL_INIT_WET
      imax = snx
./pkg/ctrl/ctrl_map_forcing.F 122 CTRL_MAP_FORCING
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 147 CTRL_MAP_FORCING
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 172 CTRL_MAP_FORCING
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 197 CTRL_MAP_FORCING
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 222 CTRL_MAP_FORCING
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 241 CTRL_MAP_FORCING
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 260 CTRL_MAP_FORCING
            do i = imin,imax
./pkg/ctrl/ctrl_map_forcing.F 55 CTRL_MAP_FORCING
      integer imin,imax
./pkg/ctrl/ctrl_map_forcing.F 99 CTRL_MAP_FORCING
      imax = snx
./pkg/ctrl/ctrl_map_gentim2d.F 51 CTRL_MAP_GENTIM2D
      integer imin,imax
./pkg/ctrl/ctrl_map_ini.F 120 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 154 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 185 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 213 CTRL_MAP_INI
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 234 CTRL_MAP_INI
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 257 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 281 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 311 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 335 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 362 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 389 CTRL_MAP_INI
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 410 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 429 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 451 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 478 CTRL_MAP_INI
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 504 CTRL_MAP_INI
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 531 CTRL_MAP_INI
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 552 CTRL_MAP_INI
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini.F 68 CTRL_MAP_INI
      integer imin,imax
./pkg/ctrl/ctrl_map_ini.F 94 CTRL_MAP_INI
      imax = snx
./pkg/ctrl/ctrl_map_ini_ecco.F 102 CTRL_MAP_INI_ECCO
      imax = snx
./pkg/ctrl/ctrl_map_ini_ecco.F 112 CTRL_MAP_INI_ECCO
            do i = imin,imax
./pkg/ctrl/ctrl_map_ini_ecco.F 124 CTRL_MAP_INI_ECCO
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_ecco.F 75 CTRL_MAP_INI_ECCO
      integer imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 137 CTRL_MAP_INI_GEN3D
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 168 CTRL_MAP_INI_GEN3D
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 190 CTRL_MAP_INI_GEN3D
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 280 CTRL_MAP_INI_GEN2D
      integer imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 311 CTRL_MAP_INI_GEN2D
      imax = snx
./pkg/ctrl/ctrl_map_ini_gen.F 348 CTRL_MAP_INI_GEN2D
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 377 CTRL_MAP_INI_GEN2D
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 397 CTRL_MAP_INI_GEN2D
              do i = imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 66 CTRL_MAP_INI_GEN3D
      integer imin,imax
./pkg/ctrl/ctrl_map_ini_gen.F 97 CTRL_MAP_INI_GEN3D
      imax = snx
./pkg/ctrl/ctrl_map_ini_genarr.F 199 CTRL_MAP_GENARR2D
      integer imin,imax
./pkg/ctrl/ctrl_mask_set_xz.F 132 CTRL_MASK_SET_XZ
              do i = imin,imax
./pkg/ctrl/ctrl_mask_set_xz.F 46 CTRL_MASK_SET_XZ
      integer imin,imax
./pkg/ctrl/ctrl_mask_set_xz.F 77 CTRL_MASK_SET_XZ
      imax = snx
./pkg/ctrl/ctrl_mask_set_xz.F 99 CTRL_MASK_SET_XZ
              do i = imin,imax
./pkg/ctrl/ctrl_mask_set_yz.F 46 CTRL_MASK_SET_YZ
      integer imin,imax
./pkg/ctrl/ctrl_mask_set_yz.F 77 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 103 CTRL_SET_PACK_XY
            do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xy.F 161 CTRL_SET_PACK_XY
             do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xy.F 194 CTRL_SET_PACK_XY
                 do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xy.F 288 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 91 CTRL_SET_PACK_XY
      imax = snx
./pkg/ctrl/ctrl_set_pack_xyz.F 113 CTRL_SET_PACK_XYZ
            do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xyz.F 172 CTRL_SET_PACK_XYZ
             do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xyz.F 211 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 95 CTRL_SET_PACK_XYZ
      imax = snx
./pkg/ctrl/ctrl_set_pack_xz.F 103 CTRL_SET_PACK_XZ
                     do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 123 CTRL_SET_PACK_XZ
                        do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 201 CTRL_SET_PACK_XZ
                 do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 276 CTRL_SET_PACK_XZ
                do i = imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 62 CTRL_SET_PACK_XZ
      integer imin,imax
./pkg/ctrl/ctrl_set_pack_xz.F 95 CTRL_SET_PACK_XZ
      imax = snx
./pkg/ctrl/ctrl_set_pack_yz.F 123 CTRL_SET_PACK_YZ
                        do i = imin,imax
./pkg/ctrl/ctrl_set_pack_yz.F 62 CTRL_SET_PACK_YZ
      integer imin,imax
./pkg/ctrl/ctrl_set_pack_yz.F 95 CTRL_SET_PACK_YZ
      imax = snx
./pkg/ctrl/ctrl_set_unpack_xy.F 104 CTRL_SET_UNPACK_XY
            do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xy.F 162 CTRL_SET_UNPACK_XY
             do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xy.F 218 CTRL_SET_UNPACK_XY
                 do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xy.F 328 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 92 CTRL_SET_UNPACK_XY
      imax = snx
./pkg/ctrl/ctrl_set_unpack_xyz.F 115 CTRL_SET_UNPACK_XYZ
            do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xyz.F 181 CTRL_SET_UNPACK_XYZ
             do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xyz.F 242 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 97 CTRL_SET_UNPACK_XYZ
      imax = snx
./pkg/ctrl/ctrl_set_unpack_xz.F 108 CTRL_SET_UNPACK_XZ
                     do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 128 CTRL_SET_UNPACK_XZ
                        do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 230 CTRL_SET_UNPACK_XZ
                   do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 315 CTRL_SET_UNPACK_XZ
                do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 63 CTRL_SET_UNPACK_XZ
      integer imin,imax
./pkg/ctrl/ctrl_set_unpack_xz.F 98 CTRL_SET_UNPACK_XZ
      imax = snx
./pkg/ctrl/ctrl_set_unpack_yz.F 128 CTRL_SET_UNPACK_YZ
                        do i = imin,imax
./pkg/ctrl/ctrl_set_unpack_yz.F 63 CTRL_SET_UNPACK_YZ
      integer imin,imax
./pkg/ctrl/ctrl_set_unpack_yz.F 98 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/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/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_averagesfields.F 159 COST_AVERAGESFIELDS
      imax = snx
./pkg/ecco/cost_averagesfields.F 214 COST_AVERAGESFIELDS
              do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 346 COST_AVERAGESFIELDS
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 359 COST_AVERAGESFIELDS
                do i = imin,imax
./pkg/ecco/cost_averagesfields.F 397 COST_AVERAGESFIELDS
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 420 COST_AVERAGESFIELDS
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 431 COST_AVERAGESFIELDS
                do i = imin,imax
./pkg/ecco/cost_averagesfields.F 466 COST_AVERAGESFIELDS
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 601 COST_AVERAGESFIELDS
              do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 611 COST_AVERAGESFIELDS
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 622 COST_AVERAGESFIELDS
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 661 COST_AVERAGESFIELDS
                do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 741 COST_AVERAGESFIELDS
           do i =  imin,imax
./pkg/ecco/cost_averagesfields.F 85 COST_AVERAGESFIELDS
      integer imin,imax
./pkg/ecco/cost_averagesgeneric.F 111 COST_AVERAGESGENERIC
      imax = snx
./pkg/ecco/cost_averagesgeneric.F 119 COST_AVERAGESGENERIC
                do i = imin,imax
./pkg/ecco/cost_averagesgeneric.F 153 COST_AVERAGESGENERIC
                do i =  imin,imax
./pkg/ecco/cost_averagesgeneric.F 166 COST_AVERAGESGENERIC
                do i = imin,imax
./pkg/ecco/cost_averagesgeneric.F 204 COST_AVERAGESGENERIC
                do i = imin,imax
./pkg/ecco/cost_averagesgeneric.F 60 COST_AVERAGESGENERIC
      integer imin,imax
./pkg/ecco/cost_averagesinit.F 106 COST_AVERAGESINIT
            do i = imin,imax
./pkg/ecco/cost_averagesinit.F 117 COST_AVERAGESINIT
            do i = imin,imax
./pkg/ecco/cost_averagesinit.F 128 COST_AVERAGESINIT
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 139 COST_AVERAGESINIT
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 156 COST_AVERAGESINIT
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 168 COST_AVERAGESINIT
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 181 COST_AVERAGESINIT
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 195 COST_AVERAGESINIT
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 207 COST_AVERAGESINIT
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 221 COST_AVERAGESINIT
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 235 COST_AVERAGESINIT
              do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 247 COST_AVERAGESINIT
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 259 COST_AVERAGESINIT
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 269 COST_AVERAGESINIT
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 281 COST_AVERAGESINIT
            do i =  imin,imax
./pkg/ecco/cost_averagesinit.F 61 COST_AVERAGESINIT
      integer imin,imax
./pkg/ecco/cost_averagesinit.F 74 COST_AVERAGESINIT
      imax = snx
./pkg/ecco/cost_averagesinit.F 82 COST_AVERAGESINIT
              do i = imin,imax
./pkg/ecco/cost_averagesinit.F 92 COST_AVERAGESINIT
              do i = imin,imax
./pkg/ecco/cost_bp_read.F 125 COST_BP_READ
           do i = imin,imax
./pkg/ecco/cost_bp_read.F 139 COST_BP_READ
            do i = imin,imax
./pkg/ecco/cost_bp_read.F 58 COST_BP_READ
      integer imin,imax
./pkg/ecco/cost_bp_read.F 94 COST_BP_READ
      imax = snx
./pkg/ecco/cost_gencost_customize.F 121 COST_GENCOST_CUSTOMIZE
         do i =  imin,imax
./pkg/ecco/cost_gencost_customize.F 75 COST_GENCOST_CUSTOMIZE
      integer imin,imax
./pkg/ecco/cost_gencost_customize.F 86 COST_GENCOST_CUSTOMIZE
      imax = snx
./pkg/ecco/cost_gencost_customize.F 94 COST_GENCOST_CUSTOMIZE
              do i = imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 116 COST_GENCOST_SEAICEV4
      imax = snx
./pkg/ecco/cost_gencost_seaicev4.F 406 GET_EXCONC_DECONC
      integer imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 445 GET_EXCONC_DECONC
      imax = snx+olx
./pkg/ecco/cost_gencost_seaicev4.F 466 GET_EXCONC_DECONC
             do i = imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 502 GET_EXCONC_DECONC
             do i = imin,imax
./pkg/ecco/cost_gencost_seaicev4.F 77 COST_GENCOST_SEAICEV4
      integer imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1031 COST_GENCOST_SSHV4
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1060 COST_GENCOST_SSHV4
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1108 COST_GENCOST_SSHV4
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1168 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1236 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1267 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1282 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 1345 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 182 COST_GENCOST_SSHV4
      imax = snx
./pkg/ecco/cost_gencost_sshv4.F 256 COST_GENCOST_SSHV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 350 COST_GENCOST_SSHV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 373 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 387 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 415 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 445 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 511 COST_GENCOST_SSHV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 553 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 584 COST_GENCOST_SSHV4
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 630 COST_GENCOST_SSHV4
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 70 COST_GENCOST_SSHV4
      integer imin,imax
./pkg/ecco/cost_gencost_sshv4.F 725 COST_GENCOST_SSHV4
              do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 774 COST_GENCOST_SSHV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 859 COST_GENCOST_SSHV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 919 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 953 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sshv4.F 984 COST_GENCOST_SSHV4
          do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 116 COST_GENCOST_SSTV4
      imax = snx
./pkg/ecco/cost_gencost_sstv4.F 175 COST_GENCOST_SSTV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 242 COST_GENCOST_SSTV4
                      do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 254 COST_GENCOST_SSTV4
                do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 274 COST_GENCOST_SSTV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 327 COST_GENCOST_SSTV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 400 COST_GENCOST_SSTV4
                      do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 412 COST_GENCOST_SSTV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 438 COST_GENCOST_SSTV4
            do i = imin,imax
./pkg/ecco/cost_gencost_sstv4.F 55 COST_GENCOST_SSTV4
      integer imin,imax
./pkg/ecco/cost_obcs_ageos.F 118 COST_OBCS_AGEOS
      imax = snx
./pkg/ecco/cost_obcs_ageos.F 230 COST_OBCS_AGEOS
              do i = imin, imax
./pkg/ecco/cost_obcs_ageos.F 259 COST_OBCS_AGEOS
              do i = imin, imax
./pkg/ecco/cost_obcs_ageos.F 272 COST_OBCS_AGEOS
              do i = imin,imax
./pkg/ecco/cost_obcs_ageos.F 299 COST_OBCS_AGEOS
              do i = imin, imax
./pkg/ecco/cost_obcs_ageos.F 329 COST_OBCS_AGEOS
               do i = imin, imax
./pkg/ecco/cost_obcs_ageos.F 340 COST_OBCS_AGEOS
               do i = imin,imax
./pkg/ecco/cost_obcs_ageos.F 70 COST_OBCS_AGEOS
      integer imin,imax
./pkg/ecco/cost_obcse.F 118 COST_OBCSE
      imax = snx
./pkg/ecco/cost_obcse.F 82 COST_OBCSE
      integer imin,imax
./pkg/ecco/cost_obcsn.F 116 COST_OBCSN
      imax = snx
./pkg/ecco/cost_obcsn.F 177 COST_OBCSN
              do i = imin,imax
./pkg/ecco/cost_obcsn.F 82 COST_OBCSN
      integer imin,imax
./pkg/ecco/cost_obcss.F 116 COST_OBCSS
      imax = snx
./pkg/ecco/cost_obcss.F 179 COST_OBCSS
              do i = imin,imax
./pkg/ecco/cost_obcss.F 82 COST_OBCSS
      integer imin,imax
./pkg/ecco/cost_obcsvol.F 120 COST_OBCSVOL
      imax = snx
./pkg/ecco/cost_obcsvol.F 216 COST_OBCSVOL
                do i = imin,imax
./pkg/ecco/cost_obcsvol.F 258 COST_OBCSVOL
                do i = imin,imax
./pkg/ecco/cost_obcsvol.F 69 COST_OBCSVOL
      integer imin,imax
./pkg/ecco/cost_obcsw.F 116 COST_OBCSW
      imax = snx
./pkg/ecco/cost_obcsw.F 82 COST_OBCSW
      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 104 COST_SSH
      imax = snx
./pkg/ecco/cost_ssh.F 110 COST_SSH
        do i = imin, imax
./pkg/ecco/cost_ssh.F 133 COST_SSH
            do i = imin,imax
./pkg/ecco/cost_ssh.F 149 COST_SSH
            do i = imin,imax
./pkg/ecco/cost_ssh.F 176 COST_SSH
              do i = imin,imax
./pkg/ecco/cost_ssh.F 254 COST_SSH
            do i = imin,imax
./pkg/ecco/cost_ssh.F 306 COST_SSH
              do i = imin,imax
./pkg/ecco/cost_ssh.F 333 COST_SSH
              do i = imin,imax
./pkg/ecco/cost_ssh.F 360 COST_SSH
              do i = imin,imax
./pkg/ecco/cost_ssh.F 71 COST_SSH
      integer imin,imax
./pkg/ecco/ecco_cost_init_barfiles.F 133 ECCO_COST_INIT_BARFILES
      imax = snx
./pkg/ecco/ecco_cost_init_barfiles.F 138 ECCO_COST_INIT_BARFILES
            do i =  imin,imax
./pkg/ecco/ecco_cost_init_barfiles.F 148 ECCO_COST_INIT_BARFILES
              do i =  imin,imax
./pkg/ecco/ecco_cost_init_barfiles.F 64 ECCO_COST_INIT_BARFILES
      integer imin,imax