Symbol Description Uses
objf_drift 5



File Line number Procedure Code
./pkg/ecco/ecco_cost_init_varia.F 127 ECCO_COST_INIT_VARIA
          objf_drift(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 451 NO PROCEDURE
      _RL  objf_drift(nsx,nsy)
./pkg/ecco/ecco_cost_final.F 460 ECCO_COST_FINAL
     &         + mult_drift   * objf_drift(bi,bj)
./pkg/ecco/ecco_cost_final.F 616 ECCO_COST_FINAL
          f_drifter = f_drifter + objf_drift(bi,bj)