Symbol Description Uses
num_sdrift 6


File Line number Procedure Code
./pkg/ecco/cost_drift.F 231 COST_DRIFT 
     &                 num_sdrift(bi,bj) = num_sdrift(bi,bj) + 1. _d 0
./pkg/ecco/ecco_cost.h 574 NO PROCEDURE 
     &                num_sdrift,
./pkg/ecco/ecco_cost.h 656 NO PROCEDURE 
      _RL  num_sdrift(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 563 ECCO_COST_FINAL 
          no_sdrift = no_sdrift + num_sdrift(bi,bj)
./pkg/ecco/ecco_cost_init_varia.F 182 ECCO_COST_INIT_VARIA 
          num_sdrift(bi,bj)   = 0. _d 0