Symbol Description Uses
gfo_errfile 10



File Line number Procedure Code
./pkg/ecco/ecco_cost_weights.F 716 ECCO_COST_WEIGHTS
      if ( gfo_errfile .NE. ' ' )
./pkg/ecco/ecco_cost_weights.F 717 ECCO_COST_WEIGHTS
     &     call MDSREADFIELD( gfo_errfile, cost_iprec, cost_yftype, nnz,
./pkg/ecco/ecco_cost_weights.F 730 ECCO_COST_WEIGHTS
              if ( gfo_errfile .NE. ' ' )
./pkg/ecco/ecco_cost_weights.F 745 ECCO_COST_WEIGHTS
              if ( gfo_errfile .NE. ' ' ) then
./pkg/ecco/ecco_local_params.h 206 NO PROCEDURE
     &                gfo_errfile,
./pkg/ecco/ecco_local_params.h 265 NO PROCEDURE
      character*(MAX_LEN_FNAM) gfo_errfile
./pkg/ecco/ecco_readparms.F 101 ECCO_READPARMS
     &                   tp_errfile, ers_errfile, gfo_errfile,
./pkg/ecco/ecco_readparms.F 309 ECCO_READPARMS
        gfo_errfile           =    ' '
./pkg/ecco/ecco_cost.h 845 NO PROCEDURE
     &                gfo_errfile,
./pkg/ecco/ecco_cost.h 904 NO PROCEDURE
      character*(MAX_LEN_FNAM) gfo_errfile