| File |
Line number |
Procedure |
Code |
|
./eesupp/src/get_periodic_interval.F |
102 |
GET_PERIODIC_INTERVAL |
locTime = currentTime - recSpacing*0.5 |
|
./eesupp/src/get_periodic_interval.F |
103 |
GET_PERIODIC_INTERVAL |
modTime = F90MODULO(locTime,recSpacing) |
|
./eesupp/src/get_periodic_interval.F |
106 |
GET_PERIODIC_INTERVAL |
tRec1 = 1 + NINT( (locTime-modTime)/recSpacing ) |
|
./eesupp/src/get_periodic_interval.F |
110 |
GET_PERIODIC_INTERVAL |
wght2 = modTime / recSpacing |
|
./eesupp/src/get_periodic_interval.F |
115 |
GET_PERIODIC_INTERVAL |
modTime = F90MODULO( locTime, recSpacing ) |
|
./eesupp/src/get_periodic_interval.F |
116 |
GET_PERIODIC_INTERVAL |
tRec0 = 1 + NINT( (locTime-modTime)/recSpacing ) |
|
./eesupp/src/get_periodic_interval.F |
121 |
GET_PERIODIC_INTERVAL |
locTime = currentTime - recSpacing*0.5 |
|
./eesupp/src/get_periodic_interval.F |
126 |
GET_PERIODIC_INTERVAL |
tRec1 = 1 + INT( tmpTime/recSpacing ) |
|
./eesupp/src/get_periodic_interval.F |
12 |
GET_PERIODIC_INTERVAL |
I cycleLength, recSpacing, deltaT, |
|
./eesupp/src/get_periodic_interval.F |
130 |
GET_PERIODIC_INTERVAL |
wght2 = ( tmpTime - recSpacing*(tRec1 - 1) )/recSpacing |
|
./eesupp/src/get_periodic_interval.F |
135 |
GET_PERIODIC_INTERVAL |
tRec0 = 1 + INT(tmpTime/recSpacing) |
|
./eesupp/src/get_periodic_interval.F |
40 |
GET_PERIODIC_INTERVAL |
_RL cycleLength, recSpacing, deltaT, currentTime |
|
./eesupp/src/get_periodic_interval.F |
75 |
GET_PERIODIC_INTERVAL |
& recSpacing .LE.0. ) THEN |
|
./eesupp/src/get_periodic_interval.F |
78 |
GET_PERIODIC_INTERVAL |
IF ( recSpacing .LE.0. ) WRITE(msgBuf,'(A)') |
|
./eesupp/src/get_periodic_interval.F |
82 |
GET_PERIODIC_INTERVAL |
& 'cycleLength=', cycleLength, ' , recSpacing=', recSpacing |
|
./eesupp/src/get_periodic_interval.F |
86 |
GET_PERIODIC_INTERVAL |
nbRec = NINT(cycleLength/recSpacing) |
|
./eesupp/src/get_periodic_interval.F |
88 |
GET_PERIODIC_INTERVAL |
tmpTime = nbRec*recSpacing |
|
./eesupp/src/get_periodic_interval.F |
94 |
GET_PERIODIC_INTERVAL |
& 'cycleLength=', cycleLength, ' , recSpacing=', recSpacing |