Symbol Description Uses
mydateyear 7



File Line number Procedure Code
./pkg/ecco/cost_averagesflags.F 254 COST_AVERAGESFLAGS
      mydateyear   = int(mydate(1)/10000)
./pkg/ecco/cost_averagesflags.F 256 COST_AVERAGESFLAGS
      if ( mydateyear .ne. prevdateyear ) then
./pkg/ecco/cost_averagesflags.F 263 COST_AVERAGESFLAGS
      mydateyear   = int(mydate(1)/10000)
./pkg/ecco/cost_averagesflags.F 265 COST_AVERAGESFLAGS
      if ( mydateyear .ne. nextdateyear ) then
./pkg/ecco/cost_averagesflags.F 274 COST_AVERAGESFLAGS
      if ( ( mydateyear .eq. prevdateyear ) .and.
./pkg/ecco/cost_averagesflags.F 275 COST_AVERAGESFLAGS
     &     ( mydateyear .eq. nextdateyear )       ) then
./pkg/ecco/cost_averagesflags.F 91 COST_AVERAGESFLAGS
      integer mydateyear