Symbol Description Uses
DAY1 6



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 448 INTERP_TIME
      INTEGER  YEAR1, MONTH1, DAY1, SEC1
./pkg/fizhi/fizhi_clockstuff.F 477 INTERP_TIME
      DAY1   = MOD(NYMD1,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 431 INTERP_TIME
      DAY1   = MOD(NYMD1,100)
./pkg/chronos/chronos.F 455 INTERP_TIME
      time1 = DAY1 + MNDY(MONTH1,MOD(YEAR1,4)+1) + float(sec1)/86400.