Symbol Description Uses
endrec 172


File Line number Procedure Code
./pkg/ctrl/ctrl_init.F 1004 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 1005 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 1007 CTRL_INIT 
     &       xx_runoff_file, 40, 140, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 1015 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 1016 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 1018 CTRL_INIT 
     &       xx_siarea_file, 41, 141, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 101 CTRL_INIT 
      integer endrec
./pkg/ctrl/ctrl_init.F 1026 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 1027 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 1029 CTRL_INIT 
     &       xx_siheff_file, 42, 142, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 1037 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 1038 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 1040 CTRL_INIT 
     &       xx_sihsnow_file, 43, 143, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 204 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 208 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 213 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 215 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 217 CTRL_INIT 
     &       xx_hflux_file, 3, 103, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 231 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 235 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 240 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 242 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 244 CTRL_INIT 
     &       xx_atemp_file, 7, 107, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 268 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 272 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 277 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 279 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 281 CTRL_INIT 
     &       xx_sflux_file, 4, 104, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 295 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 299 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_aqh_file, 8, 108, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 332 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 336 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 341 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 343 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 345 CTRL_INIT 
     &       xx_tauu_file, 5, 105, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 363 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 367 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 372 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 374 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 376 CTRL_INIT 
     &       xx_uwind_file, 9, 109, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 400 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 404 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 409 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 411 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 413 CTRL_INIT 
     &       xx_tauv_file, 6, 106, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 431 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 435 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 440 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 442 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 444 CTRL_INIT 
     &       xx_vwind_file, 10, 110, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 472 CTRL_INIT 
        endrec   = int((modelend   - diffsecs)/xx_obcsnperiod) + 2
./pkg/ctrl/ctrl_init.F 473 CTRL_INIT 
        endrec   = (endrec - startrec + 1)*nobcs
./pkg/ctrl/ctrl_init.F 476 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 478 CTRL_INIT 
        diffrec  = endrec
./pkg/ctrl/ctrl_init.F 480 CTRL_INIT 
     &       xx_obcsn_file, 11, 111, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 498 CTRL_INIT 
        endrec   = int((modelend   - diffsecs)/xx_obcssperiod) + 2
./pkg/ctrl/ctrl_init.F 499 CTRL_INIT 
        endrec   = (endrec - startrec + 1)*nobcs
./pkg/ctrl/ctrl_init.F 502 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 504 CTRL_INIT 
        diffrec  = endrec
./pkg/ctrl/ctrl_init.F 506 CTRL_INIT 
     &       xx_obcss_file, 12, 112, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 524 CTRL_INIT 
        endrec   = int((modelend   - diffsecs)/xx_obcswperiod) + 2
./pkg/ctrl/ctrl_init.F 525 CTRL_INIT 
        endrec   = (endrec - startrec + 1)*nobcs
./pkg/ctrl/ctrl_init.F 528 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 530 CTRL_INIT 
        diffrec  = endrec
./pkg/ctrl/ctrl_init.F 532 CTRL_INIT 
     &       xx_obcsw_file, 13, 113, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 550 CTRL_INIT 
        endrec   = int((modelend   - diffsecs)/xx_obcseperiod) + 2
./pkg/ctrl/ctrl_init.F 551 CTRL_INIT 
        endrec   = (endrec - startrec + 1)*nobcs
./pkg/ctrl/ctrl_init.F 554 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 556 CTRL_INIT 
        diffrec  = endrec
./pkg/ctrl/ctrl_init.F 558 CTRL_INIT 
     &       xx_obcse_file, 14, 114, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 599 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 603 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 608 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 610 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 612 CTRL_INIT 
     &       xx_sst_file, 18, 118, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 635 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 639 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 644 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 646 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 648 CTRL_INIT 
     &       xx_sss_file, 19, 119, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 764 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 768 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 773 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 775 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 777 CTRL_INIT 
     &       xx_precip_file, 32, 132, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 795 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 799 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 804 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 806 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 808 CTRL_INIT 
     &       xx_swflux_file, 33, 133, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 826 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 830 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 835 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 837 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 839 CTRL_INIT 
     &       xx_swdown_file, 34, 134, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 857 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 861 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 866 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 868 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 870 CTRL_INIT 
     &       xx_lwflux_file, 35, 135, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 888 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 892 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 897 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 899 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 901 CTRL_INIT 
     &       xx_lwdown_file, 36, 136, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 919 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 923 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 928 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 930 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 932 CTRL_INIT 
     &       xx_evap_file, 37, 137, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 950 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 954 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 959 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 961 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 963 CTRL_INIT 
     &       xx_snowprecip_file, 38, 138, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_init.F 981 CTRL_INIT 
        endrec=12
./pkg/ctrl/ctrl_init.F 985 CTRL_INIT 
        endrec   = int((modelend + startTime - diffsecs + modelstep/2)/
./pkg/ctrl/ctrl_init.F 990 CTRL_INIT 
        endrec   = 1
./pkg/ctrl/ctrl_init.F 992 CTRL_INIT 
        diffrec  = endrec - startrec + 1
./pkg/ctrl/ctrl_init.F 994 CTRL_INIT 
     &       xx_apressure_file, 39, 139, diffrec, startrec, endrec,
./pkg/ctrl/ctrl_mask_set_xz.F 57 CTRL_MASK_SET_XZ 
      integer endrec
./pkg/ctrl/ctrl_mask_set_yz.F 57 CTRL_MASK_SET_YZ 
      integer endrec
./pkg/ctrl/ctrl_readparms.F 53 CTRL_READPARMS 
      integer endrec
./pkg/ecco/cost_forcing.F 102 COST_FORCING 
      endrec   = ncvarrecsend(8)
./pkg/ecco/cost_forcing.F 104 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 117 COST_FORCING 
      endrec   = ncvarrecsend(5)
./pkg/ecco/cost_forcing.F 119 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 130 COST_FORCING 
      endrec   = ncvarrecsend(9)
./pkg/ecco/cost_forcing.F 132 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 145 COST_FORCING 
      endrec   = ncvarrecsend(6)
./pkg/ecco/cost_forcing.F 147 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 158 COST_FORCING 
      endrec   = ncvarrecsend(10)
./pkg/ecco/cost_forcing.F 160 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 173 COST_FORCING 
      endrec   = ncvarrecsend(32)
./pkg/ecco/cost_forcing.F 175 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 188 COST_FORCING 
      endrec   = ncvarrecsend(33)
./pkg/ecco/cost_forcing.F 190 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 203 COST_FORCING 
      endrec   = ncvarrecsend(34)
./pkg/ecco/cost_forcing.F 205 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 218 COST_FORCING 
      endrec   = ncvarrecsend(35)
./pkg/ecco/cost_forcing.F 220 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 233 COST_FORCING 
      endrec   = ncvarrecsend(36)
./pkg/ecco/cost_forcing.F 235 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 248 COST_FORCING 
      endrec   = ncvarrecsend(36)
./pkg/ecco/cost_forcing.F 250 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 263 COST_FORCING 
      endrec   = ncvarrecsend(36)
./pkg/ecco/cost_forcing.F 265 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 278 COST_FORCING 
      endrec   = ncvarrecsend(36)
./pkg/ecco/cost_forcing.F 280 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 293 COST_FORCING 
      endrec   = ncvarrecsend(36)
./pkg/ecco/cost_forcing.F 295 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 51 COST_FORCING 
      integer endrec
./pkg/ecco/cost_forcing.F 61 COST_FORCING 
      endrec   = ncvarrecsend(3)
./pkg/ecco/cost_forcing.F 63 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 74 COST_FORCING 
      endrec   = ncvarrecsend(7)
./pkg/ecco/cost_forcing.F 76 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing.F 89 COST_FORCING 
      endrec   = ncvarrecsend(4)
./pkg/ecco/cost_forcing.F 91 COST_FORCING 
     &     myiter, mytime, startrec, endrec,
./pkg/ecco/cost_forcing_gen.F 11 COST_FORCING_GEN 
     I                       endrec,
./pkg/ecco/cost_forcing_gen.F 125 COST_FORCING_GEN 
      nrec = endrec-startrec+1
./pkg/ecco/cost_forcing_gen.F 57 COST_FORCING_GEN 
      integer endrec
./pkg/ecco/cost_obcsvol.F 113 COST_OBCSVOL 
      nrec = endrec-startrec+1
./pkg/ecco/cost_obcsvol.F 13 COST_OBCSVOL 
     I                       endrec,
./pkg/ecco/cost_obcsvol.F 52 COST_OBCSVOL 
      integer endrec
./pkg/ecco/cost_usercost_all.F 42 COST_USERCOST_ALL 
      integer endrec