Symbol | Description | Uses |
nextdatemonth | 4 |
File | Line number | Procedure | Code |
./pkg/ecco/cost_averagesflags.F | 208 | COST_AVERAGESFLAGS |
nextdatemonth = mod(nextdate(1)/100,100) |
./pkg/ecco/cost_averagesflags.F | 209 | COST_AVERAGESFLAGS |
if ( mydatemonth .ne. nextdatemonth ) then |
./pkg/ecco/cost_averagesflags.F | 219 | COST_AVERAGESFLAGS |
& ( mydatemonth .eq. nextdatemonth ) ) then |
./pkg/ecco/cost_averagesflags.F | 93 | COST_AVERAGESFLAGS |
integer nextdatemonth |