Symbol Description Uses
objf_gfo 15



File Line number Procedure Code
./pkg/ecco/cost_ssh.F 324 COST_SSH
                objf_gfo(bi,bj) = objf_gfo(bi,bj)
./pkg/ecco/cost_ssh.F 333 COST_SSH
                objf_gfo(bi,bj) = objf_gfo(bi,bj)
./pkg/ecco/cost_ssh.F 351 COST_SSH
     &        objf_tp(bi,bj) + objf_ers(bi,bj) + objf_gfo(bi,bj)
./pkg/ecco/cost_ssh_new.F 413 COST_SSH_NEW
                objf_gfo(bi,bj) = objf_gfo(bi,bj)
./pkg/ecco/cost_ssh_new.F 422 COST_SSH_NEW
                objf_gfo(bi,bj) = objf_gfo(bi,bj)
./pkg/ecco/cost_ssh_new.F 440 COST_SSH_NEW
     &        objf_tp(bi,bj) + objf_ers(bi,bj) + objf_gfo(bi,bj)
./pkg/ecco/ecco_cost.h 458 NO PROCEDURE
     &     objf_h, objf_tp, objf_ers, objf_gfo,
./pkg/ecco/ecco_cost.h 518 NO PROCEDURE
      _RL  objf_gfo  (nsx,nsy)
./pkg/ecco/ecco_cost_final.F 411 ECCO_COST_FINAL
     &                          + mult_gfo * objf_gfo(bi,bj) )
./pkg/ecco/ecco_cost_final.F 547 ECCO_COST_FINAL
          f_gfo  = f_gfo + objf_gfo(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 109 ECCO_COST_INIT_VARIA
          objf_gfo(bi,bj)      = 0. _d 0