Symbol | Description | Uses |
nextdateyear | 4 |
File | Line number | Procedure | Code |
./pkg/ecco/cost_averagesflags.F | 264 | COST_AVERAGESFLAGS |
nextdateyear = int(nextdate(1)/10000) |
./pkg/ecco/cost_averagesflags.F | 265 | COST_AVERAGESFLAGS |
if ( mydateyear .ne. nextdateyear ) then |
./pkg/ecco/cost_averagesflags.F | 275 | COST_AVERAGESFLAGS |
& ( mydateyear .eq. nextdateyear ) ) then |
./pkg/ecco/cost_averagesflags.F | 94 | COST_AVERAGESFLAGS |
integer nextdateyear |