| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_clockstuff.F |
437 |
INTERP_TIME |
_RL time00, time1, time2 |
|
./pkg/fizhi/fizhi_clockstuff.F |
488 |
INTERP_TIME |
time2 = DAY2 + MNDY(MONTH2+12*MOD(YEAR2,4)) + float(sec2)/86400. |
|
./pkg/fizhi/fizhi_clockstuff.F |
491 |
INTERP_TIME |
if( time2.lt.time1 ) time2 = time2 + dayscy |
|
./pkg/fizhi/fizhi_clockstuff.F |
493 |
INTERP_TIME |
fac1 = (time2-time00)/(time2-time1) |
|
./pkg/fizhi/fizhi_clockstuff.F |
494 |
INTERP_TIME |
fac2 = (time00-time1)/(time2-time1) |
|
./pkg/chronos/chronos.F |
405 |
INTERP_TIME |
_RL time, time1, time2 |
|
./pkg/chronos/chronos.F |
456 |
INTERP_TIME |
time2 = DAY2 + MNDY(MONTH2,MOD(YEAR2,4)+1) + float(sec2)/86400. |
|
./pkg/chronos/chronos.F |
459 |
INTERP_TIME |
if( time2.lt.time1 ) time2 = time2 + dayscy |
|
./pkg/chronos/chronos.F |
461 |
INTERP_TIME |
fac1 = (time2-time)/(time2-time1) |
|
./pkg/chronos/chronos.F |
462 |
INTERP_TIME |
fac2 = (time-time1)/(time2-time1) |