Symbol Description Uses
objf_etan0 7



File Line number Procedure Code
./pkg/ecco/cost_etan0.F 133 COST_ETAN0
            objf_etan0(bi,bj) = objf_etan0(bi,bj) + fctile
./pkg/ecco/ecco_cost.h 466 NO PROCEDURE
     &     objf_etan0, objf_uvel0, objf_vvel0,
./pkg/ecco/ecco_cost.h 529 NO PROCEDURE
      _RL  objf_etan0(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 393 ECCO_COST_FINAL
     &         + mult_etan0   * objf_etan0(bi,bj)
./pkg/ecco/ecco_cost_final.F 504 ECCO_COST_FINAL
          f_etan0 = f_etan0 + objf_etan0(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 99 ECCO_COST_INIT_VARIA
          objf_etan0(bi,bj)    = 0. _d 0