Symbol Description Uses
gencost_spzero 9


File Line number Procedure Code
./pkg/ecco/ecco_readparms.F 193 ECCO_READPARMS 
     &         gencost_spzero,
./pkg/ecco/ecco_readparms.F 605 ECCO_READPARMS 
         gencost_spzero(k)     = 9876. _d 0
./pkg/ecco/ecco_readparms.F 850 ECCO_READPARMS 
          if ( gencost_spzero(k) .EQ. 9876. _d 0 ) then
./pkg/ecco/cost_gencost_all.F 82 COST_GENCOST_ALL 
     &     gencost_spmin(k), gencost_spmax(k), gencost_spzero(k),
./pkg/ecco/cost_gencost_glbmean.F 144 COST_GENCOST_GLBMEAN 
     &        gencost_1DDATA(irec,kgen).ne.gencost_spzero(kgen) ) then
./pkg/ecco/cost_gencost_seaicev4.F 169 COST_GENCOST_SEAICEV4 
      spzeroloc=gencost_spzero(igen_conc)
./pkg/ecco/cost_gencost_transp.F 155 COST_GENCOST_TRANSP 
          spzeroloc=gencost_spzero(kgen(icount))
./pkg/ecco/ecco.h 236 NO PROCEDURE 
     &       gencost_spmin, gencost_spmax, gencost_spzero,
./pkg/ecco/ecco.h 245 NO PROCEDURE 
      _RL  gencost_spzero(NGENCOST)