Symbol Description Uses
jmax 666



File Line number Procedure Code
./pkg/admtlm/admtlm_bypassad.F 112 ADMTLM_BYPASSAD
            do j = jmin, jmax
./pkg/admtlm/admtlm_bypassad.F 130 ADMTLM_BYPASSAD
            do j = jmin, jmax
./pkg/admtlm/admtlm_bypassad.F 148 ADMTLM_BYPASSAD
            do j = jmin, jmax
./pkg/admtlm/admtlm_bypassad.F 166 ADMTLM_BYPASSAD
            do j = jmin, jmax
./pkg/admtlm/admtlm_bypassad.F 34 ADMTLM_BYPASSAD
      integer jmin, jmax
./pkg/admtlm/admtlm_bypassad.F 58 ADMTLM_BYPASSAD
      jmax = sny
./pkg/admtlm/admtlm_bypassad.F 72 ADMTLM_BYPASSAD
        DO j = jmin, jmax
./pkg/admtlm/admtlm_bypassad.F 95 ADMTLM_BYPASSAD
          do j = jmin, jmax
./pkg/exf/exf_check_range.F 40 EXF_CHECK_RANGE
      integer jmax
./pkg/exf/exf_check_range.F 54 EXF_CHECK_RANGE
      jmax = sny+oly
./pkg/exf/exf_check_range.F 61 EXF_CHECK_RANGE
        do j = jmin,jmax
./pkg/exf/exf_check.F 40 EXF_CHECK
      integer jmax
./pkg/exf/exf_check.F 51 EXF_CHECK
      jmax = sny+oly
./pkg/exf/exf_mapfields.F 111 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 123 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 137 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 148 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 155 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 171 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 182 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 189 EXF_MAPFIELDS
          do j = jmin+1,jmax
./pkg/exf/exf_mapfields.F 204 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 212 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 220 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 228 EXF_MAPFIELDS
          do j = jmin,jmax
./pkg/exf/exf_mapfields.F 80 EXF_MAPFIELDS
      integer jmax
./pkg/exf/exf_mapfields.F 91 EXF_MAPFIELDS
      jmax = sny+oly
./model/src/ini_eos.F 298 CHECK_EOS
      INTEGER imin, imax, jmin, jmax
./model/src/ini_eos.F 369 CHECK_EOS
      jmax = 1
./model/src/ini_eos.F 397 CHECK_EOS
     &           bi, bj, imin, imax, jmin, jmax, k, k, 
./pkg/dic/car_flux.F 33 CAR_FLUX
       INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/car_flux.F 59 CAR_FLUX
       DO j=jmin,jmax
./pkg/dic/car_flux.F 9 CAR_FLUX
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/phos_flux.F 38 PHOS_FLUX
      INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/phos_flux.F 61 PHOS_FLUX
       DO j=jmin,jmax
./pkg/dic/phos_flux.F 9 PHOS_FLUX
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/fe_chem.F 58 FE_CHEM
       DO j=jmin,jmax
./pkg/dic/bio_export.F 13 BIO_EXPORT
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/bio_export.F 42 BIO_EXPORT
      INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/bio_export.F 62 BIO_EXPORT
        DO j=jmin,jmax
./pkg/dic/o2_surfforcing.F 130 O2_SURFFORCING
        DO j=jmin,jmax
./pkg/dic/o2_surfforcing.F 76 O2_SURFFORCING
        DO j=jmin,jmax
./pkg/dic/carbon_chem.F 694 CARBON_COEFFS
         do j=jmin,jmax
./pkg/dic/carbon_chem.F 963 CARBON_COEFFS_PRESSURE_DEP
         do j=jmin,jmax
./pkg/dic/alk_surfforcing.F 49 ALK_SURFFORCING
        DO j=jmin,jmax
./pkg/dic/alk_surfforcing.F 9 ALK_SURFFORCING
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_surfforcing.F 104 DIC_SURFFORCING
       DO j=jmin,jmax
./pkg/dic/dic_surfforcing.F 125 DIC_SURFFORCING
       DO j=jmin,jmax
./pkg/dic/dic_surfforcing.F 13 DIC_SURFFORCING
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_surfforcing.F 187 DIC_SURFFORCING
         DO j=jmin,jmax
./pkg/dic/dic_surfforcing.F 78 DIC_SURFFORCING
        DO j=jmin,jmax
./pkg/dic/calcite_saturation.F 37 CALCITE_SATURATION
       INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/calcite_saturation.F 80 CALCITE_SATURATION
        DO j=jmin,jmax
./pkg/dic/calcite_saturation.F 9 CALCITE_SATURATION
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_surfforcing_init.F 128 DIC_SURFFORCING_INIT
        DO j=jmin,jmax
./pkg/dic/dic_surfforcing_init.F 157 DIC_SURFFORCING_INIT
        DO j=jmin,jmax
./pkg/dic/dic_surfforcing_init.F 165 DIC_SURFFORCING_INIT
        DO j=jmin,jmax
./pkg/dic/dic_biotic_forcing.F 126 DIC_BIOTIC_FORCING
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 131 DIC_BIOTIC_FORCING
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 136 DIC_BIOTIC_FORCING
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 152 DIC_BIOTIC_FORCING
     I           bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 157 DIC_BIOTIC_FORCING
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 168 DIC_BIOTIC_FORCING
     I                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 16 DIC_BIOTIC_FORCING
     &                            bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 173 DIC_BIOTIC_FORCING
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 178 DIC_BIOTIC_FORCING
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/dic/dic_biotic_forcing.F 184 DIC_BIOTIC_FORCING
         DO j=jmin,jmax
./pkg/dic/dic_biotic_forcing.F 222 DIC_BIOTIC_FORCING
         DO j=jmin,jmax
./pkg/dic/dic_biotic_forcing.F 254 DIC_BIOTIC_FORCING
         DO j=jmin,jmax
./pkg/dic/dic_biotic_forcing.F 54 DIC_BIOTIC_FORCING
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/dic/dic_biotic_forcing.F 96 DIC_BIOTIC_FORCING
       jmax=sNy
./pkg/dic/car_flux_omega_top.F 35 CAR_FLUX_OMEGA_TOP
       INTEGER imin, imax, jmin, jmax, bi, bj
./pkg/dic/car_flux_omega_top.F 78 CAR_FLUX_OMEGA_TOP
       DO j=jmin,jmax
./pkg/dic/car_flux_omega_top.F 9 CAR_FLUX_OMEGA_TOP
     I           bi,bj,imin,imax,jmin,jmax,
./model/src/calc_ivdc.F 49 CALC_IVDC
       DO j=jMin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 107 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 146 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 186 ECCO_COST_WEIGHTS
      do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 207 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 320 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 338 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 359 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 377 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 402 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 422 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 445 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 465 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 484 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 509 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 52 ECCO_COST_WEIGHTS
      integer jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 541 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 560 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 620 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 675 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 709 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 752 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 783 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 826 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 84 ECCO_COST_WEIGHTS
      jmax = sny+oly
./verification/global1x1_tot/code/ecco_cost_weights.F 858 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 894 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 926 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 962 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code/ecco_cost_weights.F 981 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 107 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 145 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 185 ECCO_COST_WEIGHTS
      do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 206 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 319 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 337 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 358 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 376 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 401 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 421 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 444 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 464 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 483 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 508 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 52 ECCO_COST_WEIGHTS
      integer jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 540 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 559 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 617 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 672 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 706 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 749 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 780 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 823 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 84 ECCO_COST_WEIGHTS
      jmax = sny+oly
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 855 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 891 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 923 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 959 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F 978 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./pkg/kpp/kpp_calc.F 140 KPP_CALC
      integer   imin      ,imax          ,jmin      ,jmax
./pkg/kpp/kpp_calc.F 142 KPP_CALC
      parameter(imin=1    ,imax=sNx      ,jmin=1    ,jmax=sNy      )
./pkg/kpp/kpp_calc.F 144 KPP_CALC
      parameter(imin=2-OLx,imax=sNx+OLx-1,jmin=2-OLy,jmax=sNy+OLy-1)
./pkg/kpp/kpp_calc.F 360 KPP_CALC
      DO j = jmin, jmax
./pkg/kpp/kpp_calc.F 374 KPP_CALC
      DO j = jmin, jmax
./pkg/kpp/kpp_calc.F 432 KPP_CALC
      DO j = jmin, jmax
./pkg/kpp/kpp_calc.F 518 KPP_CALC
         DO j = jmin, jmax
./pkg/kpp/kpp_calc.F 559 KPP_CALC
         DO j = jmin, jmax
./pkg/kpp/kpp_calc.F 602 KPP_CALC
         DO j = jmin, jmax
./pkg/kpp/kpp_calc.F 672 KPP_CALC
      DO j = jmin, jmax
./pkg/kpp/kpp_routines.F 1011 SMOOTH_HORIZ
      integer   imin      , imax          , jmin      , jmax
./pkg/kpp/kpp_routines.F 1012 SMOOTH_HORIZ
      parameter(imin=2-OLx, imax=sNx+OLx-1, jmin=2-OLy, jmax=sNy+OLy-1)
./pkg/kpp/kpp_routines.F 1017 SMOOTH_HORIZ
      DO j = jmin, jmax
./pkg/kpp/kpp_routines.F 1052 SMOOTH_HORIZ
      DO j = jmin, jmax
./pkg/kpp/kpp_routines.F 930 KPP_SMOOTH_HORIZ
      integer    imin       , imax       , jmin       , jmax
./pkg/kpp/kpp_routines.F 931 KPP_SMOOTH_HORIZ
      parameter( imin=ibot+1, imax=itop-1, jmin=jbot+1, jmax=jtop-1 )
./pkg/kpp/kpp_routines.F 936 KPP_SMOOTH_HORIZ
      DO j = jmin, jmax
./pkg/kpp/kpp_routines.F 971 KPP_SMOOTH_HORIZ
      DO j = jmin, jmax
./pkg/cfc/cfc11_forcing.F 130 CFC11_FORCING
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/cfc/cfc11_forcing.F 14 CFC11_FORCING
     &                            bi,bj,imin,imax,jmin,jmax,
./pkg/cfc/cfc11_forcing.F 40 CFC11_FORCING
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/cfc/cfc12_forcing.F 130 CFC12_FORCING
     &                    bi,bj,imin,imax,jmin,jmax,
./pkg/cfc/cfc12_forcing.F 14 CFC12_FORCING
     &                            bi,bj,imin,imax,jmin,jmax,
./pkg/cfc/cfc12_forcing.F 40 CFC12_FORCING
      INTEGER bi, bj, imin, imax, jmin, jmax
./pkg/obcs/obcs_sponge.F 259 OBCS_SPONGE_V
         IF ((j.ge.jmin).and.(j.le.jmax)) THEN 
./pkg/obcs/obcs_sponge.F 293 OBCS_SPONGE_V
         IF ((j.ge.jmin).and.(j.le.jmax)) THEN  
./pkg/obcs/obcs_sponge.F 478 OBCS_SPONGE_T
         IF ((j.ge.jmin).and.(j.le.jmax)) THEN
./pkg/obcs/obcs_sponge.F 518 OBCS_SPONGE_T
         IF ((j.ge.jmin).and.(j.le.jmax)) THEN         
./pkg/obcs/obcs_sponge.F 65 OBCS_SPONGE_U
         IF ((j.ge.jmin).and.(j.le.jmax)) THEN 
./pkg/obcs/obcs_sponge.F 720 OBCS_SPONGE_S
         IF ((j.ge.jmin).and.(j.le.jmax)) THEN 
./pkg/obcs/obcs_sponge.F 761 OBCS_SPONGE_S
         IF ((j.ge.jmin).and.(j.le.jmax)) THEN         
./pkg/obcs/obcs_sponge.F 99 OBCS_SPONGE_U
         IF ((j.ge.jmin).and.(j.le.jmax)) THEN         
./pkg/grdchk/grdchk_get_position.F 57 GRDCHK_GET_POSITION
      integer jmin,jmax
./pkg/grdchk/grdchk_get_position.F 72 GRDCHK_GET_POSITION
      jmax = sny
./pkg/grdchk/grdchk_loc.F 73 GRDCHK_LOC
      integer jmin,jmax
./pkg/grdchk/grdchk_loc.F 85 GRDCHK_LOC
      jmax = sny
./pkg/grdchk/grdchk_main.F 100 GRDCHK_MAIN
      integer j,  jmin, jmax
./pkg/grdchk/grdchk_main.F 142 GRDCHK_MAIN
      jmax = sny
./pkg/grdchk/grdchk_main.F 168 GRDCHK_MAIN
               do j = jmin, jmax
./pkg/grdchk/grdchk_get_obcs_mask.F 125 GRDCHK_GET_OBCS_MASK
                  do j = jmin,jmax
./pkg/grdchk/grdchk_get_obcs_mask.F 148 GRDCHK_GET_OBCS_MASK
                  do j = jmin,jmax
./pkg/grdchk/grdchk_get_obcs_mask.F 42 GRDCHK_GET_OBCS_MASK
      integer jmin,jmax
./pkg/grdchk/grdchk_get_obcs_mask.F 61 GRDCHK_GET_OBCS_MASK
      jmax = sny
./pkg/grdchk/grdchk_readparms.F 42 GRDCHK_READPARMS
      integer jmin,jmax
./pkg/grdchk/grdchk_readparms.F 79 GRDCHK_READPARMS
      jmax = sny+oly
./pkg/grdchk/grdchk_init.F 44 GRDCHK_INIT
      integer jmin,jmax
./pkg/grdchk/grdchk_init.F 57 GRDCHK_INIT
      jmax = sny
./pkg/gchem/gchem_calc_tendency.F 106 GCHEM_CALC_TENDENCY
     &                      bi, bj, imin, imax, jmin, jmax,
./pkg/gchem/gchem_calc_tendency.F 110 GCHEM_CALC_TENDENCY
     &                      bi, bj, imin, imax, jmin, jmax,
./pkg/gchem/gchem_calc_tendency.F 51 GCHEM_CALC_TENDENCY
      INTEGER bi,bj,imin,imax,jmin,jmax,k
./pkg/gchem/gchem_add_tendency.F 42 GCHEM_ADD_TENDENCY
      INTEGER bi,bj,imin,imax,jmin,jmax,k
./pkg/gchem/gchem_forcing_sep.F 104 GCHEM_FORCING_SEP
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/gchem/gchem_forcing_sep.F 41 GCHEM_FORCING_SEP
      INTEGER bi,bj,imin,imax,jmin,jmax
./pkg/gchem/gchem_forcing_sep.F 96 GCHEM_FORCING_SEP
     &                          bi,bj,imin,imax,jmin,jmax,
./pkg/ecco/cost_mean_heatflux.F 110 COST_MEAN_HEATFLUX
            do j = jmin,jmax
./pkg/ecco/cost_mean_heatflux.F 51 COST_MEAN_HEATFLUX
      integer jmin,jmax
./pkg/ecco/cost_mean_heatflux.F 81 COST_MEAN_HEATFLUX
      jmax = sny
./pkg/ecco/cost_curmtr.F 164 COST_CURMTR
              do j = jmin,jmax
./pkg/ecco/cost_curmtr.F 207 COST_CURMTR
              do j = jmin,jmax
./pkg/ecco/cost_curmtr.F 252 COST_CURMTR
              do j = jmin,jmax
./pkg/ecco/cost_curmtr.F 52 COST_CURMTR
      integer jmin,jmax
./pkg/ecco/cost_curmtr.F 92 COST_CURMTR
      jmax = sny
./pkg/ecco/cost_theta.F 131 COST_THETA
                     do j = jmin,jmax
./pkg/ecco/cost_theta.F 175 COST_THETA
              do j = jmin,jmax
./pkg/ecco/cost_theta.F 190 COST_THETA
              do j = jmin,jmax
./pkg/ecco/cost_theta.F 57 COST_THETA
      integer jmin,jmax
./pkg/ecco/cost_theta.F 95 COST_THETA
      jmax = sny
./pkg/ecco/cost_scat.F 132 COST_SCAT
            do j = jmin,jmax
./pkg/ecco/cost_scat.F 151 COST_SCAT
            do j = jmin,jmax
./pkg/ecco/cost_scat.F 51 COST_SCAT
      integer jmin,jmax
./pkg/ecco/cost_scat.F 83 COST_SCAT
      jmax = sny
./pkg/ecco/cost_readtopexmean.F 49 COST_READTOPEXMEAN
      integer jmin,jmax
./pkg/ecco/cost_readtopexmean.F 61 COST_READTOPEXMEAN
      jmax = sny
./pkg/ecco/cost_readtopexmean.F 75 COST_READTOPEXMEAN
          do j = jmin,jmax
./pkg/ecco/cost_ctdt.F 155 COST_CTDT
              do j = jmin,jmax
./pkg/ecco/cost_ctdt.F 52 COST_CTDT
      integer jmin,jmax
./pkg/ecco/cost_ctdt.F 95 COST_CTDT
      jmax = sny
./pkg/ecco/cost_readscatxfields.F 124 COST_READSCATXFIELDS
          do j = jmin,jmax
./pkg/ecco/cost_readscatxfields.F 153 COST_READSCATXFIELDS
          do j = jmin,jmax
./pkg/ecco/cost_readscatxfields.F 51 COST_READSCATXFIELDS
      integer jmin,jmax
./pkg/ecco/cost_readscatxfields.F 84 COST_READSCATXFIELDS
      jmax = sny
./pkg/ecco/cost_driftw.F 114 COST_DRIFTW
            do j = jmin,jmax
./pkg/ecco/cost_driftw.F 140 COST_DRIFTW
              do j = jmin,jmax
./pkg/ecco/cost_driftw.F 165 COST_DRIFTW
              do j = jmin,jmax
./pkg/ecco/cost_driftw.F 188 COST_DRIFTW
            do j = jmin,jmax
./pkg/ecco/cost_driftw.F 57 COST_DRIFTW
      integer jmin,jmax
./pkg/ecco/cost_driftw.F 85 COST_DRIFTW
      jmax = sny
./pkg/ecco/cost_readargot.F 48 COST_READARGOT
      integer jmin,jmax
./pkg/ecco/cost_readargot.F 68 COST_READARGOT
      jmax = sny
./pkg/ecco/cost_readargot.F 89 COST_READARGOT
               do j = jmin,jmax
./pkg/ecco/cost_readscatyfields.F 122 COST_READSCATYFIELDS
          do j = jmin,jmax
./pkg/ecco/cost_readscatyfields.F 151 COST_READSCATYFIELDS
          do j = jmin,jmax
./pkg/ecco/cost_readscatyfields.F 51 COST_READSCATYFIELDS
      integer jmin,jmax
./pkg/ecco/cost_readscatyfields.F 84 COST_READSCATYFIELDS
      jmax = sny
./pkg/ecco/cost_obcsn.F 54 COST_OBCSN
      integer jmin,jmax
./pkg/ecco/cost_obcsn.F 89 COST_OBCSN
      jmax = sny
./pkg/ecco/cost_ssh_mean.F 106 COST_SSH_MEAN
      jmax = sny
./pkg/ecco/cost_ssh_mean.F 117 COST_SSH_MEAN
          do j = jmin,jmax
./pkg/ecco/cost_ssh_mean.F 136 COST_SSH_MEAN
          do j = jmin,jmax
./pkg/ecco/cost_ssh_mean.F 184 COST_SSH_MEAN
            do j = jmin,jmax
./pkg/ecco/cost_ssh_mean.F 233 COST_SSH_MEAN
          do j = jmin,jmax
./pkg/ecco/cost_ssh_mean.F 69 COST_SSH_MEAN
      integer jmin,jmax
./pkg/ecco/cost_obcsvol.F 100 COST_OBCSVOL
      jmax = sny
./pkg/ecco/cost_obcsvol.F 288 COST_OBCSVOL
                do j = jmin,jmax
./pkg/ecco/cost_obcsvol.F 331 COST_OBCSVOL
                do j = jmin,jmax
./pkg/ecco/cost_obcsvol.F 58 COST_OBCSVOL
      integer jmin,jmax
./pkg/ecco/cost_ssh.F 100 COST_SSH
      do j = jmin, jmax
./pkg/ecco/cost_ssh.F 123 COST_SSH
          do j = jmin,jmax
./pkg/ecco/cost_ssh.F 144 COST_SSH
            do j = jmin,jmax
./pkg/ecco/cost_ssh.F 257 COST_SSH
            do j = jmin,jmax
./pkg/ecco/cost_ssh.F 284 COST_SSH
            do j = jmin,jmax
./pkg/ecco/cost_ssh.F 311 COST_SSH
            do j = jmin,jmax
./pkg/ecco/cost_ssh.F 61 COST_SSH
      integer jmin,jmax
./pkg/ecco/cost_ssh.F 93 COST_SSH
      jmax = sny
./pkg/ecco/cost_forcing_gen.F 113 COST_FORCING_GEN
      jmax = sny
./pkg/ecco/cost_forcing_gen.F 135 COST_FORCING_GEN
          do j = jmin,jmax
./pkg/ecco/cost_forcing_gen.F 158 COST_FORCING_GEN
            do j = jmin,jmax
./pkg/ecco/cost_forcing_gen.F 177 COST_FORCING_GEN
        do j = jmin,jmax
./pkg/ecco/cost_forcing_gen.F 211 COST_FORCING_GEN
            do j = jmin,jmax
./pkg/ecco/cost_forcing_gen.F 255 COST_FORCING_GEN
            do j = jmin,jmax
./pkg/ecco/cost_forcing_gen.F 79 COST_FORCING_GEN
      integer jmin,jmax
./pkg/ecco/cost_mean_saltflux.F 113 COST_MEAN_SALTFLUX
            do j = jmin,jmax
./pkg/ecco/cost_mean_saltflux.F 51 COST_MEAN_SALTFLUX
      integer jmin,jmax
./pkg/ecco/cost_mean_saltflux.F 84 COST_MEAN_SALTFLUX
      jmax = sny
./pkg/ecco/cost_readgfo.F 128 COST_READGFO
          do j = jmin,jmax
./pkg/ecco/cost_readgfo.F 49 COST_READGFO
      integer jmin,jmax
./pkg/ecco/cost_readgfo.F 82 COST_READGFO
      jmax = sny
./pkg/ecco/cost_salt0.F 115 COST_SALT0
             do j = jmin,jmax
./pkg/ecco/cost_salt0.F 150 COST_SALT0
             do j = jmin,jmax
./pkg/ecco/cost_salt0.F 54 COST_SALT0
      integer jmin,jmax
./pkg/ecco/cost_salt0.F 83 COST_SALT0
      jmax = sny
./pkg/ecco/cost_kapgm.F 119 COST_KAPGM
            do j = jmin,jmax
./pkg/ecco/cost_kapgm.F 58 COST_KAPGM
      integer jmin,jmax
./pkg/ecco/cost_kapgm.F 87 COST_KAPGM
      jmax = sny
./pkg/ecco/ecco_cost_init_varia.F 196 ECCO_COST_INIT_VARIA
          do j = jmin,jmax
./pkg/ecco/ecco_cost_init_varia.F 44 ECCO_COST_INIT_VARIA
      integer jmin, jmax
./pkg/ecco/ecco_cost_init_varia.F 58 ECCO_COST_INIT_VARIA
      jmax = sny+OLy
./pkg/ecco/cost_ctds.F 154 COST_CTDS
              do j = jmin,jmax
./pkg/ecco/cost_ctds.F 51 COST_CTDS
      integer jmin,jmax
./pkg/ecco/cost_ctds.F 94 COST_CTDS
      jmax = sny
./pkg/ecco/cost_averagesfields.F 108 COST_AVERAGESFIELDS
      jmax = sny
./pkg/ecco/cost_averagesfields.F 195 COST_AVERAGESFIELDS
              do j = jmin,jmax
./pkg/ecco/cost_averagesfields.F 208 COST_AVERAGESFIELDS
              do j = jmin,jmax
./pkg/ecco/cost_averagesfields.F 246 COST_AVERAGESFIELDS
              do j = jmin,jmax
./pkg/ecco/cost_averagesfields.F 268 COST_AVERAGESFIELDS
              do j = jmin,jmax
./pkg/ecco/cost_averagesfields.F 279 COST_AVERAGESFIELDS
              do j = jmin,jmax
./pkg/ecco/cost_averagesfields.F 314 COST_AVERAGESFIELDS
              do j = jmin,jmax
./pkg/ecco/cost_averagesfields.F 67 COST_AVERAGESFIELDS
      integer jmin,jmax
./pkg/ecco/cost_generic.F 124 COST_GENERIC
      jmax = sny
./pkg/ecco/cost_generic.F 214 COST_GENERIC
                do j = jmin,jmax
./pkg/ecco/cost_generic.F 232 COST_GENERIC
             do j = jmin,jmax
./pkg/ecco/cost_generic.F 245 COST_GENERIC
             do j = jmin,jmax
./pkg/ecco/cost_generic.F 77 COST_GENERIC
      integer jmin,jmax
./pkg/ecco/cost_ctdtclim.F 132 COST_CTDTCLIM
                     do j = jmin,jmax
./pkg/ecco/cost_ctdtclim.F 175 COST_CTDTCLIM
              do j = jmin,jmax
./pkg/ecco/cost_ctdtclim.F 202 COST_CTDTCLIM
              do j = jmin,jmax
./pkg/ecco/cost_ctdtclim.F 63 COST_CTDTCLIM
      integer jmin,jmax
./pkg/ecco/cost_ctdtclim.F 97 COST_CTDTCLIM
      jmax = sny
./pkg/ecco/ecco_cost_init_barfiles.F 103 ECCO_COST_INIT_BARFILES
            do j = jmin,jmax
./pkg/ecco/ecco_cost_init_barfiles.F 117 ECCO_COST_INIT_BARFILES
            do j = jmin,jmax
./pkg/ecco/ecco_cost_init_barfiles.F 46 ECCO_COST_INIT_BARFILES
      integer jmin,jmax
./pkg/ecco/ecco_cost_init_barfiles.F 87 ECCO_COST_INIT_BARFILES
      jmax = sny
./pkg/ecco/ecco_cost_init_barfiles.F 93 ECCO_COST_INIT_BARFILES
          do j = jmin,jmax
./pkg/ecco/cost_drifter.F 106 COST_DRIFTER
      jmax = sny
./pkg/ecco/cost_drifter.F 157 COST_DRIFTER
          do j = jmin,jmax
./pkg/ecco/cost_drifter.F 187 COST_DRIFTER
         do j = jmin,jmax
./pkg/ecco/cost_drifter.F 210 COST_DRIFTER
         do j = jmin,jmax-1,2
./pkg/ecco/cost_drifter.F 240 COST_DRIFTER
         do j = jmin,jmax-1,2
./pkg/ecco/cost_drifter.F 270 COST_DRIFTER
         do j = jmin,jmax-1,2
./pkg/ecco/cost_drifter.F 299 COST_DRIFTER
         do j = jmin,jmax-1,2
./pkg/ecco/cost_drifter.F 64 COST_DRIFTER
      integer jmin,jmax
./pkg/ecco/cost_readtopex.F 126 COST_READTOPEX
          do j = jmin,jmax
./pkg/ecco/cost_readtopex.F 49 COST_READTOPEX
      integer jmin,jmax
./pkg/ecco/cost_readtopex.F 82 COST_READTOPEX
      jmax = sny
./pkg/ecco/cost_argo_theta.F 164 COST_ARGO_THETA
              do j = jmin,jmax
./pkg/ecco/cost_argo_theta.F 52 COST_ARGO_THETA
      integer jmin,jmax
./pkg/ecco/cost_argo_theta.F 95 COST_ARGO_THETA
      jmax = sny
./pkg/ecco/cost_obcsw.F 126 COST_OBCSW
               do j = jmin,jmax
./pkg/ecco/cost_obcsw.F 163 COST_OBCSW
               do j = jmin,jmax
./pkg/ecco/cost_obcsw.F 199 COST_OBCSW
               do j = jmin,jmax
./pkg/ecco/cost_obcsw.F 236 COST_OBCSW
               do j = jmin,jmax
./pkg/ecco/cost_obcsw.F 54 COST_OBCSW
      integer jmin,jmax
./pkg/ecco/cost_obcsw.F 89 COST_OBCSW
      jmax = sny
./pkg/ecco/cost_trans_zonal.F 113 COST_TRANS_ZONAL
      jmax = sny
./pkg/ecco/cost_trans_zonal.F 182 COST_TRANS_ZONAL
              do j = jmin,jmax
./pkg/ecco/cost_trans_zonal.F 51 COST_TRANS_ZONAL
      integer jmin,jmax
./pkg/ecco/cost_theta0.F 115 COST_THETA0
             do j = jmin,jmax
./pkg/ecco/cost_theta0.F 150 COST_THETA0
             do j = jmin,jmax
./pkg/ecco/cost_theta0.F 54 COST_THETA0
      integer jmin,jmax
./pkg/ecco/cost_theta0.F 83 COST_THETA0
      jmax = sny
./pkg/ecco/cost_argo_salt.F 161 COST_ARGO_SALT
              do j = jmin,jmax
./pkg/ecco/cost_argo_salt.F 52 COST_ARGO_SALT
      integer jmin,jmax
./pkg/ecco/cost_argo_salt.F 94 COST_ARGO_SALT
      jmax = sny
./pkg/ecco/ecco_cost_weights.F 1018 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 1037 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 112 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 1251 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 158 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 206 ECCO_COST_WEIGHTS
      do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 227 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 331 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 349 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 371 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 389 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 415 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 434 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 458 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 477 ECCO_COST_WEIGHTS
            do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 496 ECCO_COST_WEIGHTS
          do j = jmin,jmax
./pkg/ecco/ecco_cost_weights.F 52 ECCO_COST_WEIGHTS
      integer jmin,jmax
./pkg/ecco/ecco_cost_weights.F 538 ECCO_COST_WEIGHTS
          do j =