Symbol Description Uses
objf_curmtr 7



File Line number Procedure Code
./pkg/ecco/cost_curmtr.F 289 COST_CURMTR
            objf_curmtr(bi,bj) = objf_curmtr(bi,bj) + fctile_curmtr
./pkg/ecco/ecco_cost.h 428 NO PROCEDURE
     &     objf_curmtr,
./pkg/ecco/ecco_cost.h 528 NO PROCEDURE
      _RL  objf_curmtr(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 382 ECCO_COST_FINAL
     &         + mult_curmtr  * objf_curmtr(bi,bj)
./pkg/ecco/ecco_cost_final.F 482 ECCO_COST_FINAL
          f_curmtr = f_curmtr + objf_curmtr(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 130 ECCO_COST_INIT_VARIA
          objf_curmtr(bi,bj)   = 0. _d 0