Symbol Description Uses
MONTH1 6



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 448 INTERP_TIME
      INTEGER  YEAR1, MONTH1, DAY1, SEC1
./pkg/fizhi/fizhi_clockstuff.F 476 INTERP_TIME
      MONTH1 = MOD(NYMD1,10000) / 100
./pkg/fizhi/fizhi_clockstuff.F 501 INTERP_TIME
      time1 = DAY1 + MNDY(MONTH1+12*MOD(YEAR1,4)) + float(sec1)/86400.
./pkg/chronos/chronos.F 402 INTERP_TIME
      INTEGER  YEAR1, MONTH1, DAY1, SEC1
./pkg/chronos/chronos.F 430 INTERP_TIME
      MONTH1 = MOD(NYMD1,10000) / 100
./pkg/chronos/chronos.F 455 INTERP_TIME
      time1 = DAY1 + MNDY(MONTH1,MOD(YEAR1,4)+1) + float(sec1)/86400.