Symbol Description Uses
year0 year of forcing file for record preceding mytime 73



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 736 TIC_TIME
        year0=testnymd/10000
./pkg/fizhi/fizhi_clockstuff.F 740 TIC_TIME
        if( month0.eq.2  .and. mod(year0,4).eq.0) testndpm = 29
./pkg/fizhi/fizhi_clockstuff.F 754 TIC_TIME
         year0 = year0 + 1
./pkg/fizhi/fizhi_clockstuff.F 758 TIC_TIME
        iday0 = (day0-1) + MNDY(month0+12*mod(year0,4) )
./pkg/obcs/obcs_prescribe_read.F 311 OBCS_PRESCRIBE_EXF_XZ
      integer year0, year1
./pkg/obcs/obcs_prescribe_read.F 337 OBCS_PRESCRIBE_EXF_XZ
     O                       count0, count1, year0, year1,
./pkg/obcs/obcs_prescribe_read.F 343 OBCS_PRESCRIBE_EXF_XZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 347 OBCS_PRESCRIBE_EXF_XZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 351 OBCS_PRESCRIBE_EXF_XZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 355 OBCS_PRESCRIBE_EXF_XZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 360 OBCS_PRESCRIBE_EXF_XZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 371 OBCS_PRESCRIBE_EXF_XZ
     I                       , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 397 OBCS_PRESCRIBE_EXF_XZ
     O                       count0, count1, year0, year1,
./pkg/obcs/obcs_prescribe_read.F 403 OBCS_PRESCRIBE_EXF_XZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 407 OBCS_PRESCRIBE_EXF_XZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 411 OBCS_PRESCRIBE_EXF_XZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 415 OBCS_PRESCRIBE_EXF_XZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 419 OBCS_PRESCRIBE_EXF_XZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 423 OBCS_PRESCRIBE_EXF_XZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 545 OBCS_PRESCRIBE_EXF_YZ
      integer year0, year1
./pkg/obcs/obcs_prescribe_read.F 571 OBCS_PRESCRIBE_EXF_YZ
     O                       count0, count1, year0, year1,
./pkg/obcs/obcs_prescribe_read.F 577 OBCS_PRESCRIBE_EXF_YZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 581 OBCS_PRESCRIBE_EXF_YZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 585 OBCS_PRESCRIBE_EXF_YZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 589 OBCS_PRESCRIBE_EXF_YZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 594 OBCS_PRESCRIBE_EXF_YZ
     I                     , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 605 OBCS_PRESCRIBE_EXF_YZ
     I                       , obcsperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 631 OBCS_PRESCRIBE_EXF_YZ
     O                       count0, count1, year0, year1,
./pkg/obcs/obcs_prescribe_read.F 637 OBCS_PRESCRIBE_EXF_YZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 641 OBCS_PRESCRIBE_EXF_YZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 645 OBCS_PRESCRIBE_EXF_YZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 649 OBCS_PRESCRIBE_EXF_YZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 653 OBCS_PRESCRIBE_EXF_YZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/obcs/obcs_prescribe_read.F 657 OBCS_PRESCRIBE_EXF_YZ
     I                     , siobperiod, count0, count1, year0, year1
./pkg/exf/exf_getffieldrec.F 11 EXF_GETFFIELDREC
     O                             count0, count1, year0, year1,
./pkg/exf/exf_getffieldrec.F 139 EXF_GETFFIELDREC
       year0            = int(mydate(1)/10000.)
./pkg/exf/exf_getffieldrec.F 140 EXF_GETFFIELDREC
       yearStartDate(1) = year0 * 10000 + 101
./pkg/exf/exf_getffieldrec.F 148 EXF_GETFFIELDREC
        if ( myDateSeconds .lt. fldstartdate ) year0 = year0 - 1
./pkg/exf/exf_getffieldrec.F 152 EXF_GETFFIELDREC
        if ( cal_IsLeap(year0,mythid) .eq. 2)
./pkg/exf/exf_getffieldrec.F 162 EXF_GETFFIELDREC
        year1  = year0
./pkg/exf/exf_getffieldrec.F 165 EXF_GETFFIELDREC
         year1  = year0 + 1
./pkg/exf/exf_getffieldrec.F 172 EXF_GETFFIELDREC
        if ( year0 .ne. year1 )
./pkg/exf/exf_getffieldrec.F 54 EXF_GETFFIELDREC
      integer count0, count1, year0, year1
./pkg/exf/exf_getffieldrec.F 97 EXF_GETFFIELDREC
       year0   = 0
./pkg/exf/exf_getffieldrec.F 98 EXF_GETFFIELDREC
       year1   = year0
./pkg/exf/exf_set_gen.F 120 EXF_SET_GEN
     O           , count0, count1, year0, year1
./pkg/exf/exf_set_gen.F 128 EXF_SET_GEN
     I         useExfYearlyFields, twoDigitYear, genperiod, year0,
./pkg/exf/exf_set_gen.F 82 EXF_SET_GEN
      integer year0, year1
./pkg/exf/exf_set_obcs.F 124 EXF_SET_OBCS_YZ
     I       count0, count1, year0, year1,
./pkg/exf/exf_set_obcs.F 159 EXF_SET_OBCS_YZ
      INTEGER count0, count1, year0, year1
./pkg/exf/exf_set_obcs.F 180 EXF_SET_OBCS_YZ
     I         useYearlyFields, twoDigitYear, obcs_period, year0,
./pkg/exf/exf_set_obcs.F 19 EXF_SET_OBCS_XZ
     I       count0, count1, year0, year1,
./pkg/exf/exf_set_obcs.F 227 EXF_SET_OBCS_X
     I       count0, count1, year0, year1,
./pkg/exf/exf_set_obcs.F 262 EXF_SET_OBCS_X
      INTEGER count0, count1, year0, year1
./pkg/exf/exf_set_obcs.F 282 EXF_SET_OBCS_X
     I         useYearlyFields, twoDigitYear, obcs_period, year0,
./pkg/exf/exf_set_obcs.F 327 EXF_SET_OBCS_Y
     I       count0, count1, year0, year1,
./pkg/exf/exf_set_obcs.F 361 EXF_SET_OBCS_Y
      INTEGER count0, count1, year0, year1
./pkg/exf/exf_set_obcs.F 381 EXF_SET_OBCS_Y
     I         useYearlyFields, twoDigitYear, obcs_period, year0,
./pkg/exf/exf_set_obcs.F 56 EXF_SET_OBCS_XZ
      INTEGER count0, count1, year0, year1
./pkg/exf/exf_set_obcs.F 77 EXF_SET_OBCS_XZ
     I         useYearlyFields, twoDigitYear, obcs_period, year0,
./pkg/exf/exf_set_runoff.F 103 EXF_SET_RUNOFF
     I         useExfYearlyFields, twoDigitYear, genperiod, year0,
./pkg/exf/exf_set_runoff.F 57 EXF_SET_RUNOFF
      integer year0, year1
./pkg/exf/exf_set_runoff.F 95 EXF_SET_RUNOFF
     O           , count0, count1, year0, year1
./pkg/exf/exf_set_uv.F 113 EXF_SET_UV
     O        , count0, count1, year0, year1
./pkg/exf/exf_set_uv.F 120 EXF_SET_UV
     I         useExfYearlyFields, twoDigitYear, uvecperiod, year0,
./pkg/exf/exf_set_uv.F 125 EXF_SET_UV
     I         useExfYearlyFields, twoDigitYear, vvecperiod, year0,
./pkg/exf/exf_set_uv.F 95 EXF_SET_UV
      integer year0, year1
./pkg/exf/exf_zenithangle.F 54 EXF_ZENITHANGLE
      integer year0,mydate(4),difftime(4)
./pkg/exf/exf_zenithangle.F 72 EXF_ZENITHANGLE
       if ( cal_IsLeap(year0,mythid) .eq. 2)
./pkg/exf/exf_zenithangle.F 76 EXF_ZENITHANGLE
       year0            = int(mydate(1)/10000.)
./pkg/exf/exf_zenithangle.F 77 EXF_ZENITHANGLE
       yearStartDate(1) = year0 * 10000 + 101