Symbol Description Uses
objf_h 8


File Line number Procedure Code
./pkg/ecco/ecco_cost_final.F 214 ECCO_COST_FINAL 
     &            + mult_h       * objf_h(bi,bj)
./pkg/ecco/ecco_cost_final.F 266 ECCO_COST_FINAL 
          f_ssh  = f_ssh + objf_h(bi,bj)
./pkg/ecco/ecco_cost.h 298 NO PROCEDURE 
     &                objf_h,
./pkg/ecco/ecco_cost.h 349 NO PROCEDURE 
      _RL  objf_h    (nsx,nsy)
./pkg/ecco/ecco_cost_initvaria.F 98 ECCO_COST_INITVARIA 
          objf_h(bi,bj)        = 0. _d 0
./pkg/ecco/cost_ssh.F 273 COST_SSH 
            objf_h(bi,bj) = objf_h(bi,bj) + tpcost + erscost
./pkg/ecco/cost_ssh.F 292 COST_SSH 
     &        ' COST_SSH: cost function (Total) = ',objf_h(bi,bj)