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 |
650 |
TIC_TIME |
MONTH0 = MOD(NYMD0,10000) / 100 |
./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 |
724 |
TIC_TIME |
MONTH0 = MOD(NYMD0,10000) / 100 |
./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 |
600 |
TIC_TIME |
MONTH0 = MOD(NYMD0,10000) / 100 |
./pkg/chronos/chronos.F |
609 |
TIC_TIME |
IDAY0 = (DAY0-1) + MNDY( MONTH0,MOD(YEAR0,4)+1 ) |