Symbol Description Uses
argosrec 5



File Line number Procedure Code
./pkg/ecco/cost_readargos.F 51 COST_READARGOS
      integer argosrec
./pkg/ecco/cost_readargos.F 75 COST_READARGOS
        argosrec = mod(modelstartdate(1)/100,100) -
./pkg/ecco/cost_readargos.F 78 COST_READARGOS
        argosrec = ( beginrun - beginargos - 1)*nmonthyear +
./pkg/ecco/cost_readargos.F 82 COST_READARGOS
      if (argosrec.gt.0) then
./pkg/ecco/cost_readargos.F 84 COST_READARGOS
     &        argosobs,argosrec, mythid )