Symbol Description Uses
mytime 313



File Line number Procedure Code
./pkg/exf/exf_adjoint_snapshots.F 22 EXF_ADJOINT_SNAPSHOTS
      _RL     mytime
./pkg/exf/exf_adjoint_snapshots.F 6 EXF_ADJOINT_SNAPSHOTS
      subroutine EXF_ADJOINT_SNAPSHOTS( iwhen, mytime, myiter, myThid )
./pkg/exf/exf_check_range.F 28 EXF_CHECK_RANGE
      _RL mytime
./pkg/exf/exf_check_range.F 6 EXF_CHECK_RANGE
      SUBROUTINE EXF_CHECK_RANGE( mytime, myiter, mythid )
./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 58 EXF_GETCLIM
      _RL     mytime
./pkg/exf/exf_getclim.F 79 EXF_GETCLIM
     &     mytime, myiter, mythid )
./pkg/exf/exf_getclim.F 8 EXF_GETCLIM
     I                        mytime,
./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 52 EXF_GETSURFACEFLUXES
      _RL mytime
./pkg/exf/exf_getsurfacefluxes.F 74 EXF_GETSURFACEFLUXES
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 7 EXF_GETSURFACEFLUXES
     I                                 mytime,
./pkg/exf/exf_getsurfacefluxes.F 82 EXF_GETSURFACEFLUXES
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 93 EXF_GETSURFACEFLUXES
     &     mytime, myiter, mythid )
./pkg/exf/exf_getyearlyfieldname.F 32 EXF_GETYEARLYFIELDNAME
      _RL     mytime
./pkg/exf/exf_getyearlyfieldname.F 8 EXF_GETYEARLYFIELDNAME
     I     mytime, myiter, mythid )
./pkg/kpp/kpp_calc.F 554 KPP_CALC
     I     , bi, bj, mytime, myIter, mythid )
./pkg/profiles/cost_profiles.F 119 COST_PROFILES
     &         num_var,num_file,mytime,bi,bj,myThid)
./pkg/profiles/cost_profiles.F 125 COST_PROFILES
     &         num_var,num_file,mytime,bi,bj,myThid)
./pkg/profiles/cost_profiles.F 12 COST_PROFILES
      SUBROUTINE COST_PROFILES( myiter, mytime, myThid )
./pkg/profiles/cost_profiles.F 146 COST_PROFILES
     &         num_var,num_file,mytime,bi,bj,myThid)
./pkg/profiles/cost_profiles.F 37 COST_PROFILES
      _RL     mytime
./pkg/profiles/profiles_inloop.F 13 PROFILES_INLOOP
      SUBROUTINE PROFILES_INLOOP(mytime,myThid )
./pkg/profiles/profiles_inloop.F 36 PROFILES_INLOOP
      _RL mytime
./pkg/profiles/profiles_inloop.F 66 PROFILES_INLOOP
      if ((prof_time(num_file,prof_num,bi,bj).GE.mytime).AND.
./pkg/profiles/profiles_inloop.F 67 PROFILES_INLOOP
     & (prof_time(num_file,prof_num,bi,bj).LT.(mytime+deltaTclock))) 
./pkg/profiles/profiles_inloop.F 90 PROFILES_INLOOP
     &        num_var,num_file,mytime,bi,bj,myThid)
./pkg/profiles/profiles_inloop.F 95 PROFILES_INLOOP
     &        num_var,num_file,mytime,bi,bj,myThid)
./pkg/profiles/profiles_interp.F 19 PROFILES_INTERP
     I mytime,
./pkg/profiles/profiles_interp.F 47 PROFILES_INTERP
      _RL  mytime
./pkg/profiles/profiles_interp_gg.F 20 PROFILES_INTERP_GG
     I mytime,
./pkg/profiles/profiles_interp_gg.F 48 PROFILES_INTERP_GG
      _RL  mytime
./pkg/profiles/profiles_interp_mean.F 19 PROFILES_INTERP_MEAN
     I mytime,
./pkg/profiles/profiles_interp_mean.F 47 PROFILES_INTERP_MEAN
      _RL  mytime
./pkg/profiles/profiles_interp_mean_gg.F 20 PROFILES_INTERP_MEAN_GG
     I mytime,
./pkg/profiles/profiles_interp_mean_gg.F 48 PROFILES_INTERP_MEAN_GG
      _RL  mytime
./pkg/seaice/cost_ice_test.F 65 COST_ICE_TEST
      _RL     mytime
./pkg/seaice/cost_ice_test.F 6 COST_ICE_TEST
      subroutine COST_ICE_TEST( mytime, myiter, mythid )
./pkg/seaice/seaice_cost_areasst.F 16 SEAICE_COST_AREASST
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_areasst.F 71 SEAICE_COST_AREASST
      _RL mytime
./pkg/seaice/seaice_cost_concentration.F 13 SEAICE_COST_CONCENTRATION
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_concentration.F 59 SEAICE_COST_CONCENTRATION
      _RL mytime
./pkg/seaice/seaice_cost_driver.F 105 SEAICE_COST_DRIVER
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_driver.F 43 SEAICE_COST_DRIVER
      _RL     mytime
./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 59 SEAICE_COST_SSS
      _RL mytime
./pkg/seaice/seaice_cost_sst.F 14 SEAICE_COST_SST
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_sst.F 57 SEAICE_COST_SST
      _RL mytime
./pkg/streamice/streamice_dump.F 11 STREAMICE_DUMP
      subroutine STREAMICE_DUMP( mytime, myiter, myThid )
./pkg/streamice/streamice_dump.F 41 STREAMICE_DUMP
      _RL     mytime
./pkg/streamice/streamice_dump_ad.F 102 ADSTREAMICE_DUMP
     &  DIFFERENT_MULTIPLE(streamice_adjDump,mytime,deltaTClock)
./pkg/streamice/streamice_dump_ad.F 11 ADSTREAMICE_DUMP
      subroutine ADSTREAMICE_DUMP( mytime, myiter, myThid )
./pkg/streamice/streamice_dump_ad.F 50 ADSTREAMICE_DUMP
      _RL     mytime
./pkg/streamice/streamice_solo_timestep.F 89 STREAMICE_SOLO_TIMESTEP
      CALL STREAMICE_DUMP( mytime, myiter, myThid )
./pkg/thsice/thsice_cost_driver.F 36 THSICE_COST_DRIVER
      _RL     mytime
./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 61 THSICE_COST_TEST
      _RL     mytime
./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 47 ADDUMMY_IN_STEPPING
      _RL     mytime
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 69 ADDUMMY_IN_STEPPING
     &  DIFFERENT_MULTIPLE(ADJdumpFreq,mytime,deltaTClock)
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 81 ADDUMMY_IN_HFAC
      _RL mytime
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 89 ADDUMMY_IN_HFAC
      mytime = 0.
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 92 ADDUMMY_IN_HFAC
     &  DIFFERENT_MULTIPLE(dumpFreq,mytime,
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 93 ADDUMMY_IN_HFAC
     &                     mytime-deltaTClock)
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F 104 CTRL_MAP_GENTIM2D
     I      mytime, myiter, mythid )
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 104 CTRL_MAP_GENTIM2D
     I      mytime, myiter, mythid )
./pkg/cal/cal_dayspermonth.F 46 CAL_DAYSPERMONTH
      _RL     mytime
./pkg/cal/cal_dayspermonth.F 64 CAL_DAYSPERMONTH
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/cal/cal_dayspermonth.F 8 CAL_DAYSPERMONTH
     I                             mytime,
./pkg/cal/cal_getmonthsrec.F 127 CAL_GETMONTHSREC
      first = ((mytime - modelstart) .lt. 0.5*modelstep)
./pkg/cal/cal_getmonthsrec.F 45 CAL_GETMONTHSREC
      _RL     mytime
./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 47 CAL_MONTHSPERYEAR
      _RL     mytime
./pkg/cal/cal_monthsperyear.F 59 CAL_MONTHSPERYEAR
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/cal/cal_monthsperyear.F 8 CAL_MONTHSPERYEAR
     I                              mytime,
./pkg/cal/cal_stepsperday.F 46 CAL_STEPSPERDAY
      _RL     mytime
./pkg/cal/cal_stepsperday.F 62 CAL_STEPSPERDAY
      call CAL_GETDATE( myiter, mytime, currentdate, mythid )
./pkg/cal/cal_stepsperday.F 8 CAL_STEPSPERDAY
     I                            mytime,
./pkg/cal/cal_timestamp.F 37 CAL_TIMESTAMP
      _RL     mytime
./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 8 CAL_TIMESTAMP
     I                          mytime,
./pkg/cost/cost_tile.F 62 COST_TILE
      subroutine COST_TILE( mytime, myiter, myThid )
./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 255 CTRL_GET_GEN
     &               xx_gen_remo_slope*(mytime-starttime) ) )
./pkg/ctrl/ctrl_get_gen.F 55 CTRL_GET_GEN
      _RL     mytime
./pkg/ctrl/ctrl_get_gen_rec.F 116 CTRL_GET_GEN_REC
     I      mytime, myiter, mythid
./pkg/ctrl/ctrl_get_gen_rec.F 122 CTRL_GET_GEN_REC
       first   = ((mytime - modelstart) .lt. 0.5*modelstep)
./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 147 CTRL_GET_GEN_REC
       first = ((mytime - modelstart) .lt. 0.5*modelstep)
./pkg/ctrl/ctrl_get_gen_rec.F 14 CTRL_GET_GEN_REC
     I                        mytime,
./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 52 CTRL_GET_GEN_REC
      _RL     mytime
./pkg/ctrl/ctrl_getobcse.F 10 CTRL_GETOBCSE
     I                             mytime,
./pkg/ctrl/ctrl_getobcse.F 117 CTRL_GETOBCSE
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcse.F 46 CTRL_GETOBCSE
      _RL     mytime
./pkg/ctrl/ctrl_getobcsn.F 10 CTRL_GETOBCSN
     I                             mytime,
./pkg/ctrl/ctrl_getobcsn.F 123 CTRL_GETOBCSN
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcsn.F 47 CTRL_GETOBCSN
      _RL     mytime
./pkg/ctrl/ctrl_getobcss.F 10 CTRL_GETOBCSS
     I                             mytime,
./pkg/ctrl/ctrl_getobcss.F 119 CTRL_GETOBCSS
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcss.F 48 CTRL_GETOBCSS
      _RL     mytime
./pkg/ctrl/ctrl_getobcsw.F 10 CTRL_GETOBCSW
     I                             mytime,
./pkg/ctrl/ctrl_getobcsw.F 118 CTRL_GETOBCSW
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcsw.F 47 CTRL_GETOBCSW
      _RL     mytime
./pkg/ctrl/ctrl_getrec.F 13 CTRL_GETREC
     I                        mytime,
./pkg/ctrl/ctrl_getrec.F 321 CTRL_GETREC
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/ctrl/ctrl_getrec.F 332 CTRL_GETREC
      first = ((mytime - modelstart) .lt. 0.5*modelstep)
./pkg/ctrl/ctrl_getrec.F 337 CTRL_GETREC
        call CAL_GETDATE( myiter-1, mytime-modelstep,
./pkg/ctrl/ctrl_getrec.F 59 CTRL_GETREC
      _RL     mytime
./pkg/ctrl/ctrl_map_gentim2d.F 102 CTRL_MAP_GENTIM2D
     I      mytime, myiter, mythid )
./pkg/ecco/cost_argo_salt.F 45 COST_ARGO_SALT
      _RL     mytime
./pkg/ecco/cost_argo_salt.F 9 COST_ARGO_SALT
     I                     mytime,
./pkg/ecco/cost_argo_theta.F 45 COST_ARGO_THETA
      _RL     mytime
./pkg/ecco/cost_argo_theta.F 9 COST_ARGO_THETA
     I                     mytime,
./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 52 COST_ATLANTIC
      _RL     mytime
./pkg/ecco/cost_atlantic.F 8 COST_ATLANTIC
     I                                mytime,
./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 15 COST_AVERAGESFIELDS
      subroutine COST_AVERAGESFIELDS( mytime, mythid )
./pkg/ecco/cost_averagesfields.F 66 COST_AVERAGESFIELDS
      _RL     mytime
./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 59 COST_AVERAGESFLAGS
      _RL     mytime
./pkg/ecco/cost_averagesflags.F 9 COST_AVERAGESFLAGS
     I                               mytime,
./pkg/ecco/cost_bottomdrag.F 35 COST_BOTTOMDRAG
      _RL     mytime
./pkg/ecco/cost_bottomdrag.F 9 COST_BOTTOMDRAG
     I                           mytime,
./pkg/ecco/cost_bp.F 48 COST_BP
      _RL     mytime
./pkg/ecco/cost_bp.F 9 COST_BP
     I                     mytime,
./pkg/ecco/cost_ctds.F 44 COST_CTDS
      _RL     mytime
./pkg/ecco/cost_ctds.F 9 COST_CTDS
     I                     mytime,
./pkg/ecco/cost_ctdsclim.F 53 COST_CTDSCLIM
      _RL     mytime
./pkg/ecco/cost_ctdsclim.F 9 COST_CTDSCLIM
     I                       mytime,
./pkg/ecco/cost_ctdt.F 45 COST_CTDT
      _RL     mytime
./pkg/ecco/cost_ctdt.F 9 COST_CTDT
     I                     mytime,
./pkg/ecco/cost_ctdtclim.F 53 COST_CTDTCLIM
      _RL     mytime
./pkg/ecco/cost_ctdtclim.F 9 COST_CTDTCLIM
     I                       mytime,
./pkg/ecco/cost_curmtr.F 45 COST_CURMTR
      _RL     mytime
./pkg/ecco/cost_curmtr.F 8 COST_CURMTR
     I                     mytime,
./pkg/ecco/cost_diffkr.F 35 COST_DIFFKR
      _RL     mytime
./pkg/ecco/cost_diffkr.F 9 COST_DIFFKR
     I                           mytime,
./pkg/ecco/cost_drift.F 43 COST_DRIFT
      _RL     mytime
./pkg/ecco/cost_drift.F 6 COST_DRIFT
      subroutine COST_DRIFT( myiter, mytime, mythid )
./pkg/ecco/cost_drifter.F 57 COST_DRIFTER
      _RL     mytime
./pkg/ecco/cost_drifter.F 9 COST_DRIFTER
     I                       mytime,
./pkg/ecco/cost_driftw.F 47 COST_DRIFTW
      _RL     mytime
./pkg/ecco/cost_driftw.F 9 COST_DRIFTW
     I                       mytime,
./pkg/ecco/cost_etan0.F 47 COST_ETAN0
      _RL     mytime
./pkg/ecco/cost_etan0.F 9 COST_ETAN0
     I                           mytime,
./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 50 COST_FORCING
      _RL     mytime
./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 54 COST_FORCING_GEN
      _RL     mytime
./pkg/ecco/cost_forcing_gen.F 9 COST_FORCING_GEN
     I                       mytime,
./pkg/ecco/cost_gen_transport.F 42 COST_GEN_TRANSPORT
      _RL     mytime
./pkg/ecco/cost_gen_transport.F 9 COST_GEN_TRANSPORT
     I                     mytime,
./pkg/ecco/cost_gencost_all.F 38 COST_GENCOST_ALL
      _RL     mytime
./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 63 COST_GENCOST_SSHV4
      _RL     mytime
./pkg/ecco/cost_gencost_sshv4.F 9 COST_GENCOST_SSHV4
     I                     mytime,
./pkg/ecco/cost_gencost_sstv4.F 49 COST_GENCOST_SSTV4
      _RL     mytime
./pkg/ecco/cost_gencost_sstv4.F 9 COST_GENCOST_SSTV4
     I                     mytime,
./pkg/ecco/cost_genctrl.F 41 COST_GENCTRL
      _RL     mytime
./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 59 COST_GENERIC
      _RL mytime
./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 47 COST_HYD
      _RL     mytime
./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 48 COST_IES
      _RL     mytime
./pkg/ecco/cost_ies.F 9 COST_IES
     I                     mytime,
./pkg/ecco/cost_internal_params.F 36 COST_INTERNAL_PARAMS
      _RL     mytime
./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 38 COST_KAPGM
      _RL     mytime
./pkg/ecco/cost_kapgm.F 9 COST_KAPGM
     I                           mytime,
./pkg/ecco/cost_kapredi.F 38 COST_KAPREDI
      _RL     mytime
./pkg/ecco/cost_kapredi.F 9 COST_KAPREDI
     I                           mytime,
./pkg/ecco/cost_mean_heatflux.F 45 COST_MEAN_HEATFLUX
      _RL     mytime
./pkg/ecco/cost_mean_heatflux.F 9 COST_MEAN_HEATFLUX
     I                       mytime,
./pkg/ecco/cost_mean_saltflux.F 45 COST_MEAN_SALTFLUX
      _RL     mytime
./pkg/ecco/cost_mean_saltflux.F 9 COST_MEAN_SALTFLUX
     I                       mytime,
./pkg/ecco/cost_obcs.F 11 COST_OBCS
     I                     mytime,
./pkg/ecco/cost_obcs.F 40 COST_OBCS
      _RL     mytime
./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 46 COST_OBCS_AGEOS
      _RL     mytime
./pkg/ecco/cost_obcs_ageos.F 6 COST_OBCS_AGEOS
      subroutine COST_OBCS_AGEOS( myiter, mytime, mythid )
./pkg/ecco/cost_obcse.F 11 COST_OBCSE
     I                       mytime,
./pkg/ecco/cost_obcse.F 54 COST_OBCSE
      _RL     mytime
./pkg/ecco/cost_obcsn.F 11 COST_OBCSN
     I                       mytime,
./pkg/ecco/cost_obcsn.F 54 COST_OBCSN
      _RL     mytime
./pkg/ecco/cost_obcss.F 11 COST_OBCSS
     I                       mytime,
./pkg/ecco/cost_obcss.F 54 COST_OBCSS
      _RL     mytime
./pkg/ecco/cost_obcsvol.F 46 COST_OBCSVOL
      _RL     mytime
./pkg/ecco/cost_obcsvol.F 8 COST_OBCSVOL
     I                       mytime,
./pkg/ecco/cost_obcsw.F 11 COST_OBCSW
     I                       mytime,
./pkg/ecco/cost_obcsw.F 54 COST_OBCSW
      _RL     mytime
./pkg/ecco/cost_salt.F 49 COST_SALT
      _RL     mytime
./pkg/ecco/cost_salt.F 6 COST_SALT
      subroutine COST_SALT( myiter, mytime, mythid )
./pkg/ecco/cost_salt0.F 47 COST_SALT0
      _RL     mytime
./pkg/ecco/cost_salt0.F 9 COST_SALT0
     I                           mytime,
./pkg/ecco/cost_salt_ini_fin.F 39 COST_SALT_INI_FIN
      _RL     mytime
./pkg/ecco/cost_salt_ini_fin.F 9 COST_SALT_INI_FIN
     I                           mytime,
./pkg/ecco/cost_scat.F 44 COST_SCAT
      _RL     mytime
./pkg/ecco/cost_scat.F 9 COST_SCAT
     I                       mytime,
./pkg/ecco/cost_sigmar.F 50 COST_SIGMAR
      _RL     mytime
./pkg/ecco/cost_sigmar.F 6 COST_SIGMAR
      subroutine COST_SIGMAR( myiter, mytime, mythid )
./pkg/ecco/cost_ssh.F 56 COST_SSH
      _RL     mytime
./pkg/ecco/cost_ssh.F 9 COST_SSH
     I                     mytime,
./pkg/ecco/cost_ssh_new.F 56 COST_SSH_NEW
      _RL     mytime
./pkg/ecco/cost_ssh_new.F 9 COST_SSH_NEW
     I                     mytime,
./pkg/ecco/cost_sshv4.F 62 COST_SSHV4
      _RL     mytime
./pkg/ecco/cost_sshv4.F 9 COST_SSHV4
     I                     mytime,
./pkg/ecco/cost_tau_eddy.F 38 COST_TAU_EDDY
      _RL     mytime
./pkg/ecco/cost_tau_eddy.F 9 COST_TAU_EDDY
     I                           mytime,
./pkg/ecco/cost_theta.F 49 COST_THETA
      _RL     mytime
./pkg/ecco/cost_theta.F 6 COST_THETA
      subroutine COST_THETA( myiter, mytime, mythid )
./pkg/ecco/cost_theta0.F 47 COST_THETA0
      _RL     mytime
./pkg/ecco/cost_theta0.F 9 COST_THETA0
     I                           mytime,
./pkg/ecco/cost_theta_ini_fin.F 39 COST_THETA_INI_FIN
      _RL     mytime
./pkg/ecco/cost_theta_ini_fin.F 9 COST_THETA_INI_FIN
     I                           mytime,
./pkg/ecco/cost_usercost_all.F 36 COST_USERCOST_ALL
      _RL     mytime
./pkg/ecco/cost_usercost_all.F 7 COST_USERCOST_ALL
      subroutine COST_USERCOST_ALL( myiter, mytime, mythid )
./pkg/ecco/cost_uvel0.F 47 COST_UVEL0
      _RL     mytime
./pkg/ecco/cost_uvel0.F 9 COST_UVEL0
     I                           mytime,
./pkg/ecco/cost_vvel0.F 47 COST_VVEL0
      _RL     mytime
./pkg/ecco/cost_vvel0.F 9 COST_VVEL0
     I                           mytime,
./pkg/ecco/cost_xbt.F 45 COST_XBT
      _RL     mytime
./pkg/ecco/cost_xbt.F 9 COST_XBT
     I                     mytime,
./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 30 ECCO_COST_DRIVER
      _RL     mytime
./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 )