Symbol Description Uses
objf_tp 15



File Line number Procedure Code
./pkg/ecco/cost_ssh.F 267 COST_SSH
                objf_tp(bi,bj) = objf_tp(bi,bj)
./pkg/ecco/cost_ssh.F 276 COST_SSH
                objf_tp(bi,bj) = objf_tp(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 352 COST_SSH_NEW
                objf_tp(bi,bj) = objf_tp(bi,bj)
./pkg/ecco/cost_ssh_new.F 361 COST_SSH_NEW
                objf_tp(bi,bj) = objf_tp(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 454 NO PROCEDURE
      _RL  objf_tp   (nsx,nsy)
./pkg/ecco/ecco_cost_final.F 345 ECCO_COST_FINAL
     &         + mult_h       * ( mult_tp  * objf_tp(bi,bj)
./pkg/ecco/ecco_cost_final.F 459 ECCO_COST_FINAL
          f_tp   = f_tp  + objf_tp(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 101 ECCO_COST_INIT_VARIA
          objf_tp(bi,bj)       = 0. _d 0