Symbol Description Uses
gencost_errfile 10



File Line number Procedure Code
./pkg/ecco/cost_gencost_boxmean.F 111 COST_GENCOST_BOXMEAN
        call MDSREADFIELD( gencost_errfile(igen_boxmean),
./pkg/ecco/cost_gencost_boxmean.F 140 COST_GENCOST_BOXMEAN
        call MDSREADFIELD( gencost_errfile(igen_boxmean),
./pkg/ecco/cost_gencost_seaicev4.F 215 COST_GENCOST_SEAICEV4
      localobswfile=gencost_errfile(igen_conc)
./pkg/ecco/ecco_cost.h 107 NO PROCEDURE
     &       gencost_errfile,
./pkg/ecco/ecco_cost.h 114 NO PROCEDURE
      character*(MAX_LEN_FNAM) gencost_errfile(NGENCOST)
./pkg/ecco/ecco_cost_weights.F 1607 ECCO_COST_WEIGHTS
      if ( gencost_errfile(k) .NE. ' ' ) then
./pkg/ecco/ecco_cost_weights.F 1611 ECCO_COST_WEIGHTS
        call MDSREADFIELD( gencost_errfile(k), cost_iprec, cost_yftype,
./pkg/ecco/ecco_cost_weights.F 1615 ECCO_COST_WEIGHTS
        call MDSREADFIELD( gencost_errfile(k), cost_iprec, cost_yftype,
./pkg/ecco/ecco_readparms.F 158 ECCO_READPARMS
     &         gencost_errfile,
./pkg/ecco/ecco_readparms.F 521 ECCO_READPARMS
         gencost_errfile(k)    = ' '