Symbol Description Uses
MNDY 61



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 1131 TIME2FREQ2
      integer MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 1132 TIME2FREQ2
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 1139 TIME2FREQ2
        MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 1151 TIME2FREQ2
      IDAY   = (DAY -1) + MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 1163 TIME2FREQ2
      idaynext = MNDY(monthnext+12*mod(yearnext,4) )
./pkg/fizhi/fizhi_clockstuff.F 343 GET_TIME
      INTEGER  MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 344 GET_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 363 GET_TIME
        MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 378 GET_TIME
      IDAY   = MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 385 GET_TIME
      IDAY2  = MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 456 INTERP_TIME
      INTEGER MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 461 INTERP_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 491 INTERP_TIME
        MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 500 INTERP_TIME
      time00 = DAY + MNDY(MONTH +12*MOD(YEAR ,4)) + float(sec )/86400.
./pkg/fizhi/fizhi_clockstuff.F 501 INTERP_TIME
      time1 = DAY1 + MNDY(MONTH1+12*MOD(YEAR1,4)) + float(sec1)/86400.
./pkg/fizhi/fizhi_clockstuff.F 502 INTERP_TIME
      time2 = DAY2 + MNDY(MONTH2+12*MOD(YEAR2,4)) + float(sec2)/86400.
./pkg/fizhi/fizhi_clockstuff.F 626 TIC_TIME
      integer MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 627 TIC_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 637 TIC_TIME
        MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 658 TIC_TIME
      IDAY   = (DAY -1) + MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 659 TIC_TIME
      IDAY0  = (DAY0-1) + MNDY( MONTH0+12*MOD(YEAR0,4) )
./pkg/fizhi/fizhi_clockstuff.F 695 TIC_TIME
      integer MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 696 TIC_TIME
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 711 TIC_TIME
        MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 732 TIC_TIME
      IDAY   = (DAY -1) + MNDY( MONTH +12*MOD(YEAR ,4) )
./pkg/fizhi/fizhi_clockstuff.F 733 TIC_TIME
      IDAY0  = (DAY0-1) + MNDY( MONTH0+12*MOD(YEAR0,4) )
./pkg/fizhi/fizhi_clockstuff.F 772 TIC_TIME
        iday0 = (day0-1) + MNDY(month0+12*mod(year0,4) )
./pkg/fizhi/fizhi_clockstuff.F 913 ASTRO
      INTEGER  MNDY(12*4)
./pkg/fizhi/fizhi_clockstuff.F 919 ASTRO
      DATA MNDY /0,31,60,91,121,152,182,213,244,274,305,335,366,
./pkg/fizhi/fizhi_clockstuff.F 952 ASTRO
             MNDY(I) = MNDY(I-12) + 365
./pkg/fizhi/fizhi_clockstuff.F 981 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)