| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_clockstuff.F |
1130 |
TIME2FREQ2 |
integer testnymd |
|
./pkg/fizhi/fizhi_clockstuff.F |
1154 |
TIME2FREQ2 |
testnymd=nymd + mmdd |
|
./pkg/fizhi/fizhi_clockstuff.F |
1155 |
TIME2FREQ2 |
yearnext=testnymd/10000 |
|
./pkg/fizhi/fizhi_clockstuff.F |
1156 |
TIME2FREQ2 |
monthnext=mod(testnymd,10000)/100 |
|
./pkg/fizhi/fizhi_clockstuff.F |
1162 |
TIME2FREQ2 |
testnymd = yearnext*10000 + monthnext*100 + daynext |
|
./pkg/fizhi/fizhi_clockstuff.F |
704 |
TIC_TIME |
integer testnymd,testnhms,testndpm |
|
./pkg/fizhi/fizhi_clockstuff.F |
743 |
TIC_TIME |
testnymd=nymd0 |
|
./pkg/fizhi/fizhi_clockstuff.F |
748 |
TIC_TIME |
testnymd=testnymd + nmmdd |
|
./pkg/fizhi/fizhi_clockstuff.F |
750 |
TIC_TIME |
year0=testnymd/10000 |
|
./pkg/fizhi/fizhi_clockstuff.F |
751 |
TIC_TIME |
month0=mod(testnymd,10000)/100 |
|
./pkg/fizhi/fizhi_clockstuff.F |
752 |
TIC_TIME |
day0 = mod(testnymd,100) |
|
./pkg/fizhi/fizhi_clockstuff.F |
757 |
TIC_TIME |
testnymd = testnymd + 1 |
|
./pkg/fizhi/fizhi_clockstuff.F |
761 |
TIC_TIME |
testnymd = testnymd - testndpm |
|
./pkg/fizhi/fizhi_clockstuff.F |
762 |
TIC_TIME |
testnymd = testnymd + 100 |
|
./pkg/fizhi/fizhi_clockstuff.F |
769 |
TIC_TIME |
testnymd = testnymd + 10000 - 1200 |
|
./pkg/fizhi/fizhi_clockstuff.F |
774 |
TIC_TIME |
if( (testnymd.gt.nymd) .or. |
|
./pkg/fizhi/fizhi_clockstuff.F |
775 |
TIC_TIME |
& (testnymd.eq.testnymd) .and. (testnhms.gt.nhms) ) |