| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_forcing.F |
272 |
COST_FORCING |
& objf_swfluxm, objf_swfluxsmoo, |
|
./pkg/ecco/ecco_cost.h |
387 |
NO PROCEDURE |
& objf_swflux, objf_swfluxm, objf_swfluxsmoo, |
|
./pkg/ecco/ecco_cost.h |
488 |
NO PROCEDURE |
_RL objf_swfluxsmoo(nsx,nsy) |
|
./pkg/ecco/ecco_cost_final.F |
479 |
ECCO_COST_FINAL |
& +mult_smooth_bc*objf_swfluxsmoo(bi,bj) ) |
|
./pkg/ecco/ecco_cost_final.F |
593 |
ECCO_COST_FINAL |
f_swfluxsmoo = f_swfluxsmoo + objf_swfluxsmoo(bi,bj) |