File |
Line number |
Procedure |
Code |
./pkg/ecco/cost_readtopex.F |
111 |
COST_READTOPEX |
call CAL_TOSECONDS( difftime, diffsecs, mythid ) |
./pkg/ecco/cost_readtopex.F |
112 |
COST_READTOPEX |
sshrec = int(diffsecs/topexperiod) + 1 |
./pkg/ecco/cost_readtopex.F |
59 |
COST_READTOPEX |
_RL diffsecs |
./pkg/ecco/cost_readers.F |
111 |
COST_READERS |
call CAL_TOSECONDS( difftime, diffsecs, mythid ) |
./pkg/ecco/cost_readers.F |
112 |
COST_READERS |
sshrec = int(diffsecs/ersperiod) + 1 |
./pkg/ecco/cost_readers.F |
59 |
COST_READERS |
_RL diffsecs |
./pkg/cal/cal_getmonthsrec.F |
196 |
CAL_GETMONTHSREC |
call CAL_TOSECONDS( difftime, diffsecs, mythid ) |
./pkg/cal/cal_getmonthsrec.F |
206 |
CAL_GETMONTHSREC |
fac = (midsecs - currentsecs)/diffsecs |
./pkg/cal/cal_getmonthsrec.F |
209 |
CAL_GETMONTHSREC |
& diffsecs |
./pkg/cal/cal_getmonthsrec.F |
70 |
CAL_GETMONTHSREC |
_RL diffsecs |
./pkg/ctrl/ctrl_mask_set_yz.F |
57 |
CTRL_MASK_SET_YZ |
_RL diffsecs |
./pkg/ctrl/ctrl_init.F |
167 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
168 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
./pkg/ctrl/ctrl_init.F |
170 |
CTRL_INIT |
endrec = int((modelend + startTime - diffsecs + modelstep/2)/ |
./pkg/ctrl/ctrl_init.F |
189 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
190 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
./pkg/ctrl/ctrl_init.F |
192 |
CTRL_INIT |
endrec = int((modelend + startTime - diffsecs + modelstep/2)/ |
./pkg/ctrl/ctrl_init.F |
221 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
222 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
./pkg/ctrl/ctrl_init.F |
224 |
CTRL_INIT |
endrec = int((modelend + startTime - diffsecs + modelstep/2)/ |
./pkg/ctrl/ctrl_init.F |
243 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
244 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
./pkg/ctrl/ctrl_init.F |
246 |
CTRL_INIT |
endrec = int((modelend + startTime - diffsecs + modelstep/2)/ |
./pkg/ctrl/ctrl_init.F |
275 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
276 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
./pkg/ctrl/ctrl_init.F |
278 |
CTRL_INIT |
endrec = int((modelend + startTime - diffsecs + modelstep/2)/ |
./pkg/ctrl/ctrl_init.F |
297 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
298 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
./pkg/ctrl/ctrl_init.F |
300 |
CTRL_INIT |
endrec = int((modelend + startTime - diffsecs + modelstep/2)/ |
./pkg/ctrl/ctrl_init.F |
329 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
330 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
./pkg/ctrl/ctrl_init.F |
332 |
CTRL_INIT |
endrec = int((modelend + startTime - diffsecs + modelstep/2)/ |
./pkg/ctrl/ctrl_init.F |
351 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
352 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
./pkg/ctrl/ctrl_init.F |
354 |
CTRL_INIT |
endrec = int((modelend + startTime - diffsecs + modelstep/2)/ |
./pkg/ctrl/ctrl_init.F |
388 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
389 |
CTRL_INIT |
startrec = int((modelstart - diffsecs)/xx_obcsnperiod) + 1 |
./pkg/ctrl/ctrl_init.F |
391 |
CTRL_INIT |
endrec = int((modelend - diffsecs)/xx_obcsnperiod) + 2 |
./pkg/ctrl/ctrl_init.F |
414 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
415 |
CTRL_INIT |
startrec = int((modelstart - diffsecs)/xx_obcssperiod) + 1 |
./pkg/ctrl/ctrl_init.F |
417 |
CTRL_INIT |
endrec = int((modelend - diffsecs)/xx_obcssperiod) + 2 |
./pkg/ctrl/ctrl_init.F |
440 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
441 |
CTRL_INIT |
startrec = int((modelstart - diffsecs)/xx_obcswperiod) + 1 |
./pkg/ctrl/ctrl_init.F |
443 |
CTRL_INIT |
endrec = int((modelend - diffsecs)/xx_obcswperiod) + 2 |
./pkg/ctrl/ctrl_init.F |
466 |
CTRL_INIT |
call CAL_TOSECONDS ( difftime, diffsecs, mythid ) |
./pkg/ctrl/ctrl_init.F |
467 |
CTRL_INIT |
startrec = int((modelstart - diffsecs)/xx_obcseperiod) + 1 |
./pkg/ctrl/ctrl_init.F |
469 |
CTRL_INIT |
endrec = int((modelend - diffsecs)/xx_obcseperiod) + 2 |
./pkg/ctrl/ctrl_init.F |
95 |
CTRL_INIT |
_RL diffsecs |
./pkg/ctrl/ctrl_readparms.F |
55 |
CTRL_READPARMS |
_RL diffsecs |
./pkg/ctrl/ctrl_mask_set_xz.F |
57 |
CTRL_MASK_SET_XZ |
_RL diffsecs |