Symbol Description Uses
myiter 312


File Line number Procedure Code
./pkg/exf/exf_adjoint_snapshots.F 21 EXF_ADJOINT_SNAPSHOTS 
      integer myiter
./pkg/exf/exf_adjoint_snapshots.F 6 EXF_ADJOINT_SNAPSHOTS 
      subroutine EXF_ADJOINT_SNAPSHOTS( iwhen, mytime, myiter, myThid )
./pkg/exf/exf_check_range.F 102 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, ustress(i,j,bi,bj)
./pkg/exf/exf_check_range.F 111 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, vstress(i,j,bi,bj)
./pkg/exf/exf_check_range.F 121 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, uwind(i,j,bi,bj)
./pkg/exf/exf_check_range.F 130 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, vwind(i,j,bi,bj)
./pkg/exf/exf_check_range.F 141 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, wspeed(i,j,bi,bj)
./pkg/exf/exf_check_range.F 153 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, atemp(i,j,bi,bj)
./pkg/exf/exf_check_range.F 163 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, aqh(i,j,bi,bj)
./pkg/exf/exf_check_range.F 173 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, precip(i,j,bi,bj)
./pkg/exf/exf_check_range.F 184 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, snowprecip(i,j,bi,bj)
./pkg/exf/exf_check_range.F 196 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, swflux(i,j,bi,bj)
./pkg/exf/exf_check_range.F 208 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, runoff(i,j,bi,bj)
./pkg/exf/exf_check_range.F 226 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, runoff(i,j,bi,bj)
./pkg/exf/exf_check_range.F 29 EXF_CHECK_RANGE 
      integer myiter, mythid
./pkg/exf/exf_check_range.F 6 EXF_CHECK_RANGE 
      SUBROUTINE EXF_CHECK_RANGE( mytime, myiter, mythid )
./pkg/exf/exf_check_range.F 84 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, hflux(i,j,bi,bj)
./pkg/exf/exf_check_range.F 93 EXF_CHECK_RANGE 
     &          bi, bj, i, j, myiter, sflux(i,j,bi,bj)
./pkg/exf/exf_getclim.F 102 EXF_GETCLIM 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getclim.F 116 EXF_GETCLIM 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getclim.F 127 EXF_GETCLIM 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getclim.F 150 EXF_GETCLIM 
     I     mytime, myiter, mythid )
./pkg/exf/exf_getclim.F 178 EXF_GETCLIM 
           if ( myiter .EQ. niter0 ) then
./pkg/exf/exf_getclim.F 59 EXF_GETCLIM 
      integer myiter
./pkg/exf/exf_getclim.F 79 EXF_GETCLIM 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getclim.F 9 EXF_GETCLIM 
     I                        myiter,
./pkg/exf/exf_getsurfacefluxes.F 101 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 125 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 131 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 53 EXF_GETSURFACEFLUXES 
      integer myiter
./pkg/exf/exf_getsurfacefluxes.F 74 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 82 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 8 EXF_GETSURFACEFLUXES 
     I                                 myiter,
./pkg/exf/exf_getsurfacefluxes.F 93 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getyearlyfieldname.F 33 EXF_GETYEARLYFIELDNAME 
      integer myiter
./pkg/exf/exf_getyearlyfieldname.F 8 EXF_GETYEARLYFIELDNAME 
     I     mytime, myiter, mythid )
./pkg/profiles/active_file_profiles_ad.F 127 ADACTIVE_WRITE_PROFILE 
      integer myiter
./pkg/profiles/active_file_profiles_ad.F 140 ADACTIVE_WRITE_PROFILE 
     &     REVERSE_SIMULATION, myiter,bi,bj, mythid)
./pkg/profiles/active_file_profiles_ad.F 28 ADACTIVE_READ_PROFILE 
     I                              myiter,
./pkg/profiles/active_file_profiles_ad.F 63 ADACTIVE_READ_PROFILE 
      integer myiter
./pkg/profiles/active_file_profiles_ad.F 73 ADACTIVE_READ_PROFILE 
     &     REVERSE_SIMULATION, myiter,bi,bj, mythid)
./pkg/profiles/active_file_profiles_ad.F 90 ADACTIVE_WRITE_PROFILE 
     I                              myiter,
./pkg/profiles/cost_profiles.F 12 COST_PROFILES 
      SUBROUTINE COST_PROFILES( myiter, mytime, myThid )
./pkg/profiles/cost_profiles.F 36 COST_PROFILES 
      integer myiter
./pkg/seaice/cost_ice_test.F 234 COST_ICE_TEST 
      print *, 'ph-ice C ', myiter, objf_ice(1,1)
./pkg/seaice/cost_ice_test.F 66 COST_ICE_TEST 
      integer myiter
./pkg/seaice/cost_ice_test.F 6 COST_ICE_TEST 
      subroutine COST_ICE_TEST( mytime, myiter, mythid )
./pkg/seaice/cost_ice_test.F 92 COST_ICE_TEST 
      print *, 'ph-ice B ', myiter, theta(4,4,kSrf,1,1),
./pkg/seaice/seaice_cost_areasst.F 16 SEAICE_COST_AREASST 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_areasst.F 61 SEAICE_COST_AREASST 
      integer myiter
./pkg/seaice/seaice_cost_concentration.F 13 SEAICE_COST_CONCENTRATION 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_concentration.F 43 SEAICE_COST_CONCENTRATION 
      integer myiter
./pkg/seaice/seaice_cost_driver.F 105 SEAICE_COST_DRIVER 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_driver.F 42 SEAICE_COST_DRIVER 
      integer myiter
./pkg/seaice/seaice_cost_driver.F 6 SEAICE_COST_DRIVER 
      subroutine SEAICE_COST_DRIVER( myiter, mytime, mythid )
./pkg/seaice/seaice_cost_driver.F 83 SEAICE_COST_DRIVER 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_driver.F 94 SEAICE_COST_DRIVER 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_sss.F 16 SEAICE_COST_SSS 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_sss.F 46 SEAICE_COST_SSS 
      integer myiter
./pkg/seaice/seaice_cost_sst.F 14 SEAICE_COST_SST 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_sst.F 44 SEAICE_COST_SST 
      integer myiter
./pkg/streamice/streamice_dump.F 11 STREAMICE_DUMP 
      subroutine STREAMICE_DUMP( mytime, myiter, myThid )
./pkg/streamice/streamice_dump.F 40 STREAMICE_DUMP 
      integer myiter
./pkg/streamice/streamice_dump_ad.F 11 ADSTREAMICE_DUMP 
      subroutine ADSTREAMICE_DUMP( mytime, myiter, myThid )
./pkg/streamice/streamice_dump_ad.F 49 ADSTREAMICE_DUMP 
      integer myiter
./pkg/streamice/streamice_solo_timestep.F 89 STREAMICE_SOLO_TIMESTEP 
      CALL STREAMICE_DUMP( mytime, myiter, myThid )
./pkg/thsice/thsice_cost_driver.F 35 THSICE_COST_DRIVER 
      integer myiter
./pkg/thsice/thsice_cost_driver.F 42 THSICE_COST_DRIVER 
       CALL THSICE_COST_TEST( mytime, myiter, mythid )
./pkg/thsice/thsice_cost_driver.F 6 THSICE_COST_DRIVER 
      subroutine THSICE_COST_DRIVER( mytime, myiter, mythid )
./pkg/thsice/thsice_cost_test.F 62 THSICE_COST_TEST 
      integer myiter
./pkg/thsice/thsice_cost_test.F 6 THSICE_COST_TEST 
      subroutine THSICE_COST_TEST( mytime, myiter, mythid )
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 10 ADDUMMY_IN_STEPPING 
      subroutine ADDUMMY_IN_STEPPING( mytime, myiter, myThid )
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 46 ADDUMMY_IN_STEPPING 
      integer myiter
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 72 ADDUMMY_IN_STEPPING 
         write(*,*) 'myIter= ',myiter
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F 104 CTRL_MAP_GENTIM2D 
     I      mytime, myiter, mythid )
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F 151 CTRL_MAP_GENTIM2D 
     &    iarr,' : iter=', myiter, ' ; global sum = ', LOCsumGlob
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 104 CTRL_MAP_GENTIM2D 
     I      mytime, myiter, mythid )
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 151 CTRL_MAP_GENTIM2D 
     &    iarr,' : iter=', myiter, ' ; global sum = ', LOCsumGlob
./pkg/cal/cal_dayspermonth.F 45 CAL_DAYSPERMONTH 
      integer myiter
./pkg/cal/cal_dayspermonth.F 64 CAL_DAYSPERMONTH 
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/cal/cal_dayspermonth.F 7 CAL_DAYSPERMONTH 
     I                             myiter,
./pkg/cal/cal_getmonthsrec.F 46 CAL_GETMONTHSREC 
      integer myiter
./pkg/cal/cal_getmonthsrec.F 91 CAL_GETMONTHSREC 
      call CAL_GETDATE( myiter, mytime, currentdate, mythid )
./pkg/cal/cal_getmonthsrec.F 9 CAL_GETMONTHSREC 
     I                             mytime, myiter, mythid
./pkg/cal/cal_monthsperyear.F 46 CAL_MONTHSPERYEAR 
      integer myiter
./pkg/cal/cal_monthsperyear.F 59 CAL_MONTHSPERYEAR 
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/cal/cal_monthsperyear.F 7 CAL_MONTHSPERYEAR 
     I                              myiter,
./pkg/cal/cal_stepsperday.F 45 CAL_STEPSPERDAY 
      integer myiter
./pkg/cal/cal_stepsperday.F 62 CAL_STEPSPERDAY 
      call CAL_GETDATE( myiter, mytime, currentdate, mythid )
./pkg/cal/cal_stepsperday.F 7 CAL_STEPSPERDAY 
     I                            myiter,
./pkg/cal/cal_timestamp.F 36 CAL_TIMESTAMP 
      integer myiter
./pkg/cal/cal_timestamp.F 49 CAL_TIMESTAMP 
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/cal/cal_timestamp.F 60 CAL_TIMESTAMP 
     &  ' cal_TimeStamp: iter = ',myiter,' time = ',mytime
./pkg/cal/cal_timestamp.F 7 CAL_TIMESTAMP 
     I                          myiter,
./pkg/cost/cost_tile.F 62 COST_TILE 
      subroutine COST_TILE( mytime, myiter, myThid )
./pkg/cost/cost_tile.F 94 COST_TILE 
      integer myiter
./pkg/ctrl/ctrl_get_gen.F 114 CTRL_GET_GEN 
     I                       mytime, myiter, mythid )
./pkg/ctrl/ctrl_get_gen.F 11 CTRL_GET_GEN 
     I          mytime, myiter, mythid
./pkg/ctrl/ctrl_get_gen.F 56 CTRL_GET_GEN 
      integer myiter
./pkg/ctrl/ctrl_get_gen_rec.F 116 CTRL_GET_GEN_REC 
     I      mytime, myiter, mythid
./pkg/ctrl/ctrl_get_gen_rec.F 130 CTRL_GET_GEN_REC 
       call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/ctrl/ctrl_get_gen_rec.F 152 CTRL_GET_GEN_REC 
        call CAL_GETDATE( myiter-1, mytime-modelstep,
./pkg/ctrl/ctrl_get_gen_rec.F 15 CTRL_GET_GEN_REC 
     I                        myiter,
./pkg/ctrl/ctrl_get_gen_rec.F 53 CTRL_GET_GEN_REC 
      integer myiter
./pkg/ctrl/ctrl_getobcse.F 117 CTRL_GETOBCSE 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcse.F 11 CTRL_GETOBCSE 
     I                             myiter,
./pkg/ctrl/ctrl_getobcse.F 47 CTRL_GETOBCSE 
      integer myiter
./pkg/ctrl/ctrl_getobcsn.F 11 CTRL_GETOBCSN 
     I                             myiter,
./pkg/ctrl/ctrl_getobcsn.F 123 CTRL_GETOBCSN 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcsn.F 48 CTRL_GETOBCSN 
      integer myiter
./pkg/ctrl/ctrl_getobcss.F 119 CTRL_GETOBCSS 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcss.F 11 CTRL_GETOBCSS 
     I                             myiter,
./pkg/ctrl/ctrl_getobcss.F 49 CTRL_GETOBCSS 
      integer myiter
./pkg/ctrl/ctrl_getobcsw.F 118 CTRL_GETOBCSW 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcsw.F 11 CTRL_GETOBCSW 
     I                             myiter,
./pkg/ctrl/ctrl_getobcsw.F 48 CTRL_GETOBCSW 
      integer myiter
./pkg/ctrl/ctrl_getrec.F 14 CTRL_GETREC 
     I                        myiter,
./pkg/ctrl/ctrl_getrec.F 321 CTRL_GETREC 
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/ctrl/ctrl_getrec.F 337 CTRL_GETREC 
        call CAL_GETDATE( myiter-1, mytime-modelstep,
./pkg/ctrl/ctrl_getrec.F 60 CTRL_GETREC 
      integer myiter
./pkg/ctrl/ctrl_map_gentim2d.F 102 CTRL_MAP_GENTIM2D 
     I      mytime, myiter, mythid )
./pkg/ctrl/ctrl_map_gentim2d.F 152 CTRL_MAP_GENTIM2D 
     &    ' iter=', myiter, ' ; genprecipGloH= ', genprecipGloH
./pkg/ecco/cost_argo_salt.F 44 COST_ARGO_SALT 
      integer myiter
./pkg/ecco/cost_argo_salt.F 8 COST_ARGO_SALT 
     I                     myiter,
./pkg/ecco/cost_argo_theta.F 44 COST_ARGO_THETA 
      integer myiter
./pkg/ecco/cost_argo_theta.F 8 COST_ARGO_THETA 
     I                     myiter,
./pkg/ecco/cost_atlantic.F 113 COST_ATLANTIC 
      myiter = niter0 + INT((mytime-starttime)/deltaTClock+0.5)
./pkg/ecco/cost_atlantic.F 116 COST_ATLANTIC 
     I                    myiter,     mytime,       mythid,
./pkg/ecco/cost_atlantic.F 53 COST_ATLANTIC 
      integer myiter
./pkg/ecco/cost_atlantic.F 9 COST_ATLANTIC 
     I                                myiter,
./pkg/ecco/cost_averagesfields.F 151 COST_AVERAGESFIELDS 
      myiter = niter0 + INT((mytime-starttime)/deltaTClock+0.5)
./pkg/ecco/cost_averagesfields.F 159 COST_AVERAGESFIELDS 
     I                    myiter,     mytime,       mythid,
./pkg/ecco/cost_averagesfields.F 192 COST_AVERAGESFIELDS 
     &    ' iter=', myiter, ' ; sterGloH= ', sterGloH
./pkg/ecco/cost_averagesfields.F 71 COST_AVERAGESFIELDS 
      integer myiter
./pkg/ecco/cost_averagesfields.F 731 COST_AVERAGESFIELDS 
      call COST_ATLANTIC(  mytime, myiter,mythid )
./pkg/ecco/cost_averagesflags.F 112 COST_AVERAGESFLAGS 
      call CAL_GETDATE( myiter,   mytime,           mydate,   mythid )
./pkg/ecco/cost_averagesflags.F 113 COST_AVERAGESFLAGS 
      call CAL_GETDATE( myiter+1, mytime+modelstep, nextdate, mythid )
./pkg/ecco/cost_averagesflags.F 58 COST_AVERAGESFLAGS 
      integer myiter
./pkg/ecco/cost_averagesflags.F 8 COST_AVERAGESFLAGS 
     I                               myiter,
./pkg/ecco/cost_bottomdrag.F 34 COST_BOTTOMDRAG 
      integer myiter
./pkg/ecco/cost_bottomdrag.F 8 COST_BOTTOMDRAG 
     I                           myiter,
./pkg/ecco/cost_bp.F 47 COST_BP 
      integer myiter
./pkg/ecco/cost_bp.F 8 COST_BP 
     I                     myiter,
./pkg/ecco/cost_ctds.F 43 COST_CTDS 
      integer myiter
./pkg/ecco/cost_ctds.F 8 COST_CTDS 
     I                     myiter,
./pkg/ecco/cost_ctdsclim.F 52 COST_CTDSCLIM 
      integer myiter
./pkg/ecco/cost_ctdsclim.F 8 COST_CTDSCLIM 
     I                       myiter,
./pkg/ecco/cost_ctdt.F 44 COST_CTDT 
      integer myiter
./pkg/ecco/cost_ctdt.F 8 COST_CTDT 
     I                     myiter,
./pkg/ecco/cost_ctdtclim.F 52 COST_CTDTCLIM 
      integer myiter
./pkg/ecco/cost_ctdtclim.F 8 COST_CTDTCLIM 
     I                       myiter,
./pkg/ecco/cost_curmtr.F 44 COST_CURMTR 
      integer myiter
./pkg/ecco/cost_curmtr.F 7 COST_CURMTR 
     I                     myiter,
./pkg/ecco/cost_diffkr.F 34 COST_DIFFKR 
      integer myiter
./pkg/ecco/cost_diffkr.F 8 COST_DIFFKR 
     I                           myiter,
./pkg/ecco/cost_drift.F 42 COST_DRIFT 
      integer myiter
./pkg/ecco/cost_drift.F 6 COST_DRIFT 
      subroutine COST_DRIFT( myiter, mytime, mythid )
./pkg/ecco/cost_drifter.F 56 COST_DRIFTER 
      integer myiter
./pkg/ecco/cost_drifter.F 8 COST_DRIFTER 
     I                       myiter,
./pkg/ecco/cost_driftw.F 46 COST_DRIFTW 
      integer myiter
./pkg/ecco/cost_driftw.F 8 COST_DRIFTW 
     I                       myiter,
./pkg/ecco/cost_etan0.F 46 COST_ETAN0 
      integer myiter
./pkg/ecco/cost_etan0.F 8 COST_ETAN0 
     I                           myiter,
./pkg/ecco/cost_forcing.F 100 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 113 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 129 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 146 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 163 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 180 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 196 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 211 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 226 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 241 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 256 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 271 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 286 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 301 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 316 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 49 COST_FORCING 
      integer myiter
./pkg/ecco/cost_forcing.F 72 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 7 COST_FORCING 
      subroutine COST_FORCING( myiter, mytime, mythid )
./pkg/ecco/cost_forcing.F 85 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing_gen.F 53 COST_FORCING_GEN 
      integer myiter
./pkg/ecco/cost_forcing_gen.F 8 COST_FORCING_GEN 
     I                       myiter,
./pkg/ecco/cost_gen_transport.F 41 COST_GEN_TRANSPORT 
      integer myiter
./pkg/ecco/cost_gen_transport.F 8 COST_GEN_TRANSPORT 
     I                     myiter,
./pkg/ecco/cost_gencost_all.F 37 COST_GENCOST_ALL 
      integer myiter
./pkg/ecco/cost_gencost_all.F 73 COST_GENCOST_ALL 
     &        myiter, mytime, mythid )
./pkg/ecco/cost_gencost_all.F 7 COST_GENCOST_ALL 
      subroutine COST_GENCOST_ALL( myiter, mytime, mythid )
./pkg/ecco/cost_gencost_all.F 83 COST_GENCOST_ALL 
     &    call COST_GENCOST_SSHV4( myiter, mytime, mythid )
./pkg/ecco/cost_gencost_all.F 88 COST_GENCOST_ALL 
     &    call COST_GENCOST_SSTV4( myiter, mytime, mythid )
./pkg/ecco/cost_gencost_sshv4.F 62 COST_GENCOST_SSHV4 
      integer myiter
./pkg/ecco/cost_gencost_sshv4.F 8 COST_GENCOST_SSHV4 
     I                     myiter,
./pkg/ecco/cost_gencost_sstv4.F 48 COST_GENCOST_SSTV4 
      integer myiter
./pkg/ecco/cost_gencost_sstv4.F 8 COST_GENCOST_SSTV4 
     I                     myiter,
./pkg/ecco/cost_genctrl.F 40 COST_GENCTRL 
      integer myiter
./pkg/ecco/cost_genctrl.F 62 COST_GENCTRL 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_genctrl.F 9 COST_GENCTRL 
      subroutine COST_GENCTRL( myiter, mytime, mythid )
./pkg/ecco/cost_generic.F 14 COST_GENERIC 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_generic.F 51 COST_GENERIC 
      integer myiter
./pkg/ecco/cost_hyd.F 103 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 112 COST_HYD 
      call COST_ARGO_THETA ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 119 COST_HYD 
      call COST_CTDT  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 126 COST_HYD 
      call COST_XBT   ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 147 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 169 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 177 COST_HYD 
      call COST_CTDS  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 184 COST_HYD 
      call COST_ARGO_SALT ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 191 COST_HYD 
      call COST_THETA0 ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 198 COST_HYD 
      call COST_SALT0  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 205 COST_HYD 
      call COST_THETA ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 212 COST_HYD 
      call COST_SALT  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 219 COST_HYD 
      call COST_SIGMAR  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 226 COST_HYD 
      call COST_GEN_TRANSPORT  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 230 COST_HYD 
      if ( usePROFILES ) CALL COST_PROFILES( myiter, mytime, mythid)
./pkg/ecco/cost_hyd.F 237 COST_HYD 
      call COST_ETAN0 ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 244 COST_HYD 
      call COST_UVEL0 ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 250 COST_HYD 
      call COST_VVEL0 ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 276 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 46 COST_HYD 
      integer myiter
./pkg/ecco/cost_hyd.F 7 COST_HYD 
      subroutine COST_HYD( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 82 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_ies.F 47 COST_IES 
      integer myiter
./pkg/ecco/cost_ies.F 8 COST_IES 
     I                     myiter,
./pkg/ecco/cost_internal_params.F 35 COST_INTERNAL_PARAMS 
      integer myiter
./pkg/ecco/cost_internal_params.F 45 COST_INTERNAL_PARAMS 
      call COST_TAU_EDDY( myiter, mytime, mythid )
./pkg/ecco/cost_internal_params.F 53 COST_INTERNAL_PARAMS 
      call COST_KAPGM( myiter, mytime, mythid )
./pkg/ecco/cost_internal_params.F 61 COST_INTERNAL_PARAMS 
      call COST_KAPREDI( myiter, mytime, mythid )
./pkg/ecco/cost_internal_params.F 69 COST_INTERNAL_PARAMS 
      call COST_DIFFKR( myiter, mytime, mythid )
./pkg/ecco/cost_internal_params.F 77 COST_INTERNAL_PARAMS 
      call COST_BOTTOMDRAG( myiter, mytime, mythid )
./pkg/ecco/cost_internal_params.F 7 COST_INTERNAL_PARAMS 
      subroutine COST_INTERNAL_PARAMS( myiter, mytime, mythid )
./pkg/ecco/cost_kapgm.F 37 COST_KAPGM 
      integer myiter
./pkg/ecco/cost_kapgm.F 8 COST_KAPGM 
     I                           myiter,
./pkg/ecco/cost_kapredi.F 37 COST_KAPREDI 
      integer myiter
./pkg/ecco/cost_kapredi.F 8 COST_KAPREDI 
     I                           myiter,
./pkg/ecco/cost_mean_heatflux.F 44 COST_MEAN_HEATFLUX 
      integer myiter
./pkg/ecco/cost_mean_heatflux.F 8 COST_MEAN_HEATFLUX 
     I                       myiter,
./pkg/ecco/cost_mean_saltflux.F 44 COST_MEAN_SALTFLUX 
      integer myiter
./pkg/ecco/cost_mean_saltflux.F 8 COST_MEAN_SALTFLUX 
     I                       myiter,
./pkg/ecco/cost_obcs.F 10 COST_OBCS 
     I                     myiter,
./pkg/ecco/cost_obcs.F 39 COST_OBCS 
      integer myiter
./pkg/ecco/cost_obcs.F 56 COST_OBCS 
      call COST_OBCSN ( myiter, mytime,
./pkg/ecco/cost_obcs.F 65 COST_OBCS 
      call COST_OBCSS ( myiter, mytime,
./pkg/ecco/cost_obcs.F 74 COST_OBCS 
      call COST_OBCSW ( myiter, mytime,
./pkg/ecco/cost_obcs.F 83 COST_OBCS 
      call COST_OBCSE ( myiter, mytime,
./pkg/ecco/cost_obcs.F 89 COST_OBCS 
      call COST_OBCSVOL ( myiter,mytime,
./pkg/ecco/cost_obcs_ageos.F 45 COST_OBCS_AGEOS 
      integer myiter
./pkg/ecco/cost_obcs_ageos.F 6 COST_OBCS_AGEOS 
      subroutine COST_OBCS_AGEOS( myiter, mytime, mythid )
./pkg/ecco/cost_obcse.F 10 COST_OBCSE 
     I                       myiter,
./pkg/ecco/cost_obcse.F 53 COST_OBCSE 
      integer myiter
./pkg/ecco/cost_obcsn.F 10 COST_OBCSN 
     I                       myiter,
./pkg/ecco/cost_obcsn.F 53 COST_OBCSN 
      integer myiter
./pkg/ecco/cost_obcss.F 10 COST_OBCSS 
     I                       myiter,
./pkg/ecco/cost_obcss.F 53 COST_OBCSS 
      integer myiter
./pkg/ecco/cost_obcsvol.F 45 COST_OBCSVOL 
      integer myiter
./pkg/ecco/cost_obcsvol.F 7 COST_OBCSVOL 
     I                       myiter,
./pkg/ecco/cost_obcsw.F 10 COST_OBCSW 
     I                       myiter,
./pkg/ecco/cost_obcsw.F 53 COST_OBCSW 
      integer myiter
./pkg/ecco/cost_salt.F 48 COST_SALT 
      integer myiter
./pkg/ecco/cost_salt.F 6 COST_SALT 
      subroutine COST_SALT( myiter, mytime, mythid )
./pkg/ecco/cost_salt0.F 46 COST_SALT0 
      integer myiter
./pkg/ecco/cost_salt0.F 8 COST_SALT0 
     I                           myiter,
./pkg/ecco/cost_salt_ini_fin.F 38 COST_SALT_INI_FIN 
      integer myiter
./pkg/ecco/cost_salt_ini_fin.F 8 COST_SALT_INI_FIN 
     I                           myiter,
./pkg/ecco/cost_scat.F 43 COST_SCAT 
      integer myiter
./pkg/ecco/cost_scat.F 8 COST_SCAT 
     I                       myiter,
./pkg/ecco/cost_sigmar.F 49 COST_SIGMAR 
      integer myiter
./pkg/ecco/cost_sigmar.F 6 COST_SIGMAR 
      subroutine COST_SIGMAR( myiter, mytime, mythid )
./pkg/ecco/cost_ssh.F 55 COST_SSH 
      integer myiter
./pkg/ecco/cost_ssh.F 8 COST_SSH 
     I                     myiter,
./pkg/ecco/cost_ssh_new.F 55 COST_SSH_NEW 
      integer myiter
./pkg/ecco/cost_ssh_new.F 8 COST_SSH_NEW 
     I                     myiter,
./pkg/ecco/cost_sshv4.F 61 COST_SSHV4 
      integer myiter
./pkg/ecco/cost_sshv4.F 8 COST_SSHV4 
     I                     myiter,
./pkg/ecco/cost_tau_eddy.F 37 COST_TAU_EDDY 
      integer myiter
./pkg/ecco/cost_tau_eddy.F 8 COST_TAU_EDDY 
     I                           myiter,
./pkg/ecco/cost_theta.F 48 COST_THETA 
      integer myiter
./pkg/ecco/cost_theta.F 6 COST_THETA 
      subroutine COST_THETA( myiter, mytime, mythid )
./pkg/ecco/cost_theta0.F 46 COST_THETA0 
      integer myiter
./pkg/ecco/cost_theta0.F 8 COST_THETA0 
     I                           myiter,
./pkg/ecco/cost_theta_ini_fin.F 38 COST_THETA_INI_FIN 
      integer myiter
./pkg/ecco/cost_theta_ini_fin.F 8 COST_THETA_INI_FIN 
     I                           myiter,
./pkg/ecco/cost_usercost_all.F 35 COST_USERCOST_ALL 
      integer myiter
./pkg/ecco/cost_usercost_all.F 7 COST_USERCOST_ALL 
      subroutine COST_USERCOST_ALL( myiter, mytime, mythid )
./pkg/ecco/cost_uvel0.F 46 COST_UVEL0 
      integer myiter
./pkg/ecco/cost_uvel0.F 8 COST_UVEL0 
     I                           myiter,
./pkg/ecco/cost_vvel0.F 46 COST_VVEL0 
      integer myiter
./pkg/ecco/cost_vvel0.F 8 COST_VVEL0 
     I                           myiter,
./pkg/ecco/cost_xbt.F 44 COST_XBT 
      integer myiter
./pkg/ecco/cost_xbt.F 8 COST_XBT 
     I                     myiter,
./pkg/ecco/ecco_cost_driver.F 109 ECCO_COST_DRIVER 
      call COST_HYD( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 118 ECCO_COST_DRIVER 
      call SEAICE_COST_DRIVER( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 128 ECCO_COST_DRIVER 
      call COST_OBCS( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 137 ECCO_COST_DRIVER 
      call COST_CURMTR( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 148 ECCO_COST_DRIVER 
      call COST_DRIFTER( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 161 ECCO_COST_DRIVER 
      call COST_SCAT( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 173 ECCO_COST_DRIVER 
      call COST_DRIFT( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 181 ECCO_COST_DRIVER 
      call COST_DRIFTW( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 189 ECCO_COST_DRIVER 
      call COST_THETA_INI_FIN( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 190 ECCO_COST_DRIVER 
      call COST_SALT_INI_FIN( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 197 ECCO_COST_DRIVER 
      call COST_INTERNAL_PARAMS( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 203 ECCO_COST_DRIVER 
      call COST_GENCOST_ALL( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 208 ECCO_COST_DRIVER 
      call COST_USERCOST_ALL( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 213 ECCO_COST_DRIVER 
      call COST_GENCTRL( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 29 ECCO_COST_DRIVER 
      integer myiter
./pkg/ecco/ecco_cost_driver.F 48 ECCO_COST_DRIVER 
      call COST_FORCING( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 53 ECCO_COST_DRIVER 
      call COST_MEAN_HEATFLUX( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 61 ECCO_COST_DRIVER 
      call COST_MEAN_SALTFLUX( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 76 ECCO_COST_DRIVER 
      call COST_SSHV4( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 80 ECCO_COST_DRIVER 
      call COST_SSH_NEW( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 84 ECCO_COST_DRIVER 
      call COST_SSH( myiter, mytime, mythid )
./pkg/ecco/ecco_cost_driver.F 99 ECCO_COST_DRIVER 
      call COST_BP( myiter, mytime, mythid )