Symbol Description Uses
ymod 46



File Line number Procedure Code
./pkg/seaice/seaice_cost_concentration.F 105 SEAICE_COST_CONCENTRATION
      integer yday, ymod
./pkg/seaice/seaice_cost_concentration.F 174 SEAICE_COST_CONCENTRATION
      ymod = smrareastartdate(1)/10000
./pkg/seaice/seaice_cost_concentration.F 187 SEAICE_COST_CONCENTRATION
      print *,'ymod, yday     ', ymod,yday
./pkg/seaice/seaice_cost_concentration.F 192 SEAICE_COST_CONCENTRATION
      if ( ymod .EQ. yday ) then
./pkg/seaice/seaice_cost_sss.F 106 SEAICE_COST_SSS
      integer yday, ymod
./pkg/seaice/seaice_cost_sss.F 192 SEAICE_COST_SSS
      ymod = smrareastartdate(1)/10000
./pkg/seaice/seaice_cost_sss.F 205 SEAICE_COST_SSS
      print *,'ymod, yday     ', ymod,yday
./pkg/seaice/seaice_cost_sss.F 210 SEAICE_COST_SSS
      if ( ymod .EQ. yday ) then
./pkg/seaice/seaice_cost_sst.F 104 SEAICE_COST_SST
      integer yday, ymod
./pkg/seaice/seaice_cost_sst.F 192 SEAICE_COST_SST
      ymod = smrareastartdate(1)/10000
./pkg/seaice/seaice_cost_sst.F 205 SEAICE_COST_SST
      print *,'ymod, yday     ', ymod,yday
./pkg/seaice/seaice_cost_sst.F 210 SEAICE_COST_SST
      if ( ymod .EQ. yday ) then
./pkg/ecco/cost_gencost_seaicev4.F 115 COST_GENCOST_SEAICEV4
      integer yday, ymod
./pkg/ecco/cost_gencost_seaicev4.F 273 COST_GENCOST_SEAICEV4
           ymod = localstartdate(1)/10000
./pkg/ecco/cost_gencost_seaicev4.F 274 COST_GENCOST_SEAICEV4
           if ( ymod .EQ. yday ) then
./pkg/ecco/cost_gencost_sstv4.F 102 COST_GENCOST_SSTV4
      integer yday, ymod
./pkg/ecco/cost_gencost_sstv4.F 189 COST_GENCOST_SSTV4
             ymod = locstartdate(1)/10000
./pkg/ecco/cost_gencost_sstv4.F 190 COST_GENCOST_SSTV4
             if ( ymod .GE. yday ) then
./pkg/ecco/cost_gencost_sstv4.F 210 COST_GENCOST_SSTV4
     &      yday,' ',ymod,' ',localrec,' ',diffsecs
./pkg/ecco/cost_gencost_sstv4.F 341 COST_GENCOST_SSTV4
             ymod = locstartdate(1)/10000
./pkg/ecco/cost_gencost_sstv4.F 342 COST_GENCOST_SSTV4
             if ( ymod .GE. yday ) then
./pkg/ecco/cost_gencost_sstv4.F 362 COST_GENCOST_SSTV4
     &      yday,' ',ymod,' ',localrec,' ',diffsecs
./pkg/ecco/cost_generic.F 108 COST_GENERIC
      integer yday, ymod
./pkg/ecco/cost_generic.F 203 COST_GENERIC
           ymod = localstartdate(1)/10000
./pkg/ecco/cost_generic.F 208 COST_GENERIC
           if ( ymod .GE. yday ) then
./pkg/ecco/cost_readers.F 66 COST_READERS
      integer yday, ymod
./pkg/ecco/cost_readers.F 96 COST_READERS
      ymod = ersstartdate(1)/10000
./pkg/ecco/cost_readers.F 98 COST_READERS
      if ( ymod .GE. yday ) then
./pkg/ecco/cost_readgfo.F 66 COST_READGFO
      integer yday, ymod
./pkg/ecco/cost_readgfo.F 96 COST_READGFO
      ymod = gfostartdate(1)/10000
./pkg/ecco/cost_readgfo.F 98 COST_READGFO
      if ( ymod .GE. yday ) then
./pkg/ecco/cost_readscatxfields.F 128 COST_READSCATXFIELDS
           ymod = scatxstartdate(1)/10000
./pkg/ecco/cost_readscatxfields.F 129 COST_READSCATXFIELDS
           if ( ymod .GE. yday ) then
./pkg/ecco/cost_readscatxfields.F 73 COST_READSCATXFIELDS
      integer yday, ymod
./pkg/ecco/cost_readscatyfields.F 128 COST_READSCATYFIELDS
           ymod = scatystartdate(1)/10000
./pkg/ecco/cost_readscatyfields.F 129 COST_READSCATYFIELDS
           if ( ymod .GE. yday ) then
./pkg/ecco/cost_readscatyfields.F 73 COST_READSCATYFIELDS
      integer yday, ymod
./pkg/ecco/cost_readtopex.F 105 COST_READTOPEX
      ymod = topexstartdate(1)/10000
./pkg/ecco/cost_readtopex.F 107 COST_READTOPEX
      if ( ymod .GE. yday ) then
./pkg/ecco/cost_readtopex.F 124 COST_READTOPEX
     &      yday,' ',ymod,' ',sshrec,' ',diffsecs
./pkg/ecco/cost_readtopex.F 141 COST_READTOPEX
     &      yday,' ',ymod,' ',sshrec,' ',diffsecs
./pkg/ecco/cost_readtopex.F 66 COST_READTOPEX
      integer yday, ymod
./pkg/ecco/cost_sla_read.F 101 COST_SLA_READ
      ymod = sla_startdate(1)/10000
./pkg/ecco/cost_sla_read.F 103 COST_SLA_READ
      if ( ymod .GE. yday ) then
./pkg/ecco/cost_sla_read.F 71 COST_SLA_READ
      integer yday, ymod
./pkg/ecco/cost_sla_read_yd.F 71 COST_SLA_READ_YD
      integer yday, ymod