Symbol Description Uses
gencost_spzero 6


File Line number Procedure Code
./pkg/ecco/cost_gencost_all.F 76 COST_GENCOST_ALL 
     &        gencost_spzero(k),
./pkg/ecco/ecco_cost.h 65 NO PROCEDURE 
     &       gencost_spmin, gencost_spmax, gencost_spzero
./pkg/ecco/ecco_cost.h 71 NO PROCEDURE 
      _RL  gencost_spzero(NGENCOST)
./pkg/ecco/ecco_readparms.F 140 ECCO_READPARMS 
     &         gencost_spzero,
./pkg/ecco/ecco_readparms.F 460 ECCO_READPARMS 
         gencost_spzero        = 9876. _d 0
./pkg/ecco/ecco_readparms.F 493 ECCO_READPARMS 
           if ( gencost_spzero(k) .EQ. 9876. _d 0 ) then