Symbol Description Uses
mytime 369


File Line number Procedure Code
./pkg/exf/exf_getsurfacefluxes.F 51 EXF_GETSURFACEFLUXES 
      _RL mytime
./pkg/exf/exf_getsurfacefluxes.F 64 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 72 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 80 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 88 EXF_GETSURFACEFLUXES 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 8 EXF_GETSURFACEFLUXES 
     I                                 mytime,
./pkg/exf/exf_check_range.F 28 EXF_CHECK_RANGE 
      _RL mytime
./pkg/exf/exf_check_range.F 5 EXF_CHECK_RANGE 
      subroutine EXF_CHECK_RANGE( mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 101 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 120 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 128 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 135 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 151 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 164 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 179 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 201 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 214 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 227 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 241 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 257 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 272 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 288 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 301 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 318 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 328 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 336 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 344 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 352 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 360 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 368 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 376 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 382 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 45 EXF_GETFFIELDS 
      _RL     mytime
./pkg/exf/exf_getffields.F 71 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 79 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 7 EXF_GETFFIELDS 
      subroutine EXF_GETFFIELDS( mytime, myiter, mythid )
./pkg/exf/exf_getffields.F 86 EXF_GETFFIELDS 
     &     mytime, myiter, mythid )
./pkg/exf/exf_radiation.F 35 EXF_RADIATION 
      _RL     mytime
./pkg/exf/exf_radiation.F 5 EXF_RADIATION 
      subroutine EXF_RADIATION(mytime, myiter, mythid)
./pkg/exf/exf_getforcing.F 103 EXF_GETFORCING 
      subroutine EXF_GETFORCING( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 146 EXF_GETFORCING 
      _RL     mytime
./pkg/exf/exf_getforcing.F 159 EXF_GETFORCING 
      call EXF_GETCLIM( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 162 EXF_GETFORCING 
      call EXF_GETFFIELDS( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 166 EXF_GETFORCING 
      call EXF_RADIATION( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 176 EXF_GETFORCING 
      call EXF_WIND( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 179 EXF_GETFORCING 
      call EXF_BULKFORMULAE( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 223 EXF_GETFORCING 
      call EXF_GETSURFACEFLUXES( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 227 EXF_GETFORCING 
         call EXF_CHECK_RANGE( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 248 EXF_GETFORCING 
      call EXF_DIAGNOSTICS_FILL( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 251 EXF_GETFORCING 
      call EXF_MONITOR( mytime, myiter, mythid )
./pkg/exf/exf_getforcing.F 254 EXF_GETFORCING 
      call EXF_MAPFIELDS( mytime, myiter, mythid )
./pkg/exf/exf_getffieldrec.F 115 EXF_GETFFIELDREC 
      fldsecs = mytime - fldstartdate
./pkg/exf/exf_getffieldrec.F 118 EXF_GETFFIELDREC 
      first = ((mytime - modelstart) .lt. 0.5*modelstep)
./pkg/exf/exf_getffieldrec.F 17 EXF_GETFFIELDREC 
     I                             mytime,
./pkg/exf/exf_getffieldrec.F 205 EXF_GETFFIELDREC 
        call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/exf/exf_getffieldrec.F 243 EXF_GETFFIELDREC 
          call CAL_GETDATE( myiter-1, mytime-modelstep,
./pkg/exf/exf_getffieldrec.F 270 EXF_GETFFIELDREC 
        nexttime = mytime - (fldsectot-fldsecs) + fldperiod
./pkg/exf/exf_getffieldrec.F 70 EXF_GETFFIELDREC 
      _RL     mytime
./pkg/exf/exf_set_gen.F 102 EXF_SET_GEN 
     I        , mytime, myiter, mythid
./pkg/exf/exf_set_gen.F 12 EXF_SET_GEN 
     &     mytime, myiter, mythid )
./pkg/exf/exf_set_gen.F 197 EXF_SET_GEN 
     &            genremove_slope*(mytime-starttime) )
./pkg/exf/exf_set_gen.F 55 EXF_SET_GEN 
      _RL     mytime
./pkg/exf/exf_getclim.F 48 EXF_GETCLIM 
      _RL     mytime
./pkg/exf/exf_getclim.F 56 EXF_GETCLIM 
      call EXF_SET_CLIMSST ( mytime, myiter, mythid )
./pkg/exf/exf_getclim.F 63 EXF_GETCLIM 
      call EXF_SET_CLIMSSS ( mytime, myiter, mythid )
./pkg/exf/exf_getclim.F 7 EXF_GETCLIM 
     I                        mytime,
./pkg/exf/exf_bulkformulae.F 132 EXF_BULKFORMULAE 
      _RL     mytime
./pkg/exf/exf_bulkformulae.F 5 EXF_BULKFORMULAE 
      subroutine EXF_BULKFORMULAE(mytime, myiter, mythid)
./pkg/exf/exf_mapfields.F 118 EXF_MAPFIELDS 
     &            hflux_exfremo_slope*(mytime-starttime) )
./pkg/exf/exf_mapfields.F 130 EXF_MAPFIELDS 
     &            sflux_exfremo_slope*(mytime-starttime) )
./pkg/exf/exf_mapfields.F 5 EXF_MAPFIELDS 
      subroutine EXF_MAPFIELDS( mytime, myiter, mythid )
./pkg/exf/exf_mapfields.F 69 EXF_MAPFIELDS 
      _RL     mytime
./pkg/exf/exf_wind.F 39 EXF_WIND 
      _RL     mytime
./pkg/exf/exf_wind.F 5 EXF_WIND 
      subroutine EXF_WIND(mytime, myiter, mythid)
./model/src/the_main_loop.F 442 THE_MAIN_LOOP 
        call PROFILES_INLOOP( mytime, mythid )
./model/src/the_main_loop.F 450 THE_MAIN_LOOP 
        CALL FORWARD_STEP( iloop, mytime, myiter, mythid )
./model/src/the_main_loop.F 540 THE_MAIN_LOOP 
        call PROFILES_INLOOP( mytime, mythid )
./pkg/autodiff/g_dummy_in_stepping.F 46 G_DUMMY_IN_STEPPING 
      _RL     mytime
./pkg/autodiff/g_dummy_in_stepping.F 68 G_DUMMY_IN_STEPPING 
     &  DIFFERENT_MULTIPLE(adjDumpFreq,mytime,deltaTClock)
./pkg/autodiff/g_dummy_in_stepping.F 7 G_DUMMY_IN_STEPPING 
      subroutine G_DUMMY_IN_STEPPING( mytime, myiter, myThid )
./pkg/autodiff/dummy_in_stepping.F 20 DUMMY_IN_STEPPING 
      _RL     mytime
./pkg/autodiff/dummy_in_stepping.F 5 DUMMY_IN_STEPPING 
      subroutine DUMMY_IN_STEPPING( mytime, myiter, myThid )
./pkg/autodiff/addummy_in_stepping.F 12 ADDUMMY_IN_STEPPING 
      subroutine ADDUMMY_IN_STEPPING( mytime, myiter, myThid )
./pkg/autodiff/addummy_in_stepping.F 55 ADDUMMY_IN_STEPPING 
      _RL     mytime
./pkg/autodiff/addummy_in_stepping.F 77 ADDUMMY_IN_STEPPING 
     &  DIFFERENT_MULTIPLE(adjDumpFreq,mytime,deltaTClock)
./pkg/profiles/profiles_interp.F 19 PROFILES_INTERP 
     I mytime,
./pkg/profiles/profiles_interp.F 47 PROFILES_INTERP 
      _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 60 PROFILES_INLOOP 
      if ((prof_time(num_file,prof_num,bi,bj).GE.mytime).AND.
./pkg/profiles/profiles_inloop.F 61 PROFILES_INLOOP 
     & (prof_time(num_file,prof_num,bi,bj).LT.(mytime+deltaTclock)))
./pkg/profiles/profiles_inloop.F 73 PROFILES_INLOOP 
     & 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 36 COST_PROFILES 
      _RL     mytime
./pkg/profiles/cost_profiles.F 75 COST_PROFILES 
     & num_var,num_file,mytime,bi,bj,myThid)
./model/src/swfrac.F 12 SWFRAC 
     I     mytime, mythid,
./model/src/swfrac.F 47 SWFRAC 
      _RL     mytime
./verification/OpenAD/code_ad_openad/the_first_level_loop.F 93 THE_FIRST_LEVEL_LOOP 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_fourth_level_loop.F 106 THE_FOURTH_LEVEL_LOOP 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_fourth_level_loop.F 193 THE_FOURTH_LEVEL_PLAIN 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_fourth_level_loop.F 201 THE_FOURTH_LEVEL_PLAIN 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_fourth_level_loop.F 98 THE_FOURTH_LEVEL_LOOP 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_third_level_loop.F 107 THE_THIRD_LEVEL_LOOP 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_third_level_loop.F 195 THE_THIRD_LEVEL_PLAIN 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_third_level_loop.F 203 THE_THIRD_LEVEL_PLAIN 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_third_level_loop.F 99 THE_THIRD_LEVEL_LOOP 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_second_level_loop.F 104 THE_SECOND_LEVEL_LOOP 
     +mytime, myiter, mythid )
./verification/OpenAD/code_ad_openad/the_second_level_loop.F 200 THE_SECOND_LEVEL_PLAIN 
     +mytime, myiter, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 146 THE_MAIN_LOOP 
      _RL     mytime
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 199 THE_MAIN_LOOP 
      call CAL_TIMESTAMP( myiter, mytime, mydate, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 377 THE_MAIN_LOOP 
        mytime = startTime + float(iloop-1)*deltaTclock
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 388 THE_MAIN_LOOP 
        call COST_AVERAGESFIELDS( mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 393 THE_MAIN_LOOP 
        call COST_ATLANTIC(  mytime, myiter,mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 409 THE_MAIN_LOOP 
      CALL EXF_GETFORCING( mytime, myiter, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 530 THE_MAIN_LOOP 
      call COST_AVERAGESFIELDS( mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 545 THE_MAIN_LOOP 
      call COST_ATLANTIC(  mytime, myiter,mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 556 THE_MAIN_LOOP 
      call COST_FORCING( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 565 THE_MAIN_LOOP 
      call COST_HYD( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 574 THE_MAIN_LOOP 
      call SEAICE_COST_DRIVER( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 584 THE_MAIN_LOOP 
      call COST_OBCS( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 594 THE_MAIN_LOOP 
      call COST_CURMTR( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 605 THE_MAIN_LOOP 
      call COST_SSH( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 616 THE_MAIN_LOOP 
      call COST_DRIFTER( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 627 THE_MAIN_LOOP 
      call COST_SCAT( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 634 THE_MAIN_LOOP 
      call COST_MEAN_HEATFLUX( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 641 THE_MAIN_LOOP 
      call COST_MEAN_SALTFLUX( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 653 THE_MAIN_LOOP 
      call COST_DRIFT( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 662 THE_MAIN_LOOP 
      call COST_DRIFTW( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 670 THE_MAIN_LOOP 
      call COST_THETA_INI_FIN( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F 671 THE_MAIN_LOOP 
      call COST_SALT_INI_FIN( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 119 COST_HYD 
     &     myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 140 COST_HYD 
     &     myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 148 COST_HYD 
      call COST_CTDS  ( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 155 COST_HYD 
      call COST_ARGO_SALT ( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 162 COST_HYD 
      call COST_THETA0 ( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 169 COST_HYD 
      call COST_SALT0  ( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 176 COST_HYD 
      call COST_THETA ( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 183 COST_HYD 
      call COST_SALT  ( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 42 COST_HYD 
      _RL     mytime
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 6 COST_HYD 
      subroutine COST_HYD( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 77 COST_HYD 
     &     myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 85 COST_HYD 
      call COST_ARGO_THETA ( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 92 COST_HYD 
      call COST_CTDT  ( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 99 COST_HYD 
      call COST_XBT   ( myiter, mytime, mythid )
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F 55 EXF_GETCLIM 
      _RL     mytime
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F 66 EXF_GETCLIM 
      call EXF_SET_CLIMTEMP ( mytime, myiter, mythid )
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F 73 EXF_GETCLIM 
      call EXF_SET_CLIMSALT ( mytime, myiter, mythid )
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F 7 EXF_GETCLIM 
     I                        mytime,
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F 80 EXF_GETCLIM 
      call EXF_SET_CLIMSST ( mytime, myiter, mythid )
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F 87 EXF_GETCLIM 
      call EXF_SET_CLIMSSS ( mytime, myiter, mythid )
./verification/lab_sea/code_ad_seaice_only/exf_getclim.F 96 EXF_GETCLIM 
     &     mytime, myiter, mythid )
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 45 ADDUMMY_IN_STEPPING 
      _RL     mytime
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 67 ADDUMMY_IN_STEPPING 
     &  DIFFERENT_MULTIPLE(ADJdumpFreq,mytime,deltaTClock)
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 8 ADDUMMY_IN_STEPPING 
      subroutine ADDUMMY_IN_STEPPING( mytime, myiter, myThid )
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 79 ADDUMMY_IN_HFAC 
      _RL mytime
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 87 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)
./pkg/cost/cost_tile.F 58 COST_TILE 
      subroutine COST_TILE( mytime, myiter, myThid )
./pkg/kpp/kpp_calc.F 658 KPP_CALC 
     I       mytime, mythid
./pkg/kpp/kpp_calc.F 729 KPP_CALC 
     I     mytime, mythid,
./pkg/kpp/kpp_routines.F 167 KPPMIX 
     I       mytime, mythid
./pkg/kpp/kpp_routines.F 229 BLDEPTH 
     I       mytime, mythid
./pkg/kpp/kpp_routines.F 23 KPPMIX 
     I       mytime, mythid
./pkg/kpp/kpp_routines.F 279 BLDEPTH 
      _RL     mytime
./pkg/kpp/kpp_routines.F 355 BLDEPTH 
     I        mytime, mythid,
./pkg/kpp/kpp_routines.F 458 BLDEPTH 
     I     mytime, mythid,
./pkg/kpp/kpp_routines.F 530 BLDEPTH 
     I     mytime, mythid,
./pkg/kpp/kpp_routines.F 73 KPPMIX 
      _RL     mytime
./pkg/grdchk/grdchk_main.F 255 GRDCHK_MAIN 
            mytime = starttime
./pkg/grdchk/grdchk_main.F 266 GRDCHK_MAIN 
            call G_THE_MAIN_LOOP( mytime, myiter, mythid )
./pkg/grdchk/grdchk_main.F 305 GRDCHK_MAIN 
            mytime = starttime
./pkg/grdchk/grdchk_main.F 307 GRDCHK_MAIN 
            call THE_MAIN_LOOP( mytime, myiter, mythid )
./pkg/grdchk/grdchk_main.F 345 GRDCHK_MAIN 
               mytime = starttime
./pkg/grdchk/grdchk_main.F 347 GRDCHK_MAIN 
               call THE_MAIN_LOOP( mytime, myiter, mythid )
./pkg/grdchk/grdchk_main.F 96 GRDCHK_MAIN 
      _RL     mytime
./pkg/ecco/the_main_loop.F 1115 THE_MAIN_LOOP 
      call PROFILES_INLOOP( mytime, mythid )
./pkg/ecco/the_main_loop.F 1130 THE_MAIN_LOOP 
      call COST_AVERAGESFIELDS( mytime, mythid )
./pkg/ecco/the_main_loop.F 1145 THE_MAIN_LOOP 
      call COST_ATLANTIC(  mytime, myiter,mythid )
./pkg/ecco/the_main_loop.F 1156 THE_MAIN_LOOP 
      call COST_FORCING( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1166 THE_MAIN_LOOP 
      call COST_SSH( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1176 THE_MAIN_LOOP 
      call COST_HYD( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1185 THE_MAIN_LOOP 
      call SEAICE_COST_DRIVER( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1195 THE_MAIN_LOOP 
      call COST_OBCS( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1205 THE_MAIN_LOOP 
      call COST_CURMTR( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1216 THE_MAIN_LOOP 
      call COST_DRIFTER( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1227 THE_MAIN_LOOP 
      call COST_SCAT( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1239 THE_MAIN_LOOP 
      call COST_DRIFT( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1248 THE_MAIN_LOOP 
      call COST_DRIFTW( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1256 THE_MAIN_LOOP 
      call COST_THETA_INI_FIN( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 1257 THE_MAIN_LOOP 
      call COST_SALT_INI_FIN( myiter, mytime, mythid )
./pkg/ecco/the_main_loop.F 170 THE_MAIN_LOOP 
      _RL     mytime
./pkg/ecco/the_main_loop.F 262 THE_MAIN_LOOP 
      call CAL_TIMESTAMP( myiter, mytime, mydate, mythid )
./pkg/ecco/the_main_loop.F 498 THE_MAIN_LOOP 
        mytime = startTime + float(iloop-1)*deltaTclock
./pkg/ecco/the_main_loop.F 522 THE_MAIN_LOOP 
        call PROFILES_INLOOP( mytime, mythid )
./pkg/ecco/the_main_loop.F 530 THE_MAIN_LOOP 
        call COST_AVERAGESFIELDS( mytime, mythid )
./pkg/ecco/the_main_loop.F 537 THE_MAIN_LOOP 
        call COST_ATLANTIC(  mytime, myiter,mythid )
./pkg/ecco/cost_mean_heatflux.F 42 COST_MEAN_HEATFLUX 
      _RL     mytime
./pkg/ecco/cost_mean_heatflux.F 7 COST_MEAN_HEATFLUX 
     I                       mytime,
./pkg/ecco/cost_curmtr.F 43 COST_CURMTR 
      _RL     mytime
./pkg/ecco/cost_curmtr.F 7 COST_CURMTR 
     I                     mytime,
./pkg/ecco/cost_theta.F 48 COST_THETA 
      _RL     mytime
./pkg/ecco/cost_theta.F 6 COST_THETA 
      subroutine COST_THETA( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 117 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 138 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 146 COST_HYD 
      call COST_CTDS  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 153 COST_HYD 
      call COST_ARGO_SALT ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 160 COST_HYD 
      call COST_THETA0 ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 167 COST_HYD 
      call COST_SALT0  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 174 COST_HYD 
      call COST_THETA ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 181 COST_HYD 
      call COST_SALT  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 185 COST_HYD 
       CALL COST_PROFILES( myiter, mytime, mythid)
./pkg/ecco/cost_hyd.F 42 COST_HYD 
      _RL     mytime
./pkg/ecco/cost_hyd.F 6 COST_HYD 
      subroutine COST_HYD( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 75 COST_HYD 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 83 COST_HYD 
      call COST_ARGO_THETA ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 90 COST_HYD 
      call COST_CTDT  ( myiter, mytime, mythid )
./pkg/ecco/cost_hyd.F 97 COST_HYD 
      call COST_XBT   ( myiter, mytime, mythid )
./pkg/ecco/cost_scat.F 42 COST_SCAT 
      _RL     mytime
./pkg/ecco/cost_scat.F 8 COST_SCAT 
     I                       mytime,
./pkg/ecco/cost_averagesflags.F 111 COST_AVERAGESFLAGS 
      call CAL_GETDATE( myiter,   mytime,           mydate,   mythid )
./pkg/ecco/cost_averagesflags.F 112 COST_AVERAGESFLAGS 
      call CAL_GETDATE( myiter+1, mytime+modelstep, nextdate, mythid )
./pkg/ecco/cost_averagesflags.F 58 COST_AVERAGESFLAGS 
      _RL     mytime
./pkg/ecco/cost_averagesflags.F 8 COST_AVERAGESFLAGS 
     I                               mytime,
./pkg/ecco/cost_ctdt.F 43 COST_CTDT 
      _RL     mytime
./pkg/ecco/cost_ctdt.F 8 COST_CTDT 
     I                     mytime,
./pkg/ecco/cost_driftw.F 45 COST_DRIFTW 
      _RL     mytime
./pkg/ecco/cost_driftw.F 8 COST_DRIFTW 
     I                       mytime,
./pkg/ecco/cost_obcsn.F 45 COST_OBCSN 
      _RL     mytime
./pkg/ecco/cost_obcsn.F 9 COST_OBCSN 
     I                       mytime,
./pkg/ecco/cost_obcsvol.F 47 COST_OBCSVOL 
      _RL     mytime
./pkg/ecco/cost_obcsvol.F 9 COST_OBCSVOL 
     I                       mytime,
./pkg/ecco/cost_ssh.F 51 COST_SSH 
      _RL     mytime
./pkg/ecco/cost_ssh.F 8 COST_SSH 
     I                     mytime,
./pkg/ecco/cost_forcing_gen.F 54 COST_FORCING_GEN 
      _RL     mytime
./pkg/ecco/cost_forcing_gen.F 8 COST_FORCING_GEN 
     I                       mytime,
./pkg/ecco/cost_mean_saltflux.F 42 COST_MEAN_SALTFLUX 
      _RL     mytime
./pkg/ecco/cost_mean_saltflux.F 7 COST_MEAN_SALTFLUX 
     I                       mytime,
./pkg/ecco/cost_salt0.F 45 COST_SALT0 
      _RL     mytime
./pkg/ecco/cost_salt0.F 8 COST_SALT0 
     I                           mytime,
./pkg/ecco/cost_kapgm.F 49 COST_KAPGM 
      _RL     mytime
./pkg/ecco/cost_kapgm.F 8 COST_KAPGM 
     I                           mytime,
./pkg/ecco/cost_ctds.F 42 COST_CTDS 
      _RL     mytime
./pkg/ecco/cost_ctds.F 8 COST_CTDS 
     I                     mytime,
./pkg/ecco/cost_averagesfields.F 112 COST_AVERAGESFIELDS 
      myiter = niter0 + INT((mytime-starttime)/deltaTClock+0.5)
./pkg/ecco/cost_averagesfields.F 117 COST_AVERAGESFIELDS 
     I                    myiter,     mytime,       mythid,
./pkg/ecco/cost_averagesfields.F 11 COST_AVERAGESFIELDS 
      subroutine COST_AVERAGESFIELDS( mytime, mythid )
./pkg/ecco/cost_averagesfields.F 57 COST_AVERAGESFIELDS 
      _RL     mytime
./pkg/ecco/cost_obcs.F 28 COST_OBCS 
      _RL     mytime
./pkg/ecco/cost_obcs.F 37 COST_OBCS 
      call COST_OBCSN ( myiter, mytime, mythid )
./pkg/ecco/cost_obcs.F 41 COST_OBCS 
      call COST_OBCSS ( myiter, mytime, mythid )
./pkg/ecco/cost_obcs.F 45 COST_OBCS 
      call COST_OBCSW ( myiter, mytime, mythid )
./pkg/ecco/cost_obcs.F 49 COST_OBCS 
      call COST_OBCSE ( myiter, mytime, mythid )
./pkg/ecco/cost_obcs.F 7 COST_OBCS 
     I                     mytime,
./pkg/ecco/cost_generic.F 13 COST_GENERIC 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_generic.F 59 COST_GENERIC 
      _RL mytime
./pkg/ecco/cost_ctdtclim.F 51 COST_CTDTCLIM 
      _RL     mytime
./pkg/ecco/cost_ctdtclim.F 8 COST_CTDTCLIM 
     I                       mytime,
./pkg/ecco/cost_drifter.F 55 COST_DRIFTER 
      _RL     mytime
./pkg/ecco/cost_drifter.F 8 COST_DRIFTER 
     I                       mytime,
./pkg/ecco/forward_step.F 48 FORWARD_STEP 
      _RL     mytime
./pkg/ecco/cost_argo_theta.F 43 COST_ARGO_THETA 
      _RL     mytime
./pkg/ecco/cost_argo_theta.F 8 COST_ARGO_THETA 
     I                     mytime,
./pkg/ecco/cost_obcsw.F 45 COST_OBCSW 
      _RL     mytime
./pkg/ecco/cost_obcsw.F 9 COST_OBCSW 
     I                       mytime,
./pkg/ecco/cost_theta0.F 45 COST_THETA0 
      _RL     mytime
./pkg/ecco/cost_theta0.F 8 COST_THETA0 
     I                           mytime,
./pkg/ecco/cost_argo_salt.F 43 COST_ARGO_SALT 
      _RL     mytime
./pkg/ecco/cost_argo_salt.F 8 COST_ARGO_SALT 
     I                     mytime,
./pkg/ecco/cost_ctdsclim.F 51 COST_CTDSCLIM 
      _RL     mytime
./pkg/ecco/cost_ctdsclim.F 8 COST_CTDSCLIM 
     I                       mytime,
./pkg/ecco/cost_forcing.F 103 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 118 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 131 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 146 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 159 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 174 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 189 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 204 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 215 COST_FORCING 
      call COST_MEAN_HEATFLUX( myiter, mytime, mythid )
./pkg/ecco/cost_forcing.F 220 COST_FORCING 
      call COST_MEAN_SALTFLUX( myiter, mytime, mythid )
./pkg/ecco/cost_forcing.F 45 COST_FORCING 
      _RL     mytime
./pkg/ecco/cost_forcing.F 62 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 6 COST_FORCING 
      subroutine COST_FORCING( myiter, mytime, mythid )
./pkg/ecco/cost_forcing.F 75 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 90 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_obcse.F 45 COST_OBCSE 
      _RL     mytime
./pkg/ecco/cost_obcse.F 9 COST_OBCSE 
     I                       mytime,
./pkg/ecco/cost_obcss.F 45 COST_OBCSS 
      _RL     mytime
./pkg/ecco/cost_obcss.F 9 COST_OBCSS 
     I                       mytime,
./pkg/ecco/cost_drift.F 42 COST_DRIFT 
      _RL     mytime
./pkg/ecco/cost_drift.F 6 COST_DRIFT 
      subroutine COST_DRIFT( myiter, mytime, mythid )
./pkg/ecco/cost_atlantic.F 110 COST_ATLANTIC 
     I                    myiter,     mytime,       mythid,
./pkg/ecco/cost_atlantic.F 48 COST_ATLANTIC 
      _RL     mytime
./pkg/ecco/cost_atlantic.F 7 COST_ATLANTIC 
     I                                mytime,
./pkg/ecco/cost_salt.F 48 COST_SALT 
      _RL     mytime
./pkg/ecco/cost_salt.F 6 COST_SALT 
      subroutine COST_SALT( myiter, mytime, mythid )
./pkg/ecco/cost_theta_ini_fin.F 37 COST_THETA_INI_FIN 
      _RL     mytime
./pkg/ecco/cost_theta_ini_fin.F 8 COST_THETA_INI_FIN 
     I                           mytime,
./pkg/ecco/cost_obcs_ageos.F 47 COST_OBCS_AGEOS 
      _RL     mytime
./pkg/ecco/cost_obcs_ageos.F 8 COST_OBCS_AGEOS 
      subroutine COST_OBCS_AGEOS( myiter, mytime, mythid )
./pkg/ecco/cost_salt_ini_fin.F 37 COST_SALT_INI_FIN 
      _RL     mytime
./pkg/ecco/cost_salt_ini_fin.F 8 COST_SALT_INI_FIN 
     I                           mytime,
./pkg/ecco/cost_xbt.F 43 COST_XBT 
      _RL     mytime
./pkg/ecco/cost_xbt.F 8 COST_XBT 
     I                     mytime,
./pkg/ctrl/ctrl_getobcse.F 118 CTRL_GETOBCSE 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcse.F 379 CTRL_GETOBCSE 
      _RL     mytime
./pkg/ctrl/ctrl_getobcse.F 45 CTRL_GETOBCSE 
      _RL     mytime
./pkg/ctrl/ctrl_getobcse.F 9 CTRL_GETOBCSE 
     I                             mytime,
./pkg/ctrl/ctrl_getrec.F 14 CTRL_GETREC 
     I                        mytime,
./pkg/ctrl/ctrl_getrec.F 241 CTRL_GETREC 
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/ctrl/ctrl_getrec.F 252 CTRL_GETREC 
      first = ((mytime - modelstart) .lt. 0.5*modelstep)
./pkg/ctrl/ctrl_getrec.F 257 CTRL_GETREC 
        call CAL_GETDATE( myiter-1, mytime-modelstep,
./pkg/ctrl/ctrl_getrec.F 61 CTRL_GETREC 
      _RL     mytime
./pkg/ctrl/ctrl_getobcsw.F 119 CTRL_GETOBCSW 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcsw.F 382 CTRL_GETOBCSW 
      _RL     mytime
./pkg/ctrl/ctrl_getobcsw.F 46 CTRL_GETOBCSW 
      _RL     mytime
./pkg/ctrl/ctrl_getobcsw.F 9 CTRL_GETOBCSW 
     I                             mytime,
./pkg/ctrl/ctrl_get_gen_rec.F 103 CTRL_GET_GEN_REC 
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/ctrl/ctrl_get_gen_rec.F 113 CTRL_GET_GEN_RE