Symbol Description Uses
endrec 144



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 65 SHELFICE_COST_SHIFWFLX
      integer endrec
./pkg/shelfice/shelfice_cost_shifwflx.F 94 SHELFICE_COST_SHIFWFLX
      endrec   = ncvarrecsend(45)
./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 577 CTRL_INIT
     O     xx_swdownstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 57 CTRL_INIT
      integer 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 679 CTRL_INIT
      endrec   = 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 695 CTRL_INIT
      endrec   = 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 711 CTRL_INIT
      endrec   = 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 103 CTRL_INIT_REC
       endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init_rec.F 108 CTRL_INIT_REC
        endrec   = endrec*nfac
./pkg/ctrl/ctrl_init_rec.F 112 CTRL_INIT_REC
       endrec   = (int((endTime - startTime)/fldperiod) + 1)*nfac
./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 57 CTRL_INIT_REC
      integer endrec
./pkg/ctrl/ctrl_init_rec.F 86 CTRL_INIT_REC
      endrec   = 0
./pkg/ctrl/ctrl_init_rec.F 90 CTRL_INIT_REC
       endrec   = 12*nfac
./pkg/ctrl/ctrl_init_rec.F 93 CTRL_INIT_REC
       endrec   = 1*nfac
./pkg/ctrl/ctrl_mask_set_xz.F 53 CTRL_MASK_SET_XZ
      integer endrec
./pkg/ctrl/ctrl_mask_set_yz.F 53 CTRL_MASK_SET_YZ
      integer endrec
./pkg/ctrl/ctrl_readparms.F 48 CTRL_READPARMS
      integer endrec
./pkg/ecco/cost_forcing.F 100 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 111 COST_FORCING
      endrec   = ncvarrecsend(8)
./pkg/ecco/cost_forcing.F 113 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 127 COST_FORCING
      endrec   = ncvarrecsend(5)
./pkg/ecco/cost_forcing.F 129 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 144 COST_FORCING
      endrec   = ncvarrecsend(9)
./pkg/ecco/cost_forcing.F 146 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 161 COST_FORCING
      endrec   = ncvarrecsend(6)
./pkg/ecco/cost_forcing.F 163 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 178 COST_FORCING
      endrec   = ncvarrecsend(10)
./pkg/ecco/cost_forcing.F 180 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 194 COST_FORCING
      endrec   = ncvarrecsend(32)
./pkg/ecco/cost_forcing.F 196 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 209 COST_FORCING
      endrec   = ncvarrecsend(33)
./pkg/ecco/cost_forcing.F 211 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 224 COST_FORCING
      endrec   = ncvarrecsend(34)
./pkg/ecco/cost_forcing.F 226 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 239 COST_FORCING
      endrec   = ncvarrecsend(35)
./pkg/ecco/cost_forcing.F 241 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 254 COST_FORCING
      endrec   = ncvarrecsend(36)
./pkg/ecco/cost_forcing.F 256 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 269 COST_FORCING
      endrec   = ncvarrecsend(37)
./pkg/ecco/cost_forcing.F 271 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 284 COST_FORCING
      endrec   = ncvarrecsend(38)
./pkg/ecco/cost_forcing.F 286 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 299 COST_FORCING
      endrec   = ncvarrecsend(39)
./pkg/ecco/cost_forcing.F 301 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 314 COST_FORCING
      endrec   = ncvarrecsend(40)
./pkg/ecco/cost_forcing.F 316 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 55 COST_FORCING
      integer endrec
./pkg/ecco/cost_forcing.F 70 COST_FORCING
      endrec   = ncvarrecsend(3)
./pkg/ecco/cost_forcing.F 72 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 83 COST_FORCING
      endrec   = ncvarrecsend(7)
./pkg/ecco/cost_forcing.F 85 COST_FORCING
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 98 COST_FORCING
      endrec   = ncvarrecsend(4)
./pkg/ecco/cost_forcing_gen.F 11 COST_FORCING_GEN
     I                       endrec,
./pkg/ecco/cost_forcing_gen.F 124 COST_FORCING_GEN
      nrec = endrec-startrec+1
./pkg/ecco/cost_forcing_gen.F 56 COST_FORCING_GEN
      integer endrec
./pkg/ecco/cost_genctrl.F 46 COST_GENCTRL
      integer endrec
./pkg/ecco/cost_genctrl.F 60 COST_GENCTRL
      endrec   = ncvarrecsend(300+iarr)
./pkg/ecco/cost_genctrl.F 62 COST_GENCTRL
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_obcs.F 46 COST_OBCS
      integer endrec
./pkg/ecco/cost_obcs.F 55 COST_OBCS
      endrec   = ncvarrecsend(11 )
./pkg/ecco/cost_obcs.F 57 COST_OBCS
     &                   startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 64 COST_OBCS
      endrec   = ncvarrecsend(12 )
./pkg/ecco/cost_obcs.F 66 COST_OBCS
     &                   startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 73 COST_OBCS
      endrec   = ncvarrecsend(13 )
./pkg/ecco/cost_obcs.F 75 COST_OBCS
     &                   startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 82 COST_OBCS
      endrec   = ncvarrecsend(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 13 COST_OBCSE
     I                       endrec,
./pkg/ecco/cost_obcse.F 57 COST_OBCSE
      integer endrec
./pkg/ecco/cost_obcsn.F 114 COST_OBCSN
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsn.F 13 COST_OBCSN
     I                       endrec,
./pkg/ecco/cost_obcsn.F 57 COST_OBCSN
      integer endrec
./pkg/ecco/cost_obcss.F 114 COST_OBCSS
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcss.F 13 COST_OBCSS
     I                       endrec,
./pkg/ecco/cost_obcss.F 57 COST_OBCSS
      integer endrec
./pkg/ecco/cost_obcsvol.F 10 COST_OBCSVOL
     I                       endrec,
./pkg/ecco/cost_obcsvol.F 118 COST_OBCSVOL
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsvol.F 49 COST_OBCSVOL
      integer endrec
./pkg/ecco/cost_obcsw.F 114 COST_OBCSW
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsw.F 13 COST_OBCSW
     I                       endrec,
./pkg/ecco/cost_obcsw.F 57 COST_OBCSW
      integer endrec
./pkg/ecco/cost_usercost_all.F 41 COST_USERCOST_ALL
      integer endrec