Symbol Description Uses
ymod 6



File Line number Procedure Code
./pkg/ecco/cost_readtopex.F 101 COST_READTOPEX
      if ( ymod .EQ. yday ) then
./pkg/ecco/cost_readtopex.F 69 COST_READTOPEX
      integer yday, ymod
./pkg/ecco/cost_readtopex.F 99 COST_READTOPEX
      ymod = topexstartdate(1)/10000
./pkg/ecco/cost_readers.F 101 COST_READERS
      if ( ymod .EQ. yday ) then
./pkg/ecco/cost_readers.F 69 COST_READERS
      integer yday, ymod
./pkg/ecco/cost_readers.F 99 COST_READERS
      ymod = ersstartdate(1)/10000