| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_getrec.F |
222 |
CTRL_GETREC |
call CAL_TOSECONDS( difftime, prevfldsecs, mythid ) |
|
./pkg/ctrl/ctrl_getrec.F |
224 |
CTRL_GETREC |
prevfldsecs = int((prevfldsecs+0.5)/fldperiod)*fldperiod |
|
./pkg/ctrl/ctrl_getrec.F |
225 |
CTRL_GETREC |
prevfldcount = int((prevfldsecs+0.5)/fldperiod) + 1 |
|
./pkg/ctrl/ctrl_getrec.F |
76 |
CTRL_GETREC |
_RL prevfldsecs |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
123 |
CTRL_GET_GEN_REC |
call CAL_TOSECONDS( difftime, prevfldsecs, mythid ) |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
124 |
CTRL_GET_GEN_REC |
prevfldsecs = int((prevfldsecs+0.5)/fldperiod)*fldperiod |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
125 |
CTRL_GET_GEN_REC |
prevfldcount = int((prevfldsecs+0.5)/fldperiod) + 1 |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
68 |
CTRL_GET_GEN_REC |
_RL prevfldsecs |
|
./pkg/exf/exf_getffieldrec.F |
126 |
EXF_GETFFIELDREC |
prevfldsecs = fldsecs - modelstep |
|
./pkg/exf/exf_getffieldrec.F |
129 |
EXF_GETFFIELDREC |
prevfldsecs = 0 |
|
./pkg/exf/exf_getffieldrec.F |
141 |
EXF_GETFFIELDREC |
prevfldcount= int((prevfldsecs+0.5)/fldperiod) + 1 |
|
./pkg/exf/exf_getffieldrec.F |
155 |
EXF_GETFFIELDREC |
do while ( prevfldsecs .lt. 0 ) |
|
./pkg/exf/exf_getffieldrec.F |
156 |
EXF_GETFFIELDREC |
prevfldsecs = prevfldsecs + repeatPeriod |
|
./pkg/exf/exf_getffieldrec.F |
158 |
EXF_GETFFIELDREC |
prevfldsecs = mod(prevfldsecs,repeatPeriod) |
|
./pkg/exf/exf_getffieldrec.F |
159 |
EXF_GETFFIELDREC |
prevfldcount= int((prevfldsecs+0.5)/fldperiod) + 1 |
|
./pkg/exf/exf_getffieldrec.F |
256 |
EXF_GETFFIELDREC |
call CAL_TOSECONDS( difftime, prevfldsecs, mythid ) |
|
./pkg/exf/exf_getffieldrec.F |
257 |
EXF_GETFFIELDREC |
prevfldsecs = int(prevfldsecs/fldperiod)*fldperiod |
|
./pkg/exf/exf_getffieldrec.F |
258 |
EXF_GETFFIELDREC |
prevfldcount = int(prevfldsecs/fldperiod) + 1 |
|
./pkg/exf/exf_getffieldrec.F |
86 |
EXF_GETFFIELDREC |
_RL prevfldsecs |