Symbol | Description | Uses |
nextdateday | 4 |
File | Line number | Procedure | Code |
./pkg/ecco/cost_averagesflags.F | 154 | COST_AVERAGESFLAGS |
nextdateday = mod(nextdate(1),100) |
./pkg/ecco/cost_averagesflags.F | 155 | COST_AVERAGESFLAGS |
if ( mydateday .ne. nextdateday ) then |
./pkg/ecco/cost_averagesflags.F | 165 | COST_AVERAGESFLAGS |
& ( mydateday .eq. nextdateday ) ) then |
./pkg/ecco/cost_averagesflags.F | 92 | COST_AVERAGESFLAGS |
integer nextdateday |