Symbol Description Uses
ND 28


File Line number Procedure Code
./pkg/fizhi/fizhi_clockstuff.F 810 TIC_TIME 
      ND = MOD(NYMD,100) + M
./pkg/fizhi/fizhi_clockstuff.F 812 TIC_TIME 
      IF (ND.EQ.0) THEN
./pkg/fizhi/fizhi_clockstuff.F 818 TIC_TIME 
      ND = NDPM(NM)
./pkg/fizhi/fizhi_clockstuff.F 819 TIC_TIME 
      IF (NM.EQ.2 .AND. LEAP(NY))  ND = 29
./pkg/fizhi/fizhi_clockstuff.F 822 TIC_TIME 
      IF (ND.EQ.29 .AND. NM.EQ.2 .AND. LEAP(NY))  GO TO 20
./pkg/fizhi/fizhi_clockstuff.F 824 TIC_TIME 
      IF (ND.GT.NDPM(NM)) THEN
./pkg/fizhi/fizhi_clockstuff.F 825 TIC_TIME 
      ND = 1
./pkg/fizhi/fizhi_clockstuff.F 834 TIC_TIME 
      INCYMD = NY*10000 + NM*100 + ND
./pkg/fizhi/fizhi_clockstuff.F 846 TIC_TIME 
      ND = MOD(NYMD,100)
./pkg/fizhi/fizhi_clockstuff.F 851 TIC_TIME 
      ND = ND + NDPM(NM)
./pkg/fizhi/fizhi_clockstuff.F 852 TIC_TIME 
      IF (NM.EQ.2 .AND. LEAP(NY))  ND = ND + 1
./pkg/fizhi/fizhi_clockstuff.F 856 TIC_TIME 
      MODYMD = ND
./pkg/chronos/chronos.F 647 TIC_TIME 
      ND = MOD(NYMD,100) + M
./pkg/chronos/chronos.F 649 TIC_TIME 
      IF (ND.EQ.0) THEN
./pkg/chronos/chronos.F 655 TIC_TIME 
      ND = NDPM(NM)
./pkg/chronos/chronos.F 656 TIC_TIME 
      IF (NM.EQ.2 .AND. LEAP(NY))  ND = 29
./pkg/chronos/chronos.F 659 TIC_TIME 
      IF (ND.EQ.29 .AND. NM.EQ.2 .AND. LEAP(NY))  GO TO 20
./pkg/chronos/chronos.F 661 TIC_TIME 
      IF (ND.GT.NDPM(NM)) THEN
./pkg/chronos/chronos.F 662 TIC_TIME 
      ND = 1
./pkg/chronos/chronos.F 671 TIC_TIME 
      INCYMD = NY*10000 + NM*100 + ND
./pkg/chronos/chronos.F 683 TIC_TIME 
      ND = MOD(NYMD,100)
./pkg/chronos/chronos.F 688 TIC_TIME 
      ND = ND + NDPM(NM)
./pkg/chronos/chronos.F 689 TIC_TIME 
      IF (NM.EQ.2 .AND. LEAP(NY))  ND = ND + 1
./pkg/chronos/chronos.F 693 TIC_TIME 
      MODYMD = ND