Symbol Description Uses
MNDY 61



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 1116 TIME2FREQ2
      integer MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 1117 TIME2FREQ2
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 1124 TIME2FREQ2
        MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 1136 TIME2FREQ2
      IDAY   = (DAY -1) + MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 1148 TIME2FREQ2
      idaynext = MNDY(monthnext+12*mod(yearnext,4) )
./pkg/fizhi/fizhi_clockstuff.F 329 GET_TIME
      INTEGER  MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 330 GET_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 349 GET_TIME
        MNDY(I) = MNDY(I-12) + 365
./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 442 INTERP_TIME
      INTEGER MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 447 INTERP_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 477 INTERP_TIME
        MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 486 INTERP_TIME
      time00 = DAY + MNDY(MONTH +12*MOD(YEAR ,4)) + float(sec )/86400.
./pkg/fizhi/fizhi_clockstuff.F 487 INTERP_TIME
      time1 = DAY1 + MNDY(MONTH1+12*MOD(YEAR1,4)) + float(sec1)/86400.
./pkg/fizhi/fizhi_clockstuff.F 488 INTERP_TIME
      time2 = DAY2 + MNDY(MONTH2+12*MOD(YEAR2,4)) + float(sec2)/86400.
./pkg/fizhi/fizhi_clockstuff.F 612 TIC_TIME
      integer MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 613 TIC_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 623 TIC_TIME
        MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 644 TIC_TIME
      IDAY   = (DAY -1) + MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 645 TIC_TIME
      IDAY0  = (DAY0-1) + MNDY( MONTH0+12*MOD(YEAR0,4) )
./pkg/fizhi/fizhi_clockstuff.F 681 TIC_TIME
      integer MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 682 TIC_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 697 TIC_TIME
        MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 718 TIC_TIME
      IDAY   = (DAY -1) + MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 719 TIC_TIME
      IDAY0  = (DAY0-1) + MNDY( MONTH0+12*MOD(YEAR0,4) )
./pkg/fizhi/fizhi_clockstuff.F 758 TIC_TIME
        iday0 = (day0-1) + MNDY(month0+12*mod(year0,4) )
./pkg/fizhi/fizhi_clockstuff.F 898 ASTRO
      INTEGER  MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 904 ASTRO
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 937 ASTRO
             MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 966 ASTRO
      IDAY   = DAY + MNDY(MONTH+12*MOD(YEAR,4) )
./pkg/chronos/chronos.F 300 GET_TIME
      INTEGER  MNDY(12,4)
./pkg/chronos/chronos.F 301 GET_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/chronos/chronos.F 319 GET_TIME
      MNDY(I,1) = MNDY(I-12,1) + 365
./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 410 INTERP_TIME
      INTEGER MNDY(12,4)              
./pkg/chronos/chronos.F 415 INTERP_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,                
./pkg/chronos/chronos.F 445 INTERP_TIME
      MNDY(I,1) = MNDY(I-12,1) + 365
./pkg/chronos/chronos.F 454 INTERP_TIME
      time  = DAY  + MNDY(MONTH ,MOD(YEAR ,4)+1) + float(sec )/86400.
./pkg/chronos/chronos.F 455 INTERP_TIME
      time1 = DAY1 + MNDY(MONTH1,MOD(YEAR1,4)+1) + float(sec1)/86400.
./pkg/chronos/chronos.F 456 INTERP_TIME
      time2 = DAY2 + MNDY(MONTH2,MOD(YEAR2,4)+1) + float(sec2)/86400.
./pkg/chronos/chronos.F 576 TIC_TIME
      integer MNDY(12,4)
./pkg/chronos/chronos.F 577 TIC_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/chronos/chronos.F 587 TIC_TIME
      MNDY(I,1) = MNDY(I-12,1) + 365
./pkg/chronos/chronos.F 608 TIC_TIME
      IDAY   = (DAY -1) + MNDY( MONTH ,MOD(YEAR ,4)+1 )                         
./pkg/chronos/chronos.F 609 TIC_TIME
      IDAY0  = (DAY0-1) + MNDY( MONTH0,MOD(YEAR0,4)+1 )                         
./pkg/chronos/chronos.F 758 ASTRO
      _RL      TH(DAYSCY),T0,T1,T2,T3,T4,FUN,Y,MNDY(12,4)
./pkg/chronos/chronos.F 764 ASTRO
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/chronos/chronos.F 785 ASTRO
           MNDY(I,1) = MNDY(I-12,1) + 365
./pkg/chronos/chronos.F 814 ASTRO
      IDAY   = DAY + MNDY(MONTH,MOD(YEAR,4)+1)