Symbol Description Uses
objf_drift 7


File Line number Procedure Code
./pkg/ecco/cost_drifter.F 320 COST_DRIFTER 
         objf_drift(bi,bj) = objf_drift(bi,bj) + fctile_drift
./pkg/ecco/ecco_cost_final.F 223 ECCO_COST_FINAL 
     &            + mult_drift   * objf_drift(bi,bj)
./pkg/ecco/ecco_cost_final.F 278 ECCO_COST_FINAL 
          f_drifter = f_drifter + objf_drift(bi,bj)
./pkg/ecco/ecco_cost.h 313 NO PROCEDURE 
     &                objf_drift,
./pkg/ecco/ecco_cost.h 364 NO PROCEDURE 
      _RL  objf_drift(nsx,nsy)
./pkg/ecco/ecco_cost_initvaria.F 106 ECCO_COST_INITVARIA 
          objf_drift(bi,bj)    = 0. _d 0