Symbol Description Uses
startrec 148



File Line number Procedure Code
./pkg/shelfice/shelfice_cost_shifwflx.F 101 SHELFICE_COST_SHIFWFLX
      nrec = endrec-startrec+1
./pkg/shelfice/shelfice_cost_shifwflx.F 64 SHELFICE_COST_SHIFWFLX
      integer startrec
./pkg/shelfice/shelfice_cost_shifwflx.F 93 SHELFICE_COST_SHIFWFLX
      startrec = ncvarrecstart(45)
./pkg/ctrl/ctrl_get_gen_rec.F 136 CTRL_GET_GEN_REC
       startrec = int((modelstart + startTime - fldsecs)/
./pkg/ctrl/ctrl_get_gen_rec.F 170 CTRL_GET_GEN_REC
       count0 = fldcount - startrec + 1
./pkg/ctrl/ctrl_get_gen_rec.F 171 CTRL_GET_GEN_REC
       count1 = fldcount - startrec + 2
./pkg/ctrl/ctrl_get_gen_rec.F 73 CTRL_GET_GEN_REC
      integer startrec
./pkg/ctrl/ctrl_init.F 157 CTRL_INIT
     O     xx_hfluxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 160 CTRL_INIT
     &     xx_hflux_file, 3, 103, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 167 CTRL_INIT
     O     xx_atempstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 170 CTRL_INIT
     &     xx_atemp_file, 7, 107, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 187 CTRL_INIT
     O     xx_sfluxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 190 CTRL_INIT
     &     xx_sflux_file, 4, 104, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 197 CTRL_INIT
     O     xx_aqhstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 200 CTRL_INIT
     &     xx_aqh_file, 8, 108, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 220 CTRL_INIT
     O     xx_tauustartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 223 CTRL_INIT
     &     xx_tauu_file, 5, 105, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 248 CTRL_INIT
     O     xx_uwindstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 251 CTRL_INIT
     &     xx_uwind_file, 9, 109, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 267 CTRL_INIT
     O     xx_tauvstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 270 CTRL_INIT
     &     xx_tauv_file, 6, 106, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 295 CTRL_INIT
     O     xx_vwindstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 298 CTRL_INIT
     &     xx_vwind_file, 10, 110, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 315 CTRL_INIT
     O     xx_obcsnstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 318 CTRL_INIT
     &     xx_obcsn_file, 11, 111, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 328 CTRL_INIT
     O     xx_obcssstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 331 CTRL_INIT
     &     xx_obcss_file, 12, 112, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 341 CTRL_INIT
     O     xx_obcswstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 344 CTRL_INIT
     &     xx_obcsw_file, 13, 113, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 354 CTRL_INIT
     O     xx_obcsestartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 357 CTRL_INIT
     &     xx_obcse_file, 14, 114, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 420 CTRL_INIT
     O     xx_sststartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 423 CTRL_INIT
     &     xx_sst_file, 18, 118, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 438 CTRL_INIT
     O     xx_sssstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 441 CTRL_INIT
     &     xx_sss_file, 19, 119, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 549 CTRL_INIT
     O     xx_precipstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 552 CTRL_INIT
     &     xx_precip_file, 32, 132, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 563 CTRL_INIT
     O     xx_swfluxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 566 CTRL_INIT
     &     xx_swflux_file, 33, 133, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 56 CTRL_INIT
      integer startrec
./pkg/ctrl/ctrl_init.F 577 CTRL_INIT
     O     xx_swdownstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 580 CTRL_INIT
     &     xx_swdown_file, 34, 134, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 591 CTRL_INIT
     O     xx_lwfluxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 594 CTRL_INIT
     &     xx_lwflux_file, 35, 135, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 605 CTRL_INIT
     O     xx_lwdownstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 608 CTRL_INIT
     &     xx_lwdown_file, 36, 136, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 619 CTRL_INIT
     O     xx_evapstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 622 CTRL_INIT
     &     xx_evap_file, 37, 137, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 634 CTRL_INIT
     O     xx_snowprecipstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 637 CTRL_INIT
     &     xx_snowprecip_file, 38, 138, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 649 CTRL_INIT
     O     xx_apressurestartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 652 CTRL_INIT
     &     xx_apressure_file, 39, 139, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 663 CTRL_INIT
     O     xx_runoffstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 666 CTRL_INIT
     &     xx_runoff_file, 40, 140, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 678 CTRL_INIT
      startrec = 1
./pkg/ctrl/ctrl_init.F 680 CTRL_INIT
      diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 682 CTRL_INIT
     &     xx_siarea_file, 41, 141, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 694 CTRL_INIT
      startrec = 1
./pkg/ctrl/ctrl_init.F 696 CTRL_INIT
      diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 698 CTRL_INIT
     &     xx_siheff_file, 42, 142, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 710 CTRL_INIT
      startrec = 1
./pkg/ctrl/ctrl_init.F 712 CTRL_INIT
      diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 714 CTRL_INIT
     &     xx_sihsnow_file, 43, 143, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 735 CTRL_INIT
     O     xx_shifwflxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 738 CTRL_INIT
     &     xx_shifwflx_file, 45, 145, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 814 CTRL_INIT
     O       diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 820 CTRL_INIT
     &       diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init_rec.F 101 CTRL_INIT_REC
       startrec = int((modelstart + startTime - diffsecs)/
./pkg/ctrl/ctrl_init_rec.F 107 CTRL_INIT_REC
        startrec = (startrec - 1)*nfac + 1
./pkg/ctrl/ctrl_init_rec.F 111 CTRL_INIT_REC
       startrec = 1
./pkg/ctrl/ctrl_init_rec.F 115 CTRL_INIT_REC
      diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init_rec.F 11 CTRL_INIT_REC
     O     fldstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init_rec.F 123 CTRL_INIT_REC
     &      'CTRL_INIT_REC: startrec = ',startrec,', endrec = ',endrec
./pkg/ctrl/ctrl_init_rec.F 56 CTRL_INIT_REC
      integer startrec
./pkg/ctrl/ctrl_init_rec.F 85 CTRL_INIT_REC
      startrec = 0
./pkg/ctrl/ctrl_init_rec.F 89 CTRL_INIT_REC
       startrec = 1
./pkg/ctrl/ctrl_init_rec.F 92 CTRL_INIT_REC
       startrec = 1
./pkg/ctrl/ctrl_mask_set_xz.F 52 CTRL_MASK_SET_XZ
      integer startrec
./pkg/ctrl/ctrl_mask_set_yz.F 52 CTRL_MASK_SET_YZ
      integer startrec
./pkg/ctrl/ctrl_readparms.F 47 CTRL_READPARMS
      integer startrec
./pkg/ecco/cost_forcing.F 100 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 110 COST_FORCING
      startrec = ncvarrecstart(8)
./pkg/ecco/cost_forcing.F 113 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 126 COST_FORCING
      startrec = ncvarrecstart(5)
./pkg/ecco/cost_forcing.F 129 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 143 COST_FORCING
      startrec = ncvarrecstart(9)
./pkg/ecco/cost_forcing.F 146 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 160 COST_FORCING
      startrec = ncvarrecstart(6)
./pkg/ecco/cost_forcing.F 163 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 177 COST_FORCING
      startrec = ncvarrecstart(10)
./pkg/ecco/cost_forcing.F 180 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 193 COST_FORCING
      startrec = ncvarrecstart(32)
./pkg/ecco/cost_forcing.F 196 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 208 COST_FORCING
      startrec = ncvarrecstart(33)
./pkg/ecco/cost_forcing.F 211 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 223 COST_FORCING
      startrec = ncvarrecstart(34)
./pkg/ecco/cost_forcing.F 226 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 238 COST_FORCING
      startrec = ncvarrecstart(35)
./pkg/ecco/cost_forcing.F 241 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 253 COST_FORCING
      startrec = ncvarrecstart(36)
./pkg/ecco/cost_forcing.F 256 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 268 COST_FORCING
      startrec = ncvarrecstart(37)
./pkg/ecco/cost_forcing.F 271 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 283 COST_FORCING
      startrec = ncvarrecstart(38)
./pkg/ecco/cost_forcing.F 286 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 298 COST_FORCING
      startrec = ncvarrecstart(39)
./pkg/ecco/cost_forcing.F 301 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 313 COST_FORCING
      startrec = ncvarrecstart(40)
./pkg/ecco/cost_forcing.F 316 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 54 COST_FORCING
      integer startrec
./pkg/ecco/cost_forcing.F 69 COST_FORCING
      startrec = ncvarrecstart(3)
./pkg/ecco/cost_forcing.F 72 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 82 COST_FORCING
      startrec = ncvarrecstart(7)
./pkg/ecco/cost_forcing.F 85 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 97 COST_FORCING
      startrec = ncvarrecstart(4)
./pkg/ecco/cost_forcing_gen.F 10 COST_FORCING_GEN
     I                       startrec,
./pkg/ecco/cost_forcing_gen.F 124 COST_FORCING_GEN
      nrec = endrec-startrec+1
./pkg/ecco/cost_forcing_gen.F 55 COST_FORCING_GEN
      integer startrec
./pkg/ecco/cost_genctrl.F 45 COST_GENCTRL
      integer startrec
./pkg/ecco/cost_genctrl.F 59 COST_GENCTRL
      startrec = ncvarrecstart(300+iarr)
./pkg/ecco/cost_genctrl.F 62 COST_GENCTRL
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_obcs.F 45 COST_OBCS
      integer startrec
./pkg/ecco/cost_obcs.F 54 COST_OBCS
      startrec = ncvarrecstart(11 )
./pkg/ecco/cost_obcs.F 57 COST_OBCS
     &                   startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 63 COST_OBCS
      startrec = ncvarrecstart(12 )
./pkg/ecco/cost_obcs.F 66 COST_OBCS
     &                   startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 72 COST_OBCS
      startrec = ncvarrecstart(13 )
./pkg/ecco/cost_obcs.F 75 COST_OBCS
     &                   startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 81 COST_OBCS
      startrec = ncvarrecstart(14 )
./pkg/ecco/cost_obcs.F 84 COST_OBCS
     &                  startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 90 COST_OBCS
     &                    startrec, endrec, mythid)
./pkg/ecco/cost_obcse.F 116 COST_OBCSE
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcse.F 12 COST_OBCSE
     I                       startrec,
./pkg/ecco/cost_obcse.F 56 COST_OBCSE
      integer startrec
./pkg/ecco/cost_obcsn.F 114 COST_OBCSN
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsn.F 12 COST_OBCSN
     I                       startrec,
./pkg/ecco/cost_obcsn.F 56 COST_OBCSN
      integer startrec
./pkg/ecco/cost_obcss.F 114 COST_OBCSS
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcss.F 12 COST_OBCSS
     I                       startrec,
./pkg/ecco/cost_obcss.F 56 COST_OBCSS
      integer startrec
./pkg/ecco/cost_obcsvol.F 118 COST_OBCSVOL
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsvol.F 48 COST_OBCSVOL
      integer startrec
./pkg/ecco/cost_obcsvol.F 9 COST_OBCSVOL
     I                       startrec,
./pkg/ecco/cost_obcsw.F 114 COST_OBCSW
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsw.F 12 COST_OBCSW
     I                       startrec,
./pkg/ecco/cost_obcsw.F 56 COST_OBCSW
      integer startrec
./pkg/ecco/cost_usercost_all.F 40 COST_USERCOST_ALL
      integer startrec