Symbol Description Uses
gencost_1DDATA 6


File Line number Procedure Code
./pkg/ecco/cost_gencost_glbmean.F 141 COST_GENCOST_GLBMEAN 
         dataglbmean(irec) =  gencost_1DDATA(irec,kgen)
./pkg/ecco/cost_gencost_glbmean.F 142 COST_GENCOST_GLBMEAN 
         if ( gencost_1DDATA(irec,kgen).gt.gencost_spmin(kgen) .and.
./pkg/ecco/cost_gencost_glbmean.F 143 COST_GENCOST_GLBMEAN 
     &        gencost_1DDATA(irec,kgen).lt.gencost_spmax(kgen) .and.
./pkg/ecco/cost_gencost_glbmean.F 144 COST_GENCOST_GLBMEAN 
     &        gencost_1DDATA(irec,kgen).ne.gencost_spzero(kgen) ) then
./pkg/ecco/ecco_cost_init_fixed.F 242 ECCO_COST_INIT_FIXED 
       gencost_1DDATA(irec,k) = 0. _d 0
./pkg/ecco/ecco_cost_init_fixed.F 260 ECCO_COST_INIT_FIXED 
         read(gwunit,*) gencost_1DDATA(irec,k)