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