| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_averagesflags.F |
144 |
COST_AVERAGESFLAGS |
mydateday = mod(mydate(1),100) |
|
./pkg/ecco/cost_averagesflags.F |
146 |
COST_AVERAGESFLAGS |
if ( mydateday .ne. prevdateday ) then |
|
./pkg/ecco/cost_averagesflags.F |
153 |
COST_AVERAGESFLAGS |
mydateday = mod(mydate(1),100) |
|
./pkg/ecco/cost_averagesflags.F |
155 |
COST_AVERAGESFLAGS |
if ( mydateday .ne. nextdateday ) then |
|
./pkg/ecco/cost_averagesflags.F |
164 |
COST_AVERAGESFLAGS |
if ( ( mydateday .eq. prevdateday ) .and. |
|
./pkg/ecco/cost_averagesflags.F |
165 |
COST_AVERAGESFLAGS |
& ( mydateday .eq. nextdateday ) ) then |
|
./pkg/ecco/cost_averagesflags.F |
89 |
COST_AVERAGESFLAGS |
integer mydateday |