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