Symbol Description Uses
objf_tmi 7


File Line number Procedure Code
./pkg/ecco/cost_tmi.F 157 COST_TMI 
            objf_tmi(bi,bj)  = objf_tmi(bi,bj)  + fctile_tmi
./pkg/ecco/ecco_cost_final.F 204 ECCO_COST_FINAL 
     &            + mult_tmi     * objf_tmi(bi,bj)
./pkg/ecco/ecco_cost_final.F 268 ECCO_COST_FINAL 
          f_tmi  = f_tmi + objf_tmi(bi,bj)
./pkg/ecco/ecco_cost.h 304 NO PROCEDURE 
     &                objf_tmi,
./pkg/ecco/ecco_cost.h 355 NO PROCEDURE 
      _RL  objf_tmi  (nsx,nsy)
./pkg/ecco/ecco_cost_initvaria.F 95 ECCO_COST_INITVARIA 
          objf_tmi(bi,bj)      = 0. _d 0