| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_clockstuff.F |
1128 |
TIME2FREQ2 |
integer yearnext, monthnext, daynext |
|
./pkg/fizhi/fizhi_clockstuff.F |
1156 |
TIME2FREQ2 |
monthnext=mod(testnymd,10000)/100 |
|
./pkg/fizhi/fizhi_clockstuff.F |
1158 |
TIME2FREQ2 |
if(monthnext.gt.12) then |
|
./pkg/fizhi/fizhi_clockstuff.F |
1159 |
TIME2FREQ2 |
monthnext = monthnext - 12 |
|
./pkg/fizhi/fizhi_clockstuff.F |
1162 |
TIME2FREQ2 |
testnymd = yearnext*10000 + monthnext*100 + daynext |
|
./pkg/fizhi/fizhi_clockstuff.F |
1163 |
TIME2FREQ2 |
idaynext = MNDY(monthnext+12*mod(yearnext,4) ) |