| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_averagesflags.F |
254 |
COST_AVERAGESFLAGS |
mydateyear = int(mydate(1)/10000) |
|
./pkg/ecco/cost_averagesflags.F |
256 |
COST_AVERAGESFLAGS |
if ( mydateyear .ne. prevdateyear ) then |
|
./pkg/ecco/cost_averagesflags.F |
263 |
COST_AVERAGESFLAGS |
mydateyear = int(mydate(1)/10000) |
|
./pkg/ecco/cost_averagesflags.F |
265 |
COST_AVERAGESFLAGS |
if ( mydateyear .ne. nextdateyear ) then |
|
./pkg/ecco/cost_averagesflags.F |
274 |
COST_AVERAGESFLAGS |
if ( ( mydateyear .eq. prevdateyear ) .and. |
|
./pkg/ecco/cost_averagesflags.F |
275 |
COST_AVERAGESFLAGS |
& ( mydateyear .eq. nextdateyear ) ) then |
|
./pkg/ecco/cost_averagesflags.F |
91 |
COST_AVERAGESFLAGS |
integer mydateyear |