Symbol Description Uses
objf_sdrift 5



File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 129 ECCO_COST_INIT_VARIA
          objf_sdrift(bi,bj)   = 0. _d 0
./pkg/ecco/ecco_cost.h 382 NO PROCEDURE
     &     objf_drift, objf_tdrift, objf_sdrift, objf_wdrift,
./pkg/ecco/ecco_cost.h 453 NO PROCEDURE
      _RL  objf_sdrift(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 461 ECCO_COST_FINAL
     &         + mult_sdrift  * objf_sdrift(bi,bj)
./pkg/ecco/ecco_cost_final.F 617 ECCO_COST_FINAL
          f_sdrift = f_sdrift + objf_sdrift(bi,bj)