Symbol Description Uses
num_tmi 5


File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 178 ECCO_COST_INIT_VARIA 
          num_tmi(bi,bj)      = 0. _d 0
./pkg/ecco/cost_hyd.F 207 COST_HYD 
     &     0, tmidatfile, objf_tmi, num_tmi,
./pkg/ecco/ecco_cost.h 536 NO PROCEDURE 
     &                num_tmi,
./pkg/ecco/ecco_cost.h 619 NO PROCEDURE 
      _RL  num_tmi  (nsx,nsy)
./pkg/ecco/ecco_cost_final.F 719 ECCO_COST_FINAL 
          no_tmi  = no_tmi + num_tmi(bi,bj)