File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_cost_weights.F |
273 |
ECCO_COST_WEIGHTS |
wsfluxmm(bi,bj) = 1. |
./pkg/ecco/ecco_cost_weights.F |
922 |
ECCO_COST_WEIGHTS |
if (wsfluxmm(bi,bj).ne.0.) |
./pkg/ecco/ecco_cost_weights.F |
923 |
ECCO_COST_WEIGHTS |
& wsfluxmm(bi,bj) = 1./wsfluxmm(bi,bj)*wsfluxmm(bi,bj) |
./pkg/ecco/cost_mean_saltflux.F |
126 |
COST_MEAN_SALTFLUX |
fctilemm = wsfluxmm(bi,bj) * (fctilemm ) |
./pkg/ecco/ecco_cost.h |
710 |
NO PROCEDURE |
& whfluxmm,wsfluxmm, |
./pkg/ecco/ecco_cost.h |
721 |
NO PROCEDURE |
_RL wsfluxmm(1-olx:snx+olx,1-oly:sny+oly) |
./verification/global1x1_tot/code/ecco_cost_weights.F |
277 |
ECCO_COST_WEIGHTS |
wsfluxmm(bi,bj) = 1. |
./verification/global1x1_tot/code/ecco_cost_weights.F |
982 |
ECCO_COST_WEIGHTS |
if (wsfluxmm(bi,bj).ne.0.) |
./verification/global1x1_tot/code/ecco_cost_weights.F |
983 |
ECCO_COST_WEIGHTS |
& wsfluxmm(bi,bj) = 1./wsfluxmm(bi,bj)*wsfluxmm(bi,bj) |