Symbol Description Uses
endrec 174



File Line number Procedure Code
./pkg/shelfice/shelfice_cost_shifwflx.F 100 SHELFICE_COST_SHIFWFLX
      endrec   = ncvarrecsend(45)
./pkg/shelfice/shelfice_cost_shifwflx.F 107 SHELFICE_COST_SHIFWFLX
      nrec = endrec-startrec+1
./pkg/shelfice/shelfice_cost_shifwflx.F 71 SHELFICE_COST_SHIFWFLX
      integer endrec
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F 111 CTRL_MAP_INI_GENTIM2D
        replicated_nrec=endrec
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F 116 CTRL_MAP_INI_GENTIM2D
            replicated_nrec=min(endrec,xx_gentim2d_preproc_i(k2,iarr))
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F 118 CTRL_MAP_INI_GENTIM2D
     &       int(float(endrec)/float(replicated_nrec))
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F 119 CTRL_MAP_INI_GENTIM2D
            if (replicated_ntimes*replicated_nrec.LT.endrec)
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F 121 CTRL_MAP_INI_GENTIM2D
            if (replicated_ntimes*replicated_nrec.GT.endrec)
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F 180 CTRL_MAP_INI_GENTIM2D
        IF (krec.LE.endrec) THEN
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F 58 CTRL_MAP_INI_GENTIM2D
      integer endrec
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F 82 CTRL_MAP_INI_GENTIM2D
       endrec=0
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F 93 CTRL_MAP_INI_GENTIM2D
     O       diffrec, startrec, endrec,
./pkg/ctrl/ctrl_cost_driver.F 42 CTRL_COST_DRIVER
      integer endrec
./pkg/ctrl/ctrl_cost_driver.F 68 CTRL_COST_DRIVER
      endrec   = ncvarrecsend(300+iarr)
./pkg/ctrl/ctrl_cost_driver.F 72 CTRL_COST_DRIVER
          endrec=min(endrec,xx_gentim2d_preproc_i(k2,iarr))
./pkg/ctrl/ctrl_cost_driver.F 77 CTRL_COST_DRIVER
     &     startrec, endrec,
./pkg/ctrl/ctrl_cost_gen.F 137 CTRL_COST_GEN2D
      nrec = endrec-startrec+1
./pkg/ctrl/ctrl_cost_gen.F 22 CTRL_COST_GEN2D
     I                       endrec,
./pkg/ctrl/ctrl_cost_gen.F 66 CTRL_COST_GEN2D
      integer endrec
./pkg/ctrl/ctrl_init.F 195 CTRL_INIT
     O     xx_hfluxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 198 CTRL_INIT
     &     xx_hflux_file, 3, 103, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 205 CTRL_INIT
     O     xx_atempstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 208 CTRL_INIT
     &     xx_atemp_file, 7, 107, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 225 CTRL_INIT
     O     xx_sfluxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 228 CTRL_INIT
     &     xx_sflux_file, 4, 104, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 235 CTRL_INIT
     O     xx_aqhstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 238 CTRL_INIT
     &     xx_aqh_file, 8, 108, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 258 CTRL_INIT
     O     xx_tauustartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 261 CTRL_INIT
     &     xx_tauu_file, 5, 105, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 286 CTRL_INIT
     O     xx_uwindstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 289 CTRL_INIT
     &     xx_uwind_file, 9, 109, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 305 CTRL_INIT
     O     xx_tauvstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 308 CTRL_INIT
     &     xx_tauv_file, 6, 106, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 333 CTRL_INIT
     O     xx_vwindstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 336 CTRL_INIT
     &     xx_vwind_file, 10, 110, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 355 CTRL_INIT
     O     xx_obcsnstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 358 CTRL_INIT
     &     xx_obcsn_file, 11, 111, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 368 CTRL_INIT
     O     xx_obcssstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 371 CTRL_INIT
     &     xx_obcss_file, 12, 112, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 381 CTRL_INIT
     O     xx_obcswstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 384 CTRL_INIT
     &     xx_obcsw_file, 13, 113, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 394 CTRL_INIT
     O     xx_obcsestartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 397 CTRL_INIT
     &     xx_obcse_file, 14, 114, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 462 CTRL_INIT
     O     xx_sststartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 465 CTRL_INIT
     &     xx_sst_file, 18, 118, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 480 CTRL_INIT
     O     xx_sssstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 483 CTRL_INIT
     &     xx_sss_file, 19, 119, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 591 CTRL_INIT
     O     xx_precipstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 594 CTRL_INIT
     &     xx_precip_file, 32, 132, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 605 CTRL_INIT
     O     xx_swfluxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 608 CTRL_INIT
     &     xx_swflux_file, 33, 133, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 619 CTRL_INIT
     O     xx_swdownstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 622 CTRL_INIT
     &     xx_swdown_file, 34, 134, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 633 CTRL_INIT
     O     xx_lwfluxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 636 CTRL_INIT
     &     xx_lwflux_file, 35, 135, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 63 CTRL_INIT
      integer endrec
./pkg/ctrl/ctrl_init.F 647 CTRL_INIT
     O     xx_lwdownstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 650 CTRL_INIT
     &     xx_lwdown_file, 36, 136, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 661 CTRL_INIT
     O     xx_evapstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 664 CTRL_INIT
     &     xx_evap_file, 37, 137, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 676 CTRL_INIT
     O     xx_snowprecipstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 679 CTRL_INIT
     &     xx_snowprecip_file, 38, 138, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 691 CTRL_INIT
     O     xx_apressurestartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 694 CTRL_INIT
     &     xx_apressure_file, 39, 139, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 705 CTRL_INIT
     O     xx_runoffstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 708 CTRL_INIT
     &     xx_runoff_file, 40, 140, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 721 CTRL_INIT
      endrec   = 1
./pkg/ctrl/ctrl_init.F 722 CTRL_INIT
      diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 724 CTRL_INIT
     &     xx_siarea_file, 41, 141, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 737 CTRL_INIT
      endrec   = 1
./pkg/ctrl/ctrl_init.F 738 CTRL_INIT
      diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 740 CTRL_INIT
     &     xx_siheff_file, 42, 142, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 753 CTRL_INIT
      endrec   = 1
./pkg/ctrl/ctrl_init.F 754 CTRL_INIT
      diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 756 CTRL_INIT
     &     xx_sihsnow_file, 43, 143, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 777 CTRL_INIT
     O     xx_shifwflxstartdate, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 780 CTRL_INIT
     &     xx_shifwflx_file, 45, 145, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 872 CTRL_INIT
     O       diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 889 CTRL_INIT
        endrecFull=endrec
./pkg/ctrl/ctrl_init.F 894 CTRL_INIT
            endrec=min(endrec,xx_gentim2d_preproc_i(k2,iarr))
./pkg/ctrl/ctrl_init.F 920 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_map_ini_gentim2d.F 101 CTRL_MAP_INI_GENTIM2D
       endrec=0
./pkg/ctrl/ctrl_map_ini_gentim2d.F 114 CTRL_MAP_INI_GENTIM2D
     O       diffrec, startrec, endrec,
./pkg/ctrl/ctrl_map_ini_gentim2d.F 150 CTRL_MAP_INI_GENTIM2D
        replicated_nrec=endrec
./pkg/ctrl/ctrl_map_ini_gentim2d.F 155 CTRL_MAP_INI_GENTIM2D
            replicated_nrec=min(endrec,xx_gentim2d_preproc_i(k2,iarr))
./pkg/ctrl/ctrl_map_ini_gentim2d.F 157 CTRL_MAP_INI_GENTIM2D
     &       int(float(endrec)/float(replicated_nrec))
./pkg/ctrl/ctrl_map_ini_gentim2d.F 158 CTRL_MAP_INI_GENTIM2D
            if (replicated_ntimes*replicated_nrec.LT.endrec)
./pkg/ctrl/ctrl_map_ini_gentim2d.F 160 CTRL_MAP_INI_GENTIM2D
            if (replicated_ntimes*replicated_nrec.GT.endrec)
./pkg/ctrl/ctrl_map_ini_gentim2d.F 172 CTRL_MAP_INI_GENTIM2D
        IF (krec.LE.endrec) THEN
./pkg/ctrl/ctrl_map_ini_gentim2d.F 192 CTRL_MAP_INI_GENTIM2D
        replicated_nrec=endrec
./pkg/ctrl/ctrl_map_ini_gentim2d.F 197 CTRL_MAP_INI_GENTIM2D
            replicated_nrec=min(endrec,xx_gentim2d_preproc_i(k2,iarr))
./pkg/ctrl/ctrl_map_ini_gentim2d.F 199 CTRL_MAP_INI_GENTIM2D
     &       int(float(endrec)/float(replicated_nrec))
./pkg/ctrl/ctrl_map_ini_gentim2d.F 200 CTRL_MAP_INI_GENTIM2D
            if (replicated_ntimes*replicated_nrec.LT.endrec)
./pkg/ctrl/ctrl_map_ini_gentim2d.F 202 CTRL_MAP_INI_GENTIM2D
            if (replicated_ntimes*replicated_nrec.GT.endrec)
./pkg/ctrl/ctrl_map_ini_gentim2d.F 214 CTRL_MAP_INI_GENTIM2D
        nyearsINT=1+int((endrec-replicated_nrec)/replicated_nrec)
./pkg/ctrl/ctrl_map_ini_gentim2d.F 261 CTRL_MAP_INI_GENTIM2D
        IF (krec.LE.endrec) THEN
./pkg/ctrl/ctrl_map_ini_gentim2d.F 292 CTRL_MAP_INI_GENTIM2D
        DO irec = 1, endrec
./pkg/ctrl/ctrl_map_ini_gentim2d.F 58 CTRL_MAP_INI_GENTIM2D
      integer endrec
./pkg/ctrl/ctrl_mask_set_xz.F 54 CTRL_MASK_SET_XZ
      integer endrec
./pkg/ctrl/ctrl_mask_set_yz.F 54 CTRL_MASK_SET_YZ
      integer endrec
./pkg/ctrl/ctrl_readparms.F 54 CTRL_READPARMS
      integer endrec
./pkg/ecco/cost_forcing.F 100 COST_FORCING
      endrec   = ncvarrecsend(7)
./pkg/ecco/cost_forcing.F 102 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 120 COST_FORCING
      endrec   = ncvarrecsend(4)
./pkg/ecco/cost_forcing.F 122 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 138 COST_FORCING
      endrec   = ncvarrecsend(8)
./pkg/ecco/cost_forcing.F 140 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 159 COST_FORCING
      endrec   = ncvarrecsend(5)
./pkg/ecco/cost_forcing.F 161 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 180 COST_FORCING
      endrec   = ncvarrecsend(9)
./pkg/ecco/cost_forcing.F 182 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 201 COST_FORCING
      endrec   = ncvarrecsend(6)
./pkg/ecco/cost_forcing.F 203 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 222 COST_FORCING
      endrec   = ncvarrecsend(10)
./pkg/ecco/cost_forcing.F 224 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 243 COST_FORCING
      endrec   = ncvarrecsend(32)
./pkg/ecco/cost_forcing.F 245 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 263 COST_FORCING
      endrec   = ncvarrecsend(33)
./pkg/ecco/cost_forcing.F 265 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 283 COST_FORCING
      endrec   = ncvarrecsend(34)
./pkg/ecco/cost_forcing.F 285 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 303 COST_FORCING
      endrec   = ncvarrecsend(35)
./pkg/ecco/cost_forcing.F 305 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 323 COST_FORCING
      endrec   = ncvarrecsend(36)
./pkg/ecco/cost_forcing.F 325 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 343 COST_FORCING
      endrec   = ncvarrecsend(37)
./pkg/ecco/cost_forcing.F 345 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 362 COST_FORCING
      endrec   = ncvarrecsend(38)
./pkg/ecco/cost_forcing.F 364 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 381 COST_FORCING
      endrec   = ncvarrecsend(39)
./pkg/ecco/cost_forcing.F 383 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 400 COST_FORCING
      endrec   = ncvarrecsend(40)
./pkg/ecco/cost_forcing.F 402 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_forcing.F 63 COST_FORCING
      integer endrec
./pkg/ecco/cost_forcing.F 82 COST_FORCING
      endrec   = ncvarrecsend(3)
./pkg/ecco/cost_forcing.F 84 COST_FORCING
     &     startrec, endrec,
./pkg/ecco/cost_obcs.F 55 COST_OBCS
      integer endrec
./pkg/ecco/cost_obcs.F 64 COST_OBCS
      endrec   = ncvarrecsend(11 )
./pkg/ecco/cost_obcs.F 66 COST_OBCS
     &                   startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 73 COST_OBCS
      endrec   = ncvarrecsend(12 )
./pkg/ecco/cost_obcs.F 75 COST_OBCS
     &                   startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 82 COST_OBCS
      endrec   = ncvarrecsend(13 )
./pkg/ecco/cost_obcs.F 84 COST_OBCS
     &                   startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 91 COST_OBCS
      endrec   = ncvarrecsend(14 )
./pkg/ecco/cost_obcs.F 93 COST_OBCS
     &                  startrec,endrec, mythid )
./pkg/ecco/cost_obcs.F 99 COST_OBCS
     &                    startrec, endrec, mythid)
./pkg/ecco/cost_obcse.F 125 COST_OBCSE
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcse.F 16 COST_OBCSE
     I                       endrec,
./pkg/ecco/cost_obcse.F 64 COST_OBCSE
      integer endrec
./pkg/ecco/cost_obcsn.F 123 COST_OBCSN
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsn.F 16 COST_OBCSN
     I                       endrec,
./pkg/ecco/cost_obcsn.F 64 COST_OBCSN
      integer endrec
./pkg/ecco/cost_obcss.F 123 COST_OBCSS
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcss.F 16 COST_OBCSS
     I                       endrec,
./pkg/ecco/cost_obcss.F 64 COST_OBCSS
      integer endrec
./pkg/ecco/cost_obcsvol.F 129 COST_OBCSVOL
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsvol.F 13 COST_OBCSVOL
     I                       endrec,
./pkg/ecco/cost_obcsvol.F 58 COST_OBCSVOL
      integer endrec
./pkg/ecco/cost_obcsw.F 123 COST_OBCSW
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsw.F 16 COST_OBCSW
     I                       endrec,
./pkg/ecco/cost_obcsw.F 64 COST_OBCSW
      integer endrec