File |
Line number |
Procedure |
Code |
./pkg/cal/cal_numints.F |
44 |
NO PROCEDURE |
integer timeint(4) |
./pkg/cal/cal_numints.F |
56 |
NO PROCEDURE |
if ( timeint(4) .eq. -1 ) then |
./pkg/cal/cal_numints.F |
60 |
NO PROCEDURE |
call CAL_TOSECONDS( timeint, timeintsecs, mythid ) |
./pkg/cal/cal_numints.F |
9 |
NO PROCEDURE |
I timeint, |
./pkg/cal/cal_timeinterval.F |
42 |
CAL_TIMEINTERVAL |
_RL timeint |
./pkg/cal/cal_timeinterval.F |
56 |
CAL_TIMEINTERVAL |
if (timeint .lt. 0) fac = -1 |
./pkg/cal/cal_timeinterval.F |
64 |
CAL_TIMEINTERVAL |
& 'timeint=',timeint,' , timeunit=',timeunit |
./pkg/cal/cal_timeinterval.F |
71 |
CAL_TIMEINTERVAL |
date(1) = int(timeint/float(secondsperday)) |
./pkg/cal/cal_timeinterval.F |
74 |
CAL_TIMEINTERVAL |
nsecs = int(timeint - tmp1 * tmp2 ) |
./pkg/cal/cal_timeinterval.F |
7 |
CAL_TIMEINTERVAL |
I timeint, |
./pkg/cal/cal_timeinterval.F |
80 |
CAL_TIMEINTERVAL |
& 'timeint=',timeint,' , timeunit=',timeunit |
./pkg/cal/cal_timeinterval.F |
87 |
CAL_TIMEINTERVAL |
date(1) = int(timeint*modelstep/float(secondsperday)) |
./pkg/cal/cal_timeinterval.F |
88 |
CAL_TIMEINTERVAL |
nsecs = int(timeint*modelstep - |
./pkg/cal/cal_toseconds.F |
47 |
CAL_TOSECONDS |
_RL timeint |
./pkg/cal/cal_toseconds.F |
8 |
CAL_TOSECONDS |
O timeint, |
./pkg/cal/cal_toseconds.F |
92 |
CAL_TOSECONDS |
timeint = fac*nsecs |
./pkg/ctrl/ctrl_summary.F |
174 |
CTRL_SUMMARY |
call CAL_TIMEINTERVAL( xx_hfluxperiod, 'secs', timeint, mythid ) |
./pkg/ctrl/ctrl_summary.F |
188 |
CTRL_SUMMARY |
& (timeint(i), i=1,2) |
./pkg/ctrl/ctrl_summary.F |
215 |
CTRL_SUMMARY |
call CAL_TIMEINTERVAL( xx_sfluxperiod, 'secs', timeint, mythid ) |
./pkg/ctrl/ctrl_summary.F |
229 |
CTRL_SUMMARY |
& (timeint(i), i=1,2) |
./pkg/ctrl/ctrl_summary.F |
256 |
CTRL_SUMMARY |
call CAL_TIMEINTERVAL( xx_tauuperiod, 'secs', timeint, mythid ) |
./pkg/ctrl/ctrl_summary.F |
270 |
CTRL_SUMMARY |
& (timeint(i), i=1,2) |
./pkg/ctrl/ctrl_summary.F |
297 |
CTRL_SUMMARY |
call CAL_TIMEINTERVAL( xx_tauvperiod, 'secs', timeint, mythid ) |
./pkg/ctrl/ctrl_summary.F |
311 |
CTRL_SUMMARY |
& (timeint(i), i=1,2) |
./pkg/ctrl/ctrl_summary.F |
488 |
CTRL_SUMMARY |
& 'secs', timeint, mythid ) |
./pkg/ctrl/ctrl_summary.F |
48 |
CTRL_SUMMARY |
integer timeint(4) |
./pkg/ctrl/ctrl_summary.F |
490 |
CTRL_SUMMARY |
&' period = ',(timeint(i), i=1,2) |