Symbol Description Uses
objf_diffkr 6


File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 148 ECCO_COST_INIT_VARIA 
          objf_diffkr(bi,bj)   = 0. _d 0
./pkg/ecco/cost_internal_params.F 100 COST_INTERNAL_PARAMS 
     &     num_diffkr, objf_diffkr, maskC, myThid )
./pkg/ecco/ecco_cost.h 400 NO PROCEDURE 
     &     objf_diffkr,
./pkg/ecco/ecco_cost.h 501 NO PROCEDURE 
      _RL  objf_diffkr(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 489 ECCO_COST_FINAL 
     &         + mult_diffkr  * objf_diffkr(bi,bj)
./pkg/ecco/ecco_cost_final.F 627 ECCO_COST_FINAL 
          f_diffkr = f_diffkr + objf_diffkr(bi,bj)