Symbol Description Uses
beginrun 16


File Line number Procedure Code
./pkg/ecco/cost_readargos.F 53 COST_READARGOS 
      integer beginrun
./pkg/ecco/cost_readargos.F 73 COST_READARGOS 
      beginrun = modelstartdate(1)/10000
./pkg/ecco/cost_readargos.F 74 COST_READARGOS 
      if ( beginargos .eq. beginrun ) then
./pkg/ecco/cost_readargos.F 78 COST_READARGOS 
        argosrec = ( beginrun - beginargos - 1)*nmonthyear +
./pkg/ecco/cost_readscatyfields.F 56 COST_READSCATYFIELDS 
      integer beginrun
./pkg/ecco/cost_readsstfields.F 56 COST_READSSTFIELDS 
      integer beginrun
./pkg/ecco/cost_readargot.F 53 COST_READARGOT 
      integer beginrun
./pkg/ecco/cost_readargot.F 73 COST_READARGOT 
      beginrun = modelstartdate(1)/10000
./pkg/ecco/cost_readargot.F 74 COST_READARGOT 
      if ( beginargot .eq. beginrun ) then
./pkg/ecco/cost_readargot.F 78 COST_READARGOT 
        argotrec = ( beginrun - beginargot - 1)*nmonthyear +
./pkg/ecco/cost_readsssfields.F 56 COST_READSSSFIELDS 
      integer beginrun
./pkg/ecco/cost_readtmifields.F 56 COST_READTMIFIELDS 
      integer beginrun
./pkg/ecco/cost_readtmifields.F 89 COST_READTMIFIELDS 
      beginrun = modelstartdate(1)/10000
./pkg/ecco/cost_readtmifields.F 90 COST_READTMIFIELDS 
      if ( begintmi .eq. beginrun ) then
./pkg/ecco/cost_readtmifields.F 94 COST_READTMIFIELDS 
        tmirec = ( beginrun - begintmi - 1)*nmonthyear +
./pkg/ecco/cost_readscatxfields.F 56 COST_READSCATXFIELDS 
      integer beginrun