| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_averagesflags.F |
174 |
COST_AVERAGESFLAGS |
call CAL_COPYDATE( modelstartdate, targetdate, mythid ) |
|
./pkg/ecco/cost_averagesflags.F |
177 |
COST_AVERAGESFLAGS |
targetdate(1) = mydate(1) |
|
./pkg/ecco/cost_averagesflags.F |
178 |
COST_AVERAGESFLAGS |
targetdate(2) = 0 |
|
./pkg/ecco/cost_averagesflags.F |
179 |
COST_AVERAGESFLAGS |
targetdate(3) = mydate(3) |
|
./pkg/ecco/cost_averagesflags.F |
180 |
COST_AVERAGESFLAGS |
targetdate(4) = mydate(4) |
|
./pkg/ecco/cost_averagesflags.F |
181 |
COST_AVERAGESFLAGS |
call CAL_TIMEPASSED( modelstartdate, targetdate, datediff, |
|
./pkg/ecco/cost_averagesflags.F |
192 |
COST_AVERAGESFLAGS |
& cal_NumInts( targetdate, mydate, timediff, mythid ) + 1 |
|
./pkg/ecco/cost_averagesflags.F |
228 |
COST_AVERAGESFLAGS |
call CAL_COPYDATE( modelstartdate, targetdate, mythid ) |
|
./pkg/ecco/cost_averagesflags.F |
233 |
COST_AVERAGESFLAGS |
call CAL_FULLDATE( targetdate1, targetdate2, targetdate, |
|
./pkg/ecco/cost_averagesflags.F |
248 |
COST_AVERAGESFLAGS |
& cal_NumInts( targetdate, mydate, timediff, mythid ) + 1 |
|
./pkg/ecco/cost_averagesflags.F |
285 |
COST_AVERAGESFLAGS |
call CAL_COPYDATE( modelstartdate, targetdate, mythid ) |
|
./pkg/ecco/cost_averagesflags.F |
290 |
COST_AVERAGESFLAGS |
call CAL_FULLDATE( targetdate1, targetdate2, targetdate, |
|
./pkg/ecco/cost_averagesflags.F |
298 |
COST_AVERAGESFLAGS |
& cal_NumInts( targetdate, mydate, timediff, mythid ) + 1 |
|
./pkg/ecco/cost_averagesflags.F |
86 |
COST_AVERAGESFLAGS |
integer targetdate(4) |