Symbol Description Uses
modelstartdate 167



File Line number Procedure Code
./pkg/profiles/profiles_init_fixed.F 273 PROFILES_INIT_FIXED
      call CAL_TIMEPASSED( modelstartdate,tmpdate,tmpdiff,mythid )
./pkg/seaice/seaice_cost_concentration.F 197 SEAICE_COST_CONCENTRATION
      middate(3) = modelstartdate(3)
./pkg/seaice/seaice_cost_concentration.F 198 SEAICE_COST_CONCENTRATION
      middate(4) = modelstartdate(4)
./pkg/seaice/seaice_cost_driver.F 100 SEAICE_COST_DRIVER
     &     nrecloc, modelstartdate, localperiod,
./pkg/seaice/seaice_cost_driver.F 78 SEAICE_COST_DRIVER
     &     nrecloc, modelstartdate, localperiod,
./pkg/seaice/seaice_cost_driver.F 89 SEAICE_COST_DRIVER
     &     nrecloc, modelstartdate, localperiod,
./pkg/seaice/seaice_cost_init_fixed.F 68 SEAICE_COST_INIT_FIXED
        call CAL_TIMEPASSED( modelstartdate, tempDate1    ,
./pkg/seaice/seaice_cost_init_fixed.F 75 SEAICE_COST_INIT_FIXED
        call CAL_TIMEPASSED( modelstartdate, tempDate1    ,
./pkg/seaice/seaice_cost_sss.F 215 SEAICE_COST_SSS
      middate(3) = modelstartdate(3)
./pkg/seaice/seaice_cost_sss.F 216 SEAICE_COST_SSS
      middate(4) = modelstartdate(4)
./pkg/seaice/seaice_cost_sst.F 210 SEAICE_COST_SST
      middate(3) = modelstartdate(3)
./pkg/seaice/seaice_cost_sst.F 211 SEAICE_COST_SST
      middate(4) = modelstartdate(4)
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 136 COST_HYD
     &     nmonsrec, modelstartdate, localperiod,
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F 73 COST_HYD
     &     nmonsrec, modelstartdate, localperiod,
./pkg/cal/cal.h 103 NO PROCEDURE
      integer modelstartdate(4)
./pkg/cal/cal.h 81 NO PROCEDURE
     &               modelstartdate,
./pkg/cal/cal_daysformonth.F 80 CAL_DAYSFORMONTH
      firstyear   = modelstartdate(1)/10000
./pkg/cal/cal_daysformonth.F 81 CAL_DAYSFORMONTH
      firstmonth  = mod(modelstartdate(1)/100,100)
./pkg/cal/cal_daysformonth.F 82 CAL_DAYSFORMONTH
      firstd      = mod(modelstartdate(1),100)
./pkg/cal/cal_getdate.F 67 CAL_GETDATE
      call CAL_ADDTIME( modelstartdate, workdate, mydate, mythid )
./pkg/cal/cal_intdays.F 51 NO PROCEDURE
      tempdate(1) = modelstartdate(1)
./pkg/cal/cal_intdays.F 53 NO PROCEDURE
      tempdate(3) = modelstartdate(3)
./pkg/cal/cal_intdays.F 54 NO PROCEDURE
      tempdate(4) = modelstartdate(4)
./pkg/cal/cal_intmonths.F 53 NO PROCEDURE
      startmonth = mod(modelstartdate(1)/100,100)
./pkg/cal/cal_intmonths.F 55 NO PROCEDURE
      startyear  = modelstartdate(1)/10000
./pkg/cal/cal_intyears.F 47 NO PROCEDURE
     &             modelstartdate(1)/10000   ) + 1
./pkg/cal/cal_monthsforyear.F 68 CAL_MONTHSFORYEAR
      firstyear = modelstartdate(1)/10000
./pkg/cal/cal_monthsforyear.F 69 CAL_MONTHSFORYEAR
      firstmon  = mod(modelstartdate(1)/100,100)
./pkg/cal/cal_set.F 364 CAL_SET
     &                   modelstartdate, mythid )
./pkg/cal/cal_set.F 390 CAL_SET
        call CAL_TIMEPASSED( modelstartdate, modelenddate, datediff,
./pkg/cal/cal_set.F 414 CAL_SET
      call CAL_ADDTIME( modelstartdate, iterinitime, modelrundate,
./pkg/cal/cal_set.F 416 CAL_SET
      call CAL_COPYDATE( modelrundate, modelstartdate, mythid )
./pkg/cal/cal_set.F 420 CAL_SET
      call CAL_ADDTIME( modelstartdate, timediff, modelenddate,
./pkg/cal/cal_stepsforday.F 80 CAL_STEPSFORDAY
      firstyear  = modelstartdate(1)/10000
./pkg/cal/cal_stepsforday.F 81 CAL_STEPSFORDAY
      firstmonth = mod(modelstartdate(1)/100,100)
./pkg/cal/cal_stepsforday.F 82 CAL_STEPSFORDAY
      firstday   = mod(modelstartdate(1),100)
./pkg/cal/cal_stepsforday.F 85 CAL_STEPSFORDAY
      startsecs  = (modelstartdate(2)/10000)*secondsperhour +
./pkg/cal/cal_stepsforday.F 86 CAL_STEPSFORDAY
     &             mod(modelstartdate(2)/100,100)*secondsperminute +
./pkg/cal/cal_stepsforday.F 87 CAL_STEPSFORDAY
     &             mod(modelstartdate(2),100)
./pkg/cal/cal_summary.F 113 CAL_SUMMARY
      call WRITE_0D_I( modelstartdate(1), INDEX_NONE,
./pkg/cal/cal_summary.F 116 CAL_SUMMARY
      call WRITE_0D_I( modelstartdate(2), INDEX_NONE,
./pkg/ctrl/ctrl_get_gen_rec.F 110 CTRL_GET_GEN_REC
        call CAL_TIMEPASSED( fldstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 199 CTRL_INIT
        call CAL_TIMEPASSED( xx_hfluxstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 226 CTRL_INIT
        call CAL_TIMEPASSED( xx_atempstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 263 CTRL_INIT
        call CAL_TIMEPASSED( xx_sfluxstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 290 CTRL_INIT
        call CAL_TIMEPASSED( xx_aqhstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 327 CTRL_INIT
        call CAL_TIMEPASSED( xx_tauustartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 358 CTRL_INIT
        call CAL_TIMEPASSED( xx_uwindstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 395 CTRL_INIT
        call CAL_TIMEPASSED( xx_tauvstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 426 CTRL_INIT
        call CAL_TIMEPASSED( xx_vwindstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 467 CTRL_INIT
        call CAL_TIMEPASSED( xx_obcsnstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 493 CTRL_INIT
        call CAL_TIMEPASSED( xx_obcssstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 519 CTRL_INIT
        call CAL_TIMEPASSED( xx_obcswstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 545 CTRL_INIT
        call CAL_TIMEPASSED( xx_obcsestartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 594 CTRL_INIT
        call CAL_TIMEPASSED( xx_sststartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 630 CTRL_INIT
        call CAL_TIMEPASSED( xx_sssstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 759 CTRL_INIT
        call CAL_TIMEPASSED( xx_precipstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 790 CTRL_INIT
        call CAL_TIMEPASSED( xx_swfluxstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 821 CTRL_INIT
        call CAL_TIMEPASSED( xx_swdownstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 852 CTRL_INIT
        call CAL_TIMEPASSED( xx_lwfluxstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 883 CTRL_INIT
        call CAL_TIMEPASSED( xx_lwdownstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 914 CTRL_INIT
        call CAL_TIMEPASSED( xx_evapstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 945 CTRL_INIT
        call CAL_TIMEPASSED( xx_snowprecipstartdate, modelstartdate,
./pkg/ctrl/ctrl_init.F 976 CTRL_INIT
        call CAL_TIMEPASSED( xx_apressurestartdate, modelstartdate,
./pkg/ecco/cost_argo_salt.F 117 COST_ARGO_SALT
      mody = modelstartdate(1)/10000
./pkg/ecco/cost_argo_salt.F 118 COST_ARGO_SALT
      modm = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_argo_theta.F 120 COST_ARGO_THETA
      mody = modelstartdate(1)/10000
./pkg/ecco/cost_argo_theta.F 121 COST_ARGO_THETA
      modm = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_averagesflags.F 125 COST_AVERAGESFLAGS
      equal = cal_CompDates(modelstartdate,mydate,mythid)
./pkg/ecco/cost_averagesflags.F 173 COST_AVERAGESFLAGS
        if ( mydate(1) .eq. modelstartdate(1) ) then
./pkg/ecco/cost_averagesflags.F 174 COST_AVERAGESFLAGS
          call CAL_COPYDATE( modelstartdate, targetdate, mythid )
./pkg/ecco/cost_averagesflags.F 181 COST_AVERAGESFLAGS
          call CAL_TIMEPASSED( modelstartdate, targetdate, datediff,
./pkg/ecco/cost_averagesflags.F 227 COST_AVERAGESFLAGS
        if ( (mydate(1)/100)*100 .eq. (modelstartdate(1)/100)*100 ) then
./pkg/ecco/cost_averagesflags.F 228 COST_AVERAGESFLAGS
          call CAL_COPYDATE( modelstartdate, targetdate, mythid )
./pkg/ecco/cost_averagesflags.F 235 COST_AVERAGESFLAGS
          if ( mydate(1)/10000 .eq. modelstartdate(1)/10000 ) then
./pkg/ecco/cost_averagesflags.F 237 COST_AVERAGESFLAGS
     &             - mod( modelstartdate(1)/100, 100 ) + 1
./pkg/ecco/cost_averagesflags.F 240 COST_AVERAGESFLAGS
     &             + nmonthyear - mod(modelstartdate(1)/100,100) + 1
./pkg/ecco/cost_averagesflags.F 241 COST_AVERAGESFLAGS
     &             + ( mydate(1)/10000 - modelstartdate(1)/10000 - 1)*
./pkg/ecco/cost_averagesflags.F 284 COST_AVERAGESFLAGS
     &        int(modelstartdate(1)/10000) ) then
./pkg/ecco/cost_averagesflags.F 285 COST_AVERAGESFLAGS
          call CAL_COPYDATE( modelstartdate, targetdate, mythid )
./pkg/ecco/cost_averagesflags.F 292 COST_AVERAGESFLAGS
          yearrec  = mydate(1)/10000 - modelstartdate(1)/10000 + 1
./pkg/ecco/cost_bp_read.F 86 COST_BP_READ
      mody = modelstartdate(1)/10000
./pkg/ecco/cost_bp_read.F 87 COST_BP_READ
      modm = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_ctds.F 117 COST_CTDS
      mody = modelstartdate(1)/10000
./pkg/ecco/cost_ctds.F 118 COST_CTDS
      modm = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_ctdsclim.F 162 COST_CTDSCLIM
        levoff = mod(modelstartdate(1)/100,100)
./pkg/ecco/cost_ctdt.F 118 COST_CTDT
      mody = modelstartdate(1)/10000
./pkg/ecco/cost_ctdt.F 119 COST_CTDT
      modm = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_ctdtclim.F 161 COST_CTDTCLIM
        levoff = mod(modelstartdate(1)/100,100)
./pkg/ecco/cost_gencost_all.F 73 COST_GENCOST_ALL
     &        gencost_nrec(k), modelstartdate, gencost_period(k),
./pkg/ecco/cost_gencost_sstv4.F 173 COST_GENCOST_SSTV4
             ymod = modelstartdate(1)/10000
./pkg/ecco/cost_gencost_sstv4.F 175 COST_GENCOST_SSTV4
                middate(1) = modelstartdate(1)
./pkg/ecco/cost_gencost_sstv4.F 180 COST_GENCOST_SSTV4
             middate(3) = modelstartdate(3)
./pkg/ecco/cost_gencost_sstv4.F 181 COST_GENCOST_SSTV4
             middate(4) = modelstartdate(4)
./pkg/ecco/cost_gencost_sstv4.F 311 COST_GENCOST_SSTV4
             ymod = modelstartdate(1)/10000
./pkg/ecco/cost_gencost_sstv4.F 313 COST_GENCOST_SSTV4
                middate(1) = modelstartdate(1)
./pkg/ecco/cost_gencost_sstv4.F 318 COST_GENCOST_SSTV4
             middate(3) = modelstartdate(3)
./pkg/ecco/cost_gencost_sstv4.F 319 COST_GENCOST_SSTV4
             middate(4) = modelstartdate(4)
./pkg/ecco/cost_generic.F 205 COST_GENERIC
              middate(1) = modelstartdate(1)
./pkg/ecco/cost_generic.F 210 COST_GENERIC
           middate(3) = modelstartdate(3)
./pkg/ecco/cost_generic.F 211 COST_GENERIC
           middate(4) = modelstartdate(4)
./pkg/ecco/cost_generic.F 218 COST_GENERIC
           beginmodel = modelstartdate(1)/10000
./pkg/ecco/cost_generic.F 221 COST_GENERIC
     &         + ( mod(modelstartdate(1)/100,100)
./pkg/ecco/cost_generic.F 224 COST_GENERIC
           mody   = modelstartdate(1)/10000
./pkg/ecco/cost_generic.F 225 COST_GENERIC
           modm   = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_hyd.F 160 COST_HYD
     &     nmonsrec, modelstartdate, localperiod,
./pkg/ecco/cost_hyd.F 240 COST_HYD
     &     nrecloc, modelstartdate, localperiod,
./pkg/ecco/cost_hyd.F 76 COST_HYD
     &     nmonsrec, modelstartdate, localperiod,
./pkg/ecco/cost_hyd.F 97 COST_HYD
     &     nrecloc, modelstartdate, localperiod,
./pkg/ecco/cost_readargos.F 74 COST_READARGOS
      beginrun = modelstartdate(1)/10000
./pkg/ecco/cost_readargos.F 76 COST_READARGOS
        argosrec = mod(modelstartdate(1)/100,100) -
./pkg/ecco/cost_readargos.F 81 COST_READARGOS
     &            1) + mod(modelstartdate(1)/100,100) - 1 + irec
./pkg/ecco/cost_readargot.F 74 COST_READARGOT
      beginrun = modelstartdate(1)/10000
./pkg/ecco/cost_readargot.F 76 COST_READARGOT
        argotrec = mod(modelstartdate(1)/100,100) -
./pkg/ecco/cost_readargot.F 81 COST_READARGOT
     &            1) + mod(modelstartdate(1)/100,100) - 1 + irec
./pkg/ecco/cost_readers.F 103 COST_READERS
      middate(3) = modelstartdate(3)
./pkg/ecco/cost_readers.F 104 COST_READERS
      middate(4) = modelstartdate(4)
./pkg/ecco/cost_readers.F 98 COST_READERS
         middate(1) = modelstartdate(1)
./pkg/ecco/cost_readgfo.F 103 COST_READGFO
      middate(3) = modelstartdate(3)
./pkg/ecco/cost_readgfo.F 104 COST_READGFO
      middate(4) = modelstartdate(4)
./pkg/ecco/cost_readgfo.F 98 COST_READGFO
         middate(1) = modelstartdate(1)
./pkg/ecco/cost_readscatxfields.F 102 COST_READSCATXFIELDS
      mody = modelstartdate(1)/10000
./pkg/ecco/cost_readscatxfields.F 103 COST_READSCATXFIELDS
      modm = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_readscatyfields.F 101 COST_READSCATYFIELDS
      mody = modelstartdate(1)/10000
./pkg/ecco/cost_readscatyfields.F 102 COST_READSCATYFIELDS
      modm = modelstartdate(1)/100 - mody*100
./pkg/ecco/cost_readtopex.F 103 COST_READTOPEX
      middate(3) = modelstartdate(3)
./pkg/ecco/cost_readtopex.F 104 COST_READTOPEX
      middate(4) = modelstartdate(4)
./pkg/ecco/cost_readtopex.F 98 COST_READTOPEX
         middate(1) = modelstartdate(1)
./pkg/ecco/cost_salt.F 162 COST_SALT
        levoff = mod(modelstartdate(1)/100,100)
./pkg/ecco/cost_sla_read.F 103 COST_SLA_READ
         middate(1) = modelstartdate(1)
./pkg/ecco/cost_sla_read.F 108 COST_SLA_READ
      middate(3) = modelstartdate(3)
./pkg/ecco/cost_sla_read.F 109 COST_SLA_READ
      middate(4) = modelstartdate(4)
./pkg/ecco/cost_theta.F 161 COST_THETA
        levoff = mod(modelstartdate(1)/100,100)
./pkg/ecco/cost_xbt.F 122 COST_XBT
      mody = modelstartdate(1)/10000
./pkg/ecco/cost_xbt.F 123 COST_XBT
      modm = modelstartdate(1)/100 - mody*100
./pkg/exf/exf_init_fixed.F 103 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 119 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 135 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 153 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 169 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 185 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 201 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 217 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 234 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 250 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 269 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 288 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 307 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 326 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 345 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 361 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 380 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 399 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 419 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 437 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 455 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 473 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 492 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 510 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 528 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 546 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 567 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 586 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 605 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 622 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 70 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)
./pkg/exf/exf_init_fixed.F 86 EXF_INIT_FIXED
        CALL CAL_TIMEPASSED(modelstartdate,date_array,difftime,myThid)