| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_averagesflags.F |
173 |
COST_AVERAGESFLAGS |
call CAL_COPYDATE( modelstartdate, targetdate, mythid ) |
|
./pkg/ecco/cost_averagesflags.F |
176 |
COST_AVERAGESFLAGS |
targetdate(1) = mydate(1) |
|
./pkg/ecco/cost_averagesflags.F |
177 |
COST_AVERAGESFLAGS |
targetdate(2) = 0 |
|
./pkg/ecco/cost_averagesflags.F |
178 |
COST_AVERAGESFLAGS |
targetdate(3) = mydate(3) |
|
./pkg/ecco/cost_averagesflags.F |
179 |
COST_AVERAGESFLAGS |
targetdate(4) = mydate(4) |
|
./pkg/ecco/cost_averagesflags.F |
180 |
COST_AVERAGESFLAGS |
call CAL_TIMEPASSED( modelstartdate, targetdate, datediff, |
|
./pkg/ecco/cost_averagesflags.F |
191 |
COST_AVERAGESFLAGS |
& cal_NumInts( targetdate, mydate, timediff, mythid ) + 1 |
|
./pkg/ecco/cost_averagesflags.F |
227 |
COST_AVERAGESFLAGS |
call CAL_COPYDATE( modelstartdate, targetdate, mythid ) |
|
./pkg/ecco/cost_averagesflags.F |
232 |
COST_AVERAGESFLAGS |
call CAL_FULLDATE( targetdate1, targetdate2, targetdate, |
|
./pkg/ecco/cost_averagesflags.F |
247 |
COST_AVERAGESFLAGS |
& cal_NumInts( targetdate, mydate, timediff, mythid ) + 1 |
|
./pkg/ecco/cost_averagesflags.F |
284 |
COST_AVERAGESFLAGS |
call CAL_COPYDATE( modelstartdate, targetdate, mythid ) |
|
./pkg/ecco/cost_averagesflags.F |
289 |
COST_AVERAGESFLAGS |
call CAL_FULLDATE( targetdate1, targetdate2, targetdate, |
|
./pkg/ecco/cost_averagesflags.F |
297 |
COST_AVERAGESFLAGS |
& cal_NumInts( targetdate, mydate, timediff, mythid ) + 1 |
|
./pkg/ecco/cost_averagesflags.F |
85 |
COST_AVERAGESFLAGS |
integer targetdate(4) |