Symbol | Description | Uses |
mydatemonth | 7 |
File | Line number | Procedure | Code |
./pkg/ecco/cost_averagesflags.F | 198 | COST_AVERAGESFLAGS |
mydatemonth = mod(mydate(1)/100,100) |
./pkg/ecco/cost_averagesflags.F | 200 | COST_AVERAGESFLAGS |
if ( mydatemonth .ne. prevdatemonth ) then |
./pkg/ecco/cost_averagesflags.F | 207 | COST_AVERAGESFLAGS |
mydatemonth = mod(mydate(1)/100,100) |
./pkg/ecco/cost_averagesflags.F | 209 | COST_AVERAGESFLAGS |
if ( mydatemonth .ne. nextdatemonth ) then |
./pkg/ecco/cost_averagesflags.F | 218 | COST_AVERAGESFLAGS |
if ( ( mydatemonth .eq. prevdatemonth ) .and. |
./pkg/ecco/cost_averagesflags.F | 219 | COST_AVERAGESFLAGS |
& ( mydatemonth .eq. nextdatemonth ) ) then |
./pkg/ecco/cost_averagesflags.F | 90 | COST_AVERAGESFLAGS |
integer mydatemonth |