Symbol Description Uses
num_drift 4


File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 193 ECCO_COST_INIT_VARIA 
          num_drift(bi,bj)    = 0. _d 0
./pkg/ecco/ecco_cost.h 548 NO PROCEDURE 
     &                num_drift,
./pkg/ecco/ecco_cost.h 631 NO PROCEDURE 
      _RL  num_drift(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 730 ECCO_COST_FINAL 
          no_drifter = no_drifter + num_drift(bi,bj)