| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_getffieldrec.F |
119 |
EXF_GETFFIELDREC |
fldsectot = myTime - fldStartTime |
|
./pkg/exf/exf_getffieldrec.F |
124 |
EXF_GETFFIELDREC |
if ( fldsectot .lt. 0. _d 0 ) then |
|
./pkg/exf/exf_getffieldrec.F |
133 |
EXF_GETFFIELDREC |
count0 = INT((fldsectot+0.5)/fldPeriod) + 1 |
|
./pkg/exf/exf_getffieldrec.F |
135 |
EXF_GETFFIELDREC |
fldsecs = MOD(fldsectot,fldPeriod) |
|
./pkg/exf/exf_getffieldrec.F |
141 |
EXF_GETFFIELDREC |
if (fldsectot.lt.0. _d 0) |
|
./pkg/exf/exf_getffieldrec.F |
142 |
EXF_GETFFIELDREC |
& fldsectot = fldsectot + fldRepeatCycle |
|
./pkg/exf/exf_getffieldrec.F |
143 |
EXF_GETFFIELDREC |
fldsecs0 = MOD(fldsectot,fldRepeatCycle) |
|
./pkg/exf/exf_getffieldrec.F |
145 |
EXF_GETFFIELDREC |
fldsecs1 = MOD(fldsectot+fldPeriod,fldRepeatCycle) |
|
./pkg/exf/exf_getffieldrec.F |
178 |
EXF_GETFFIELDREC |
fldsectot = myDateSeconds - fldStartTime |
|
./pkg/exf/exf_getffieldrec.F |
179 |
EXF_GETFFIELDREC |
count0 = INT((fldsectot+0.5)/fldPeriod) + 1 |
|
./pkg/exf/exf_getffieldrec.F |
190 |
EXF_GETFFIELDREC |
fldsecs = MOD(fldsectot,fldPeriod) |
|
./pkg/exf/exf_getffieldrec.F |
85 |
EXF_GETFFIELDREC |
_RL fldsectot, fldsecs, fldsecs0, fldsecs1 |