| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_drifter.F |
323 |
COST_DRIFTER |
objf_drift(bi,bj) = objf_drift(bi,bj) + fctile_drift |
|
./pkg/ecco/ecco_cost.h |
411 |
NO PROCEDURE |
& objf_drift, objf_tdrift, objf_sdrift, objf_wdrift, |
|
./pkg/ecco/ecco_cost.h |
476 |
NO PROCEDURE |
_RL objf_drift(nsx,nsy) |
|
./pkg/ecco/ecco_cost_final.F |
356 |
ECCO_COST_FINAL |
& + mult_drift * objf_drift(bi,bj) |
|
./pkg/ecco/ecco_cost_final.F |
474 |
ECCO_COST_FINAL |
f_drifter = f_drifter + objf_drift(bi,bj) |
|
./pkg/ecco/ecco_cost_init_varia.F |
111 |
ECCO_COST_INIT_VARIA |
objf_drift(bi,bj) = 0. _d 0 |