Symbol Description Uses
myiter 168


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_getsurfacefluxes.F 142 EXF_GETSURFACEFLUXES 
     &     whflux, mytime, myiter, mythid )
./pkg/exf/exf_getsurfacefluxes.F 14 EXF_GETSURFACEFLUXES 
     I                                 myiter,
./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 63 EXF_GETSURFACEFLUXES 
      integer myiter
./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 129 ADACTIVE_WRITE_PROFILE 
      integer myiter
./pkg/profiles/active_file_profiles_ad.F 142 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 64 ADACTIVE_READ_PROFILE 
      integer myiter
./pkg/profiles/active_file_profiles_ad.F 74 ADACTIVE_READ_PROFILE 
     &     REVERSE_SIMULATION, myiter,bi,bj, mythid)
./pkg/profiles/active_file_profiles_ad.F 91 ADACTIVE_WRITE_PROFILE 
     I                              myiter,
./pkg/profiles/cost_profiles.F 15 COST_PROFILES 
      SUBROUTINE COST_PROFILES( myiter, mytime, myThid )
./pkg/profiles/cost_profiles.F 38 COST_PROFILES 
      integer myiter
./pkg/seaice/cost_ice_test.F 234 COST_ICE_TEST 
      write(standardMessageUnit,*) '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 
      write(standardMessageUnit,*) 'ph-ice B ', myiter,
./pkg/seaice/seaice_cost_areasst.F 25 SEAICE_COST_AREASST 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_areasst.F 68 SEAICE_COST_AREASST 
      integer myiter
./pkg/seaice/seaice_cost_concentration.F 25 SEAICE_COST_CONCENTRATION 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_concentration.F 57 SEAICE_COST_CONCENTRATION 
      integer myiter
./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 54 SEAICE_COST_DRIVER 
      integer myiter
./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 57 SEAICE_COST_SSS 
      integer myiter
./pkg/seaice/seaice_cost_sst.F 23 SEAICE_COST_SST 
     &     myiter, mytime, mythid )
./pkg/seaice/seaice_cost_sst.F 55 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_get_vel_resid_err.F 27 STREAMICE_GET_VEL_RESID_ERR 
      INTEGER myThid, myiter
./pkg/streamice/streamice_timestep.F 137 STREAMICE_TIMESTEP 
     &                           myiter )
./pkg/streamice/streamice_timestep.F 147 STREAMICE_TIMESTEP 
     &                           myiter )
./pkg/streamice/streamice_timestep.F 182 STREAMICE_TIMESTEP 
     &                           myiter )
./pkg/streamice/streamice_timestep.F 99 STREAMICE_TIMESTEP 
      CALL STREAMICE_DUMP( mytime, myiter, myThid )
./pkg/streamice/streamice_vel_solve.F 13 STREAMICE_VEL_SOLVE 
     &                                myiter )
./pkg/streamice/streamice_vel_solve_openad.F 13 STREAMICE_VEL_SOLVE_OPENAD 
     &                                maxCGiter, myiter )
./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/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_ad/ctrl_map_gentim2d.F 152 CTRL_MAP_GENTIM2D 
     &    iarr,' : iter=', myiter, ' ; global sum = ', LOCsumGlob
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 105 CTRL_MAP_GENTIM2D 
     I      mytime, myiter, mythid )
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 152 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 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 62 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 118 CTRL_GETOBCSE 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcse.F 11 CTRL_GETOBCSE 
     I                             myiter,
./pkg/ctrl/ctrl_getobcse.F 48 CTRL_GETOBCSE 
      integer myiter
./pkg/ctrl/ctrl_getobcsn.F 11 CTRL_GETOBCSN 
     I                             myiter,
./pkg/ctrl/ctrl_getobcsn.F 124 CTRL_GETOBCSN 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcsn.F 49 CTRL_GETOBCSN 
      integer myiter
./pkg/ctrl/ctrl_getobcss.F 11 CTRL_GETOBCSS 
     I                             myiter,
./pkg/ctrl/ctrl_getobcss.F 120 CTRL_GETOBCSS 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcss.F 50 CTRL_GETOBCSS 
      integer myiter
./pkg/ctrl/ctrl_getobcsw.F 119 CTRL_GETOBCSW 
     I                   mytime, myiter, mythid )
./pkg/ctrl/ctrl_getobcsw.F 11 CTRL_GETOBCSW 
     I                             myiter,
./pkg/ctrl/ctrl_getobcsw.F 49 CTRL_GETOBCSW 
      integer myiter
./pkg/ctrl/ctrl_getrec.F 14 CTRL_GETREC 
     I                        myiter,
./pkg/ctrl/ctrl_getrec.F 324 CTRL_GETREC 
      call CAL_GETDATE( myiter, mytime, mydate, mythid )
./pkg/ctrl/ctrl_getrec.F 340 CTRL_GETREC 
        call CAL_GETDATE( myiter-1, mytime-modelstep,
./pkg/ctrl/ctrl_getrec.F 61 CTRL_GETREC 
      integer myiter
./pkg/ctrl/ctrl_map_gentim2d.F 149 CTRL_MAP_GENTIM2D 
     &     ' iter=', myiter, ' ; genprecipGloH= ', genprecipGloH
./pkg/ctrl/ctrl_map_gentim2d.F 98 CTRL_MAP_GENTIM2D 
     I      mytime, myiter, 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 188 COST_AVERAGESFIELDS 
     I                    myiter, mythid )
./pkg/ecco/cost_averagesfields.F 206 COST_AVERAGESFIELDS 
     &    ' iter=', myiter, ' ; sterGloH= ', sterGloH
./pkg/ecco/cost_averagesfields.F 77 COST_AVERAGESFIELDS 
      integer myiter
./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_gencost_all.F 36 COST_GENCOST_ALL 
      integer myiter
./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_gencost_assignperiod.F 12 COST_GENCOST_ASSIGNPERIOD 
     I                    myiter, mythid )
./pkg/ecco/cost_gencost_assignperiod.F 46 COST_GENCOST_ASSIGNPERIOD 
      integer myiter, mythid
./pkg/ecco/cost_gencost_assignperiod.F 85 COST_GENCOST_ASSIGNPERIOD 
            genrec(k)     = 1+ myiter - niter0
./pkg/ecco/cost_gencost_assignperiod.F 89 COST_GENCOST_ASSIGNPERIOD 
            endofgen(k)   = (myiter.EQ.niter0)
./pkg/ecco/cost_gencost_assignperiod.F 90 COST_GENCOST_ASSIGNPERIOD 
            ingen(k)      = (myiter.EQ.niter0)
./pkg/ecco/cost_gencost_assignperiod.F 93 COST_GENCOST_ASSIGNPERIOD 
            print*,'gf-const ',startofgen(k),myiter,niter0
./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 197 COST_GENLOOP 
      integer myiter
./pkg/ecco/cost_generic.F 20 COST_GENERIC 
     &     myiter, mytime, mythid )
./pkg/ecco/cost_generic.F 48 COST_GENERIC 
      integer myiter
./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 50 COST_HYD 
      integer myiter
./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 47 COST_INTERNAL_PARAMS 
      integer myiter
./pkg/ecco/cost_internal_params.F 7 COST_INTERNAL_PARAMS 
      subroutine COST_INTERNAL_PARAMS( myiter, mytime, mythid )
./pkg/ecco/cost_obcs.F 13 COST_OBCS 
     I                     myiter,
./pkg/ecco/cost_obcs.F 46 COST_OBCS 
      integer myiter
./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 55 COST_OBCS_AGEOS 
      integer myiter
./pkg/ecco/cost_obcs_ageos.F 9 COST_OBCS_AGEOS 
      subroutine COST_OBCS_AGEOS( myiter, mytime, mythid )
./pkg/ecco/cost_obcse.F 13 COST_OBCSE 
     I                       myiter,
./pkg/ecco/cost_obcse.F 60 COST_OBCSE 
      integer myiter
./pkg/ecco/cost_obcsn.F 13 COST_OBCSN 
     I                       myiter,
./pkg/ecco/cost_obcsn.F 60 COST_OBCSN 
      integer myiter
./pkg/ecco/cost_obcss.F 13 COST_OBCSS 
     I                       myiter,
./pkg/ecco/cost_obcss.F 60 COST_OBCSS 
      integer myiter
./pkg/ecco/cost_obcsvol.F 10 COST_OBCSVOL 
     I                       myiter,
./pkg/ecco/cost_obcsvol.F 54 COST_OBCSVOL 
      integer myiter
./pkg/ecco/cost_obcsw.F 13 COST_OBCSW 
     I                       myiter,
./pkg/ecco/cost_obcsw.F 60 COST_OBCSW 
      integer myiter
./pkg/ecco/cost_ssh.F 59 COST_SSH 
      integer myiter
./pkg/ecco/cost_ssh.F 8 COST_SSH 
     I                     myiter,
./pkg/ecco/ecco_cost_driver.F 105 ECCO_COST_DRIVER 
     &     myiter, mytime, mythid )