Symbol Description Uses
objf_ers 15



File Line number Procedure Code
./pkg/ecco/cost_ssh.F 294 COST_SSH
                objf_ers(bi,bj) = objf_ers(bi,bj)
./pkg/ecco/cost_ssh.F 303 COST_SSH
                objf_ers(bi,bj) = objf_ers(bi,bj)
./pkg/ecco/cost_ssh.F 348 COST_SSH
     &        objf_tp(bi,bj) + objf_ers(bi,bj) + objf_gfo(bi,bj)
./pkg/ecco/cost_ssh_new.F 381 COST_SSH_NEW
                objf_ers(bi,bj) = objf_ers(bi,bj)
./pkg/ecco/cost_ssh_new.F 390 COST_SSH_NEW
                objf_ers(bi,bj) = objf_ers(bi,bj)
./pkg/ecco/cost_ssh_new.F 437 COST_SSH_NEW
     &        objf_tp(bi,bj) + objf_ers(bi,bj) + objf_gfo(bi,bj)
./pkg/ecco/ecco_cost.h 400 NO PROCEDURE
     &     objf_h, objf_tp, objf_ers, objf_gfo,
./pkg/ecco/ecco_cost.h 455 NO PROCEDURE
      _RL  objf_ers  (nsx,nsy)
./pkg/ecco/ecco_cost_final.F 346 ECCO_COST_FINAL
     &                          + mult_ers * objf_ers(bi,bj)
./pkg/ecco/ecco_cost_final.F 460 ECCO_COST_FINAL
          f_ers  = f_ers + objf_ers(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 102 ECCO_COST_INIT_VARIA
          objf_ers(bi,bj)      = 0. _d 0