Symbol Description Uses
f_usercost 7



File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 104 ECCO_COST_FINAL
      _RL f_usercost(NUSERCOST)
./pkg/ecco/ecco_cost_final.F 1135 ECCO_COST_FINAL
     &     ' --> f_usercost =',f_usercost(num_var),
./pkg/ecco/ecco_cost_final.F 1423 ECCO_COST_FINAL
     &    f_usercost(num_var),
./pkg/ecco/ecco_cost_final.F 267 ECCO_COST_FINAL
        f_usercost(num_var)= 0. _d 0
./pkg/ecco/ecco_cost_final.F 600 ECCO_COST_FINAL
          f_usercost(num_var)=f_usercost(num_var)
./pkg/ecco/ecco_cost_final.F 832 ECCO_COST_FINAL
        _GLOBAL_SUM_RL(f_usercost(num_var), myThid )