Symbol Description Uses
ers_errfile 10


File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 711 ECCO_COST_WEIGHTS 
      if ( ers_errfile .NE. ' ' )
./pkg/ecco/ecco_cost_weights.F 712 ECCO_COST_WEIGHTS 
     &     call MDSREADFIELD( ers_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 728 ECCO_COST_WEIGHTS 
              if ( ers_errfile .NE. ' ' )
./pkg/ecco/ecco_cost_weights.F 740 ECCO_COST_WEIGHTS 
              if ( ers_errfile .NE. ' ' ) then
./pkg/ecco/ecco_local_params.h 205 NO PROCEDURE 
     &                ers_errfile,
./pkg/ecco/ecco_local_params.h 264 NO PROCEDURE 
      character*(MAX_LEN_FNAM) ers_errfile
./pkg/ecco/ecco_readparms.F 101 ECCO_READPARMS 
     &                   tp_errfile, ers_errfile, gfo_errfile,
./pkg/ecco/ecco_readparms.F 308 ECCO_READPARMS 
        ers_errfile           =    ' '
./pkg/ecco/ecco_cost.h 844 NO PROCEDURE 
     &                ers_errfile,
./pkg/ecco/ecco_cost.h 903 NO PROCEDURE 
      character*(MAX_LEN_FNAM) ers_errfile