Symbol Description Uses
mytime 160


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_getsurfacefluxes.F 13 EXF_GETSURFACEFLUXES 
     I                                 mytime,
./pkg/exf/exf_getsurfacefluxes.F 142 EXF_GETSURFACEFLUXES 
     &     whflux, mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 150 EXF_GETSURFACEFLUXES 
     &     wsflux, mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 163 EXF_GETSURFACEFLUXES 
     &     wtauu, mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 171 EXF_GETSURFACEFLUXES 
     &     wtauv, mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 182 EXF_GETSURFACEFLUXES 
     &     wtauu, mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 188 EXF_GETSURFACEFLUXES 
     &     wtauv, mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 62 EXF_GETSURFACEFLUXES 
      _RL mytime
./pkg/exf/exf_getyearlyfieldname.F 32 EXF_GETYEARLYFIELDNAME 
      _RL     mytime
./pkg/exf/exf_getyearlyfieldname.F 8 EXF_GETYEARLYFIELDNAME 
     I     mytime, myiter, mythid )
./pkg/profiles/cost_profiles.F 15 COST_PROFILES 
      SUBROUTINE COST_PROFILES( myiter, mytime, myThid )
./pkg/profiles/cost_profiles.F 39 COST_PROFILES 
      _RL     mytime
./pkg/profiles/profiles_inloop.F 16 PROFILES_INLOOP 
      SUBROUTINE PROFILES_INLOOP(mytime,myThid )
./pkg/profiles/profiles_inloop.F 40 PROFILES_INLOOP 
      _RL mytime
./pkg/profiles/profiles_inloop.F 68 PROFILES_INLOOP 
      if ((prof_time(num_file,prof_num,bi,bj).GE.mytime).AND.
./pkg/profiles/profiles_inloop.F 69 PROFILES_INLOOP 
     & (prof_time(num_file,prof_num,bi,bj).LT.(mytime+deltaTclock)))
./pkg/profiles/profiles_inloop.F 88 PROFILES_INLOOP 
     &        num_file,mytime,bi,bj,myThid)
./pkg/profiles/profiles_interp.F 24 PROFILES_INTERP 
     I mytime,
./pkg/profiles/profiles_interp.F 53 PROFILES_INTERP 
      _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 25 SEAICE_COST_AREASST 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_areasst.F 78 SEAICE_COST_AREASST 
      _RL mytime
./pkg/seaice/seaice_cost_concentration.F 25 SEAICE_COST_CONCENTRATION 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_concentration.F 73 SEAICE_COST_CONCENTRATION 
      _RL mytime
./pkg/seaice/seaice_cost_driver.F 106 SEAICE_COST_DRIVER 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_driver.F 117 SEAICE_COST_DRIVER 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_driver.F 15 SEAICE_COST_DRIVER 
      subroutine SEAICE_COST_DRIVER( myiter, mytime, mythid )
./pkg/seaice/seaice_cost_driver.F 55 SEAICE_COST_DRIVER 
      _RL     mytime
./pkg/seaice/seaice_cost_driver.F 95 SEAICE_COST_DRIVER 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_sss.F 25 SEAICE_COST_SSS 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_sss.F 70 SEAICE_COST_SSS 
      _RL mytime
./pkg/seaice/seaice_cost_sst.F 23 SEAICE_COST_SST 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_sst.F 68 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_timestep.F 99 STREAMICE_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/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F 143 CTRL_MAP_GENTIM2D 
     I      mytime, myiter, mythid )
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F 143 CTRL_MAP_GENTIM2D 
     I      mytime, myiter, mythid )
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F 105 CTRL_MAP_GENTIM2D 
     I      mytime, myiter, mythid )
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 105 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 12 CTRL_GET_GEN 
     I          mytime, myiter, mythid
./pkg/ctrl/ctrl_get_gen.F 131 CTRL_GET_GEN 
     I                       mytime, myiter, mythid )
./pkg/ctrl/ctrl_get_gen.F 277 CTRL_GET_GEN 
     &               xx_gen_remo_slope*(mytime-starttime) ) )
./pkg/ctrl/ctrl_get_gen.F 61 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 118 CTRL_GETOBCSE 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcse.F 47 CTRL_GETOBCSE 
      _RL     mytime
./pkg/ctrl/ctrl_getobcsn.F 10 CTRL_GETOBCSN 
     I                             mytime,
./pkg/ctrl/ctrl_getobcsn.F 124 CTRL_GETOBCSN 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcsn.F 48 CTRL_GETOBCSN 
      _RL     mytime
./pkg/ctrl/ctrl_getobcss.F 10 CTRL_GETOBCSS 
     I                             mytime,
./pkg/ctrl/ctrl_getobcss.F 120 CTRL_GETOBCSS 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcss.F 49 CTRL_GETOBCSS 
      _RL     mytime
./pkg/ctrl/ctrl_getobcsw.F 10 CTRL_GETOBCSW 
     I                             mytime,
./pkg/ctrl/ctrl_getobcsw.F 119 CTRL_GETOBCSW 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcsw.F 48 CTRL_GETOBCSW 
      _RL     mytime
./pkg/ctrl/ctrl_getrec.F 13 CTRL_GETREC 
     I                        mytime,
./pkg/ctrl/ctrl_getrec.F 324 CTRL_GETREC 
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/ctrl/ctrl_getrec.F 335 CTRL_GETREC 
      first = ((mytime - modelstart) .lt. 0.5*modelstep)
./pkg/ctrl/ctrl_getrec.F 340 CTRL_GETREC 
        call CAL_GETDATE( myiter-1, mytime-modelstep,
./pkg/ctrl/ctrl_getrec.F 60 CTRL_GETREC 
      _RL     mytime
./pkg/ctrl/ctrl_map_gentim2d.F 98 CTRL_MAP_GENTIM2D 
     I      mytime, myiter, mythid )
./pkg/ecco/cost_averagesfields.F 15 COST_AVERAGESFIELDS 
      subroutine COST_AVERAGESFIELDS( mytime, mythid )
./pkg/ecco/cost_averagesfields.F 163 COST_AVERAGESFIELDS 
      myiter = niter0 + INT((mytime-starttime)/deltaTClock+0.5)
./pkg/ecco/cost_averagesfields.F 171 COST_AVERAGESFIELDS 
     I                    myiter,     mytime,       mythid,
./pkg/ecco/cost_averagesfields.F 72 COST_AVERAGESFIELDS 
      _RL     mytime
./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_gencost_all.F 37 COST_GENCOST_ALL 
      _RL     mytime
./pkg/ecco/cost_gencost_all.F 6 COST_GENCOST_ALL 
      subroutine COST_GENCOST_ALL( myiter, mytime, mythid )
./pkg/ecco/cost_gencost_all.F 89 COST_GENCOST_ALL 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_generic.F 131 COST_GENERIC 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_generic.F 148 COST_GENERIC 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_generic.F 169 COST_GENLOOP 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_generic.F 20 COST_GENERIC 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_generic.F 210 COST_GENLOOP 
      _RL mytime
./pkg/ecco/cost_generic.F 61 COST_GENERIC 
      _RL mytime
./pkg/ecco/cost_hyd.F 117 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 141 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 163 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 185 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 208 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 232 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 255 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 277 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 321 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 343 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 414 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 51 COST_HYD 
      _RL     mytime
./pkg/ecco/cost_hyd.F 94 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 9 COST_HYD 
      subroutine COST_HYD( myiter, mytime, mythid )
./pkg/ecco/cost_internal_params.F 48 COST_INTERNAL_PARAMS 
      _RL     mytime
./pkg/ecco/cost_internal_params.F 7 COST_INTERNAL_PARAMS 
      subroutine COST_INTERNAL_PARAMS( myiter, mytime, mythid )
./pkg/ecco/cost_obcs.F 14 COST_OBCS 
     I                     mytime,
./pkg/ecco/cost_obcs.F 47 COST_OBCS 
      _RL     mytime
./pkg/ecco/cost_obcs.F 65 COST_OBCS 
      call COST_OBCSN ( myiter, mytime,
./pkg/ecco/cost_obcs.F 74 COST_OBCS 
      call COST_OBCSS ( myiter, mytime,
./pkg/ecco/cost_obcs.F 83 COST_OBCS 
      call COST_OBCSW ( myiter, mytime,
./pkg/ecco/cost_obcs.F 92 COST_OBCS 
      call COST_OBCSE ( myiter, mytime,
./pkg/ecco/cost_obcs.F 98 COST_OBCS 
      call COST_OBCSVOL ( myiter,mytime,
./pkg/ecco/cost_obcs_ageos.F 56 COST_OBCS_AGEOS 
      _RL     mytime
./pkg/ecco/cost_obcs_ageos.F 9 COST_OBCS_AGEOS 
      subroutine COST_OBCS_AGEOS( myiter, mytime, mythid )
./pkg/ecco/cost_obcse.F 14 COST_OBCSE 
     I                       mytime,
./pkg/ecco/cost_obcse.F 61 COST_OBCSE 
      _RL     mytime
./pkg/ecco/cost_obcsn.F 14 COST_OBCSN 
     I                       mytime,
./pkg/ecco/cost_obcsn.F 61 COST_OBCSN 
      _RL     mytime
./pkg/ecco/cost_obcss.F 14 COST_OBCSS 
     I                       mytime,
./pkg/ecco/cost_obcss.F 61 COST_OBCSS 
      _RL     mytime
./pkg/ecco/cost_obcsvol.F 11 COST_OBCSVOL 
     I                       mytime,
./pkg/ecco/cost_obcsvol.F 55 COST_OBCSVOL 
      _RL     mytime
./pkg/ecco/cost_obcsw.F 14 COST_OBCSW 
     I                       mytime,
./pkg/ecco/cost_obcsw.F 61 COST_OBCSW 
      _RL     mytime
./pkg/ecco/cost_ssh.F 60 COST_SSH 
      _RL     mytime
./pkg/ecco/cost_ssh.F 9 COST_SSH 
     I                     mytime,
./pkg/ecco/ecco_cost_driver.F 105 ECCO_COST_DRIVER 
     &     myiter, mytime, mythid )