Symbol Description Uses
NY00 4



File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 803 TIC_TIME
      DATA NY00 /1900 /
./pkg/fizhi/fizhi_clockstuff.F 804 TIC_TIME
      LEAP(NY) = MOD(NY,4).EQ.0 .AND. (NY.NE.0 .OR. MOD(NY00,400).EQ.0)
./pkg/chronos/chronos.F 640 TIC_TIME
      DATA NY00 /1900 /
./pkg/chronos/chronos.F 641 TIC_TIME
      LEAP(NY) = MOD(NY,4).EQ.0 .AND. (NY.NE.0 .OR. MOD(NY00,400).EQ.0)