Symbol Description Uses
argosrec 5



File Line number Procedure Code
./pkg/ecco/cost_readargos.F 52 COST_READARGOS
      integer argosrec
./pkg/ecco/cost_readargos.F 76 COST_READARGOS
        argosrec = mod(modelstartdate(1)/100,100) -
./pkg/ecco/cost_readargos.F 79 COST_READARGOS
        argosrec = ( beginrun - beginargos - 1)*nmonthyear +
./pkg/ecco/cost_readargos.F 83 COST_READARGOS
      if (argosrec.gt.0) then
./pkg/ecco/cost_readargos.F 85 COST_READARGOS
     &        argosobs,argosrec, mythid )