Symbol Description Uses
MONTH 35


File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 1033 TIME_BOUND 
      MONTH  = NMONF(NYMD)
./pkg/fizhi/fizhi_clockstuff.F 1064 TIME_BOUND 
         IMNM = MONTH + 1
./pkg/fizhi/fizhi_clockstuff.F 1065 TIME_BOUND 
         IMNP = MONTH + 2
./pkg/fizhi/fizhi_clockstuff.F 1130 TIME2FREQ2 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 1136 TIME2FREQ2 
      IDAY   = (DAY -1) + MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 326 GET_TIME 
      INTEGER YEAR, MONTH, DAY
./pkg/fizhi/fizhi_clockstuff.F 360 GET_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 364 GET_TIME 
      IDAY   = MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 371 GET_TIME 
      IDAY2  = MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 433 INTERP_TIME 
      INTEGER  YEAR , MONTH , DAY , SEC
./pkg/fizhi/fizhi_clockstuff.F 457 INTERP_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 486 INTERP_TIME 
      time00 = DAY + MNDY(MONTH +12*MOD(YEAR ,4)) + float(sec )/86400.
./pkg/fizhi/fizhi_clockstuff.F 610 TIC_TIME 
      INTEGER YEAR, MONTH, DAY, SEC, YEAR0, MONTH0, DAY0, SEC0
./pkg/fizhi/fizhi_clockstuff.F 631 TIC_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 644 TIC_TIME 
      IDAY   = (DAY -1) + MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 679 TIC_TIME 
      INTEGER YEAR, MONTH, DAY, SEC, YEAR0, MONTH0, DAY0, SEC0
./pkg/fizhi/fizhi_clockstuff.F 705 TIC_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 718 TIC_TIME 
      IDAY   = (DAY -1) + MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 927 ASTRO 
      MONTH = MOD(NYMD,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 966 ASTRO 
      IDAY   = DAY + MNDY(MONTH+12*MOD(YEAR,4) )
./pkg/chronos/chronos.F 298 GET_TIME 
      INTEGER YEAR, MONTH, DAY
./pkg/chronos/chronos.F 330 GET_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 333 GET_TIME 
      IDAY   = MNDY( MONTH ,MOD(YEAR ,4)+1 )
./pkg/chronos/chronos.F 339 GET_TIME 
      IDAY2  = MNDY( MONTH ,MOD(YEAR ,4)+1 )
./pkg/chronos/chronos.F 401 INTERP_TIME 
      INTEGER  YEAR , MONTH , DAY , SEC
./pkg/chronos/chronos.F 425 INTERP_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 454 INTERP_TIME 
      time  = DAY  + MNDY(MONTH ,MOD(YEAR ,4)+1) + float(sec )/86400.
./pkg/chronos/chronos.F 574 TIC_TIME 
      INTEGER YEAR, MONTH, DAY, SEC, YEAR0, MONTH0, DAY0, SEC0
./pkg/chronos/chronos.F 595 TIC_TIME 
      MONTH  = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 608 TIC_TIME 
      IDAY   = (DAY -1) + MNDY( MONTH ,MOD(YEAR ,4)+1 )
./pkg/chronos/chronos.F 775 ASTRO 
      MONTH = MOD(NYMD,10000) / 100
./pkg/chronos/chronos.F 814 ASTRO 
      IDAY   = DAY + MNDY(MONTH,MOD(YEAR,4)+1)
./pkg/chronos/chronos.F 881 TIME_BOUND 
      MONTH  = NMONF(NYMD)
./pkg/chronos/chronos.F 912 TIME_BOUND 
         IMNM = MONTH + 1
./pkg/chronos/chronos.F 913 TIME_BOUND 
         IMNP = MONTH + 2