Symbol Description Uses
objf_kapgm 6



File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 149 ECCO_COST_INIT_VARIA
          objf_kapgm(bi,bj)    = 0. _d 0
./pkg/ecco/cost_internal_params.F 80 COST_INTERNAL_PARAMS
     &     num_kapgm, objf_kapgm, maskC, myThid )
./pkg/ecco/ecco_cost.h 398 NO PROCEDURE
     &     objf_kapgm,
./pkg/ecco/ecco_cost.h 499 NO PROCEDURE
      _RL  objf_kapgm(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 487 ECCO_COST_FINAL
     &         + mult_kapgm   * objf_kapgm(bi,bj)
./pkg/ecco/ecco_cost_final.F 625 ECCO_COST_FINAL
          f_kapgm = f_kapgm + objf_kapgm(bi,bj)