File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_clockstuff.F |
624 |
TIC_TIME |
INTEGER YEAR, MONTH, DAY, SEC, YEAR0, MONTH0, DAY0, SEC0 |
./pkg/fizhi/fizhi_clockstuff.F |
649 |
TIC_TIME |
YEAR0 = NYMD0 / 10000 |
./pkg/fizhi/fizhi_clockstuff.F |
659 |
TIC_TIME |
IDAY0 = (DAY0-1) + MNDY( MONTH0+12*MOD(YEAR0,4) ) |
./pkg/fizhi/fizhi_clockstuff.F |
693 |
TIC_TIME |
INTEGER YEAR, MONTH, DAY, SEC, YEAR0, MONTH0, DAY0, SEC0 |
./pkg/fizhi/fizhi_clockstuff.F |
723 |
TIC_TIME |
YEAR0 = NYMD0 / 10000 |
./pkg/fizhi/fizhi_clockstuff.F |
733 |
TIC_TIME |
IDAY0 = (DAY0-1) + MNDY( MONTH0+12*MOD(YEAR0,4) ) |
./pkg/chronos/chronos.F |
574 |
TIC_TIME |
INTEGER YEAR, MONTH, DAY, SEC, YEAR0, MONTH0, DAY0, SEC0 |
./pkg/chronos/chronos.F |
599 |
TIC_TIME |
YEAR0 = NYMD0 / 10000 |
./pkg/chronos/chronos.F |
609 |
TIC_TIME |
IDAY0 = (DAY0-1) + MNDY( MONTH0,MOD(YEAR0,4)+1 ) |