Symbol Description Uses
diffsecs 114



File Line number Procedure Code
./pkg/profiles/profiles_init_fixed.F 274 PROFILES_INIT_FIXED
      call CAL_TOSECONDS (tmpdiff,diffsecs,mythid)
./pkg/profiles/profiles_init_fixed.F 275 PROFILES_INIT_FIXED
      diffsecs=diffsecs+nIter0*deltaTclock
./pkg/profiles/profiles_init_fixed.F 289 PROFILES_INIT_FIXED
        prof_time(num_file,length_for_tile,bi,bj)=diffsecs
./pkg/profiles/profiles_init_fixed.F 308 PROFILES_INIT_FIXED
         prof_time(num_file,length_for_tile,bi,bj)=diffsecs
./pkg/profiles/profiles_init_fixed.F 331 PROFILES_INIT_FIXED
         prof_time(num_file,length_for_tile,bi,bj)=diffsecs
./pkg/profiles/profiles_init_fixed.F 36 PROFILES_INIT_FIXED
      _RL tmpyymmdd(1000),tmphhmmss(1000),diffsecs
./pkg/seaice/seaice_cost_concentration.F 202 SEAICE_COST_CONCENTRATION
      call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/seaice/seaice_cost_concentration.F 204 SEAICE_COST_CONCENTRATION
      localrec = int(diffsecs/localperiod) + 1
./pkg/seaice/seaice_cost_concentration.F 209 SEAICE_COST_CONCENTRATION
      print *,'difftime,diffsecs',difftime,diffsecs
./pkg/seaice/seaice_cost_concentration.F 99 SEAICE_COST_CONCENTRATION
      _RL diffsecs
./pkg/seaice/seaice_cost_sss.F 100 SEAICE_COST_SSS
      _RL diffsecs
./pkg/seaice/seaice_cost_sss.F 220 SEAICE_COST_SSS
      call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/seaice/seaice_cost_sss.F 222 SEAICE_COST_SSS
      localrec = int(diffsecs/localperiod) + 1
./pkg/seaice/seaice_cost_sss.F 227 SEAICE_COST_SSS
      print *,'difftime,diffsecs',difftime,diffsecs
./pkg/seaice/seaice_cost_sst.F 215 SEAICE_COST_SST
      call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/seaice/seaice_cost_sst.F 217 SEAICE_COST_SST
      localrec = int(diffsecs/localperiod) + 1
./pkg/seaice/seaice_cost_sst.F 222 SEAICE_COST_SST
      print *,'difftime,diffsecs',difftime,diffsecs
./pkg/seaice/seaice_cost_sst.F 98 SEAICE_COST_SST
      _RL diffsecs
./pkg/cal/cal_getmonthsrec.F 196 CAL_GETMONTHSREC
      call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/cal/cal_getmonthsrec.F 206 CAL_GETMONTHSREC
        fac = (midsecs - currentsecs)/diffsecs
./pkg/cal/cal_getmonthsrec.F 209 CAL_GETMONTHSREC
     &        diffsecs
./pkg/cal/cal_getmonthsrec.F 70 CAL_GETMONTHSREC
      _RL     diffsecs
./pkg/ctrl/ctrl_init.F 104 CTRL_INIT
      _RL     diffsecs
./pkg/ctrl/ctrl_init.F 201 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 206 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 208 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 228 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 233 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 235 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 265 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 270 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 272 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 292 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 297 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 299 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 329 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 334 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 336 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 360 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 365 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 367 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 397 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 402 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 404 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 428 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 433 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 435 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 469 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 470 CTRL_INIT
        startrec = int((modelstart - diffsecs)/xx_obcsnperiod) + 1
./pkg/ctrl/ctrl_init.F 472 CTRL_INIT
        endrec   = int((modelend   - diffsecs)/xx_obcsnperiod) + 2
./pkg/ctrl/ctrl_init.F 495 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 496 CTRL_INIT
        startrec = int((modelstart - diffsecs)/xx_obcssperiod) + 1
./pkg/ctrl/ctrl_init.F 498 CTRL_INIT
        endrec   = int((modelend   - diffsecs)/xx_obcssperiod) + 2
./pkg/ctrl/ctrl_init.F 521 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 522 CTRL_INIT
        startrec = int((modelstart - diffsecs)/xx_obcswperiod) + 1
./pkg/ctrl/ctrl_init.F 524 CTRL_INIT
        endrec   = int((modelend   - diffsecs)/xx_obcswperiod) + 2
./pkg/ctrl/ctrl_init.F 547 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 548 CTRL_INIT
        startrec = int((modelstart - diffsecs)/xx_obcseperiod) + 1
./pkg/ctrl/ctrl_init.F 550 CTRL_INIT
        endrec   = int((modelend   - diffsecs)/xx_obcseperiod) + 2
./pkg/ctrl/ctrl_init.F 596 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 601 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 603 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 632 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 637 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 639 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 761 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 766 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 768 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 792 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 797 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 799 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 823 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 828 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 830 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 854 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 859 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 861 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 885 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 890 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 892 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 916 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 921 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 923 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 947 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 952 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 954 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 978 CTRL_INIT
        call CAL_TOSECONDS ( difftime, diffsecs, mythid )
./pkg/ctrl/ctrl_init.F 983 CTRL_INIT
        startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init.F 985 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_mask_set_xz.F 59 CTRL_MASK_SET_XZ
      _RL     diffsecs
./pkg/ctrl/ctrl_mask_set_yz.F 59 CTRL_MASK_SET_YZ
      _RL     diffsecs
./pkg/ctrl/ctrl_readparms.F 55 CTRL_READPARMS
      _RL     diffsecs
./pkg/ecco/cost_gencost_sstv4.F 183 COST_GENCOST_SSTV4
             call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/ecco/cost_gencost_sstv4.F 184 COST_GENCOST_SSTV4
             localrec = int(diffsecs/86400.) + 1
./pkg/ecco/cost_gencost_sstv4.F 321 COST_GENCOST_SSTV4
             call CAL_TOSECONDS( difftime, diffsecs, mythid ) 
./pkg/ecco/cost_gencost_sstv4.F 322 COST_GENCOST_SSTV4
             localrec = int(diffsecs/86400.) + 1
./pkg/ecco/cost_gencost_sstv4.F 86 COST_GENCOST_SSTV4
      _RL diffsecs
./pkg/ecco/cost_generic.F 103 COST_GENERIC
      _RL diffsecs
./pkg/ecco/cost_generic.F 213 COST_GENERIC
           call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/ecco/cost_generic.F 214 COST_GENERIC
           localrec = int(diffsecs/localperiod) + 1
./pkg/ecco/cost_readers.F 107 COST_READERS
      call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/ecco/cost_readers.F 108 COST_READERS
      sshrec = int(diffsecs/ersperiod) + 1
./pkg/ecco/cost_readers.F 56 COST_READERS
      _RL diffsecs
./pkg/ecco/cost_readgfo.F 107 COST_READGFO
      call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/ecco/cost_readgfo.F 108 COST_READGFO
      sshrec = int(diffsecs/gfoperiod) + 1
./pkg/ecco/cost_readgfo.F 56 COST_READGFO
      _RL diffsecs
./pkg/ecco/cost_readtopex.F 107 COST_READTOPEX
      call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/ecco/cost_readtopex.F 108 COST_READTOPEX
      sshrec = int(diffsecs/topexperiod) + 1
./pkg/ecco/cost_readtopex.F 56 COST_READTOPEX
      _RL diffsecs
./pkg/ecco/cost_sla_read.F 112 COST_SLA_READ
      call CAL_TOSECONDS( difftime, diffsecs, mythid )
./pkg/ecco/cost_sla_read.F 113 COST_SLA_READ
      sshrec = int(diffsecs/sla_period) + 1
./pkg/ecco/cost_sla_read.F 53 COST_SLA_READ
      _RL diffsecs
./pkg/ecco/cost_sla_read_yd.F 54 COST_SLA_READ_YD
      _RL diffsecs