| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_forcing.F |
194 |
COST_FORCING |
& objf_swflux, objf_swfluxm, objf_swfluxsmoo, |
|
./pkg/ecco/ecco_cost.h |
416 |
NO PROCEDURE |
& objf_swflux, objf_swfluxm, objf_swfluxsmoo, |
|
./pkg/ecco/ecco_cost.h |
500 |
NO PROCEDURE |
_RL objf_swfluxm(nsx,nsy) |
|
./pkg/ecco/ecco_cost_final.F |
374 |
ECCO_COST_FINAL |
& + mult_swflux * ( objf_swflux(bi,bj)+objf_swfluxm(bi,bj) |
|
./pkg/ecco/ecco_cost_final.F |
449 |
ECCO_COST_FINAL |
f_swfluxm = f_swfluxm + objf_swfluxm(bi,bj) |