Symbol Description Uses
num_tdrift 6


File Line number Procedure Code
./pkg/ecco/cost_drift.F 261 COST_DRIFT 
     &                 num_tdrift(bi,bj) = num_tdrift(bi,bj) + 1. _d 0
./pkg/ecco/ecco_cost.h 573 NO PROCEDURE 
     &                num_tdrift,
./pkg/ecco/ecco_cost.h 655 NO PROCEDURE 
      _RL  num_tdrift(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 564 ECCO_COST_FINAL 
          no_tdrift = no_tdrift + num_tdrift(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 183 ECCO_COST_INIT_VARIA 
          num_tdrift(bi,bj)   = 0. _d 0