Symbol Description Uses
no_gencost 8


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 1015 ECCO_COST_FINAL 
        _GLOBAL_SUM_RL(no_gencost(num_var), myThid )
./pkg/ecco/ecco_cost_final.F 1235 ECCO_COST_FINAL 
        if (no_gencost(num_var).GT.0) then
./pkg/ecco/ecco_cost_final.F 1554 ECCO_COST_FINAL 
        if (no_gencost(num_var).GT.0) then
./pkg/ecco/ecco_cost_final.F 155 ECCO_COST_FINAL 
      _RL no_gencost(NGENCOST)
./pkg/ecco/ecco_cost_final.F 1560 ECCO_COST_FINAL 
     &    no_gencost(num_var)
./pkg/ecco/ecco_cost_final.F 400 ECCO_COST_FINAL 
        no_gencost(num_var)= 0. _d 0
./pkg/ecco/ecco_cost_final.F 770 ECCO_COST_FINAL 
          no_gencost(num_var)=no_gencost(num_var)