Symbol Description Uses
num_wdrift 4



File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 194 ECCO_COST_INIT_VARIA
          num_wdrift(bi,bj)   = 0. _d 0
./pkg/ecco/ecco_cost.h 551 NO PROCEDURE
     &                num_wdrift,
./pkg/ecco/ecco_cost.h 634 NO PROCEDURE
      _RL  num_wdrift(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 733 ECCO_COST_FINAL
          no_wdrift = no_wdrift + num_wdrift(bi,bj)