| Symbol | Description | Uses |
| LEAP | 10 |
| File | Line number | Procedure | Code |
| ./pkg/fizhi/fizhi_clockstuff.F | 802 | TIC_TIME |
LOGICAL LEAP |
| ./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/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 | 852 | TIC_TIME |
IF (NM.EQ.2 .AND. LEAP(NY)) ND = ND + 1 |
| ./pkg/chronos/chronos.F | 639 | TIC_TIME |
LOGICAL LEAP |
| ./pkg/chronos/chronos.F | 641 | TIC_TIME |
LEAP(NY) = MOD(NY,4).EQ.0 .AND. (NY.NE.0 .OR. MOD(NY00,400).EQ.0) |
| ./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 | 689 | TIC_TIME |
IF (NM.EQ.2 .AND. LEAP(NY)) ND = ND + 1 |