Symbol Description Uses
endrec 105



File Line number Procedure Code
./pkg/ecco/cost_atemp.F 41 COST_ATEMP
      integer endrec
./pkg/ecco/cost_atemp.F 88 COST_ATEMP
      nrec = endrec-startrec+1
./pkg/ecco/cost_atemp.F 9 COST_ATEMP
     I                           endrec,
./pkg/ecco/cost_heatflux.F 101 COST_HEATFLUX
      nrec = endrec-startrec+1
./pkg/ecco/cost_heatflux.F 10 COST_HEATFLUX
     I                           endrec,
./pkg/ecco/cost_heatflux.F 49 COST_HEATFLUX
      integer endrec
./pkg/ecco/cost_uwind.F 41 COST_UWIND
      integer endrec
./pkg/ecco/cost_uwind.F 88 COST_UWIND
      nrec = endrec-startrec+1
./pkg/ecco/cost_uwind.F 9 COST_UWIND
     I                           endrec,
./pkg/ecco/cost_forcing.F 101 COST_FORCING
     &                 startrec, endrec, mythid )
./pkg/ecco/cost_forcing.F 108 COST_FORCING
      endrec   = ncvarrecsend(6)
./pkg/ecco/cost_forcing.F 110 COST_FORCING
     &                     startrec, endrec, mythid )
./pkg/ecco/cost_forcing.F 115 COST_FORCING
      endrec   = ncvarrecsend(10)
./pkg/ecco/cost_forcing.F 117 COST_FORCING
     &                     startrec, endrec, mythid )
./pkg/ecco/cost_forcing.F 50 COST_FORCING
      integer endrec
./pkg/ecco/cost_forcing.F 60 COST_FORCING
      endrec   = ncvarrecsend(3)
./pkg/ecco/cost_forcing.F 62 COST_FORCING
     &                     startrec, endrec, mythid )
./pkg/ecco/cost_forcing.F 67 COST_FORCING
      endrec   = ncvarrecsend(7)
./pkg/ecco/cost_forcing.F 69 COST_FORCING
     &                  startrec, endrec, mythid )
./pkg/ecco/cost_forcing.F 76 COST_FORCING
      endrec   = ncvarrecsend(4)
./pkg/ecco/cost_forcing.F 78 COST_FORCING
     &                     startrec, endrec, mythid )
./pkg/ecco/cost_forcing.F 83 COST_FORCING
      endrec   = ncvarrecsend(8)
./pkg/ecco/cost_forcing.F 85 COST_FORCING
     &                startrec, endrec, mythid )
./pkg/ecco/cost_forcing.F 92 COST_FORCING
      endrec   = ncvarrecsend(5)
./pkg/ecco/cost_forcing.F 94 COST_FORCING
     &                     startrec, endrec, mythid )
./pkg/ecco/cost_forcing.F 99 COST_FORCING
      endrec   = ncvarrecsend(9)
./pkg/ecco/cost_zonstress.F 101 COST_ZONSTRESS
      nrec = endrec-startrec+1
./pkg/ecco/cost_zonstress.F 10 COST_ZONSTRESS
     I                           endrec,
./pkg/ecco/cost_zonstress.F 49 COST_ZONSTRESS
      integer endrec
./pkg/ecco/cost_obcsvol.F 111 COST_OBCSVOL
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsvol.F 11 COST_OBCSVOL
     I                       endrec,
./pkg/ecco/cost_obcsvol.F 50 COST_OBCSVOL
      integer endrec
./pkg/ecco/cost_saltflux.F 101 COST_SALTFLUX
      nrec = endrec-startrec+1
./pkg/ecco/cost_saltflux.F 10 COST_SALTFLUX
     I                           endrec,
./pkg/ecco/cost_saltflux.F 49 COST_SALTFLUX
      integer endrec
./pkg/ecco/cost_aqh.F 41 COST_AQH
      integer endrec
./pkg/ecco/cost_aqh.F 88 COST_AQH
      nrec = endrec-startrec+1
./pkg/ecco/cost_aqh.F 9 COST_AQH
     I                           endrec,
./pkg/ecco/cost_merstress.F 101 COST_MERSTRESS
      nrec = endrec-startrec+1
./pkg/ecco/cost_merstress.F 10 COST_MERSTRESS
     I                           endrec,
./pkg/ecco/cost_merstress.F 49 COST_MERSTRESS
      integer endrec
./pkg/ecco/cost_vwind.F 41 COST_VWIND
      integer endrec
./pkg/ecco/cost_vwind.F 88 COST_VWIND
      nrec = endrec-startrec+1
./pkg/ecco/cost_vwind.F 9 COST_VWIND
     I                           endrec,
./pkg/ctrl/ctrl_mask_set_yz.F 55 CTRL_MASK_SET_YZ
      integer endrec
./pkg/ctrl/ctrl_init.F 170 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 174 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 176 CTRL_INIT
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 178 CTRL_INIT
     &       xx_hflux_file, 3, 103, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 192 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 196 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 198 CTRL_INIT
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 200 CTRL_INIT
     &       xx_atemp_file, 7, 107, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 224 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 228 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 230 CTRL_INIT
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 232 CTRL_INIT
     &       xx_sflux_file, 4, 104, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 246 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 250 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 252 CTRL_INIT
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 254 CTRL_INIT
     &       xx_aqh_file, 8, 108, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 278 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 282 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 284 CTRL_INIT
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 286 CTRL_INIT
     &       xx_tauu_file, 5, 105, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 300 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 304 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 306 CTRL_INIT
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 308 CTRL_INIT
     &       xx_uwind_file, 9, 109, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 332 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 336 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 338 CTRL_INIT
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 340 CTRL_INIT
     &       xx_tauv_file, 6, 106, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 354 CTRL_INIT
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 358 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 360 CTRL_INIT
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 362 CTRL_INIT
     &       xx_vwind_file, 10, 110, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 367 CTRL_INIT
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 391 CTRL_INIT
        endrec   = int((modelend   - diffsecs)/xx_obcsnperiod) + 2
./pkg/ctrl/ctrl_init.F 392 CTRL_INIT
        endrec   = (endrec - startrec + 1)*nobcs
./pkg/ctrl/ctrl_init.F 395 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 397 CTRL_INIT
        diffrec  = endrec
./pkg/ctrl/ctrl_init.F 399 CTRL_INIT
     &       xx_obcsn_file, 11, 111, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 417 CTRL_INIT
        endrec   = int((modelend   - diffsecs)/xx_obcssperiod) + 2
./pkg/ctrl/ctrl_init.F 418 CTRL_INIT
        endrec   = (endrec - startrec + 1)*nobcs
./pkg/ctrl/ctrl_init.F 421 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 423 CTRL_INIT
        diffrec  = endrec
./pkg/ctrl/ctrl_init.F 425 CTRL_INIT
     &       xx_obcss_file, 12, 112, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 443 CTRL_INIT
        endrec   = int((modelend   - diffsecs)/xx_obcswperiod) + 2
./pkg/ctrl/ctrl_init.F 444 CTRL_INIT
        endrec   = (endrec - startrec + 1)*nobcs
./pkg/ctrl/ctrl_init.F 447 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 449 CTRL_INIT
        diffrec  = endrec
./pkg/ctrl/ctrl_init.F 451 CTRL_INIT
     &       xx_obcsw_file, 13, 113, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 469 CTRL_INIT
        endrec   = int((modelend   - diffsecs)/xx_obcseperiod) + 2
./pkg/ctrl/ctrl_init.F 470 CTRL_INIT
        endrec   = (endrec - startrec + 1)*nobcs
./pkg/ctrl/ctrl_init.F 473 CTRL_INIT
        endrec   = 1
./pkg/ctrl/ctrl_init.F 475 CTRL_INIT
        diffrec  = endrec
./pkg/ctrl/ctrl_init.F 477 CTRL_INIT
     &       xx_obcse_file, 14, 114, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 92 CTRL_INIT
      integer endrec
./pkg/ctrl/ctrl_readparms.F 53 CTRL_READPARMS
      integer endrec
./pkg/ctrl/ctrl_mask_set_xz.F 55 CTRL_MASK_SET_XZ
      integer endrec