| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_init_varia.F |
154 |
ECCO_COST_INIT_VARIA |
objf_bottomdrag(bi,bj) = 0. _d 0 |
|
./pkg/ecco/cost_internal_params.F |
112 |
COST_INTERNAL_PARAMS |
& dodimensionalcost2D, num_bottomdrag, objf_bottomdrag, |
|
./pkg/ecco/ecco_cost.h |
403 |
NO PROCEDURE |
& objf_bottomdrag, |
|
./pkg/ecco/ecco_cost.h |
505 |
NO PROCEDURE |
_RL objf_bottomdrag(nsx,nsy) |
|
./pkg/ecco/ecco_cost_final.F |
493 |
ECCO_COST_FINAL |
& + mult_bottomdrag * objf_bottomdrag(bi,bj) |
|
./pkg/ecco/ecco_cost_final.F |
631 |
ECCO_COST_FINAL |
f_bottomdrag = f_bottomdrag + objf_bottomdrag(bi,bj) |