File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_cost_weights.F |
274 |
ECCO_COST_WEIGHTS |
whfluxmm(bi,bj) = 1. |
./pkg/ecco/ecco_cost_weights.F |
924 |
ECCO_COST_WEIGHTS |
if (whfluxmm(bi,bj).ne.0.) |
./pkg/ecco/ecco_cost_weights.F |
925 |
ECCO_COST_WEIGHTS |
& whfluxmm(bi,bj) = 1./whfluxmm(bi,bj)*whfluxmm(bi,bj) |
./pkg/ecco/cost_mean_heatflux.F |
126 |
COST_MEAN_HEATFLUX |
fctilemm = whfluxmm(bi,bj) * (fctilemm ) |
./pkg/ecco/ecco_cost.h |
710 |
NO PROCEDURE |
& whfluxmm,wsfluxmm, |
./pkg/ecco/ecco_cost.h |
718 |
NO PROCEDURE |
_RL whfluxmm(1-olx:snx+olx,1-oly:sny+oly) |
./verification/global1x1_tot/code/ecco_cost_weights.F |
278 |
ECCO_COST_WEIGHTS |
whfluxmm(bi,bj) = 1. |
./verification/global1x1_tot/code/ecco_cost_weights.F |
984 |
ECCO_COST_WEIGHTS |
if (whfluxmm(bi,bj).ne.0.) |
./verification/global1x1_tot/code/ecco_cost_weights.F |
985 |
ECCO_COST_WEIGHTS |
& whfluxmm(bi,bj) = 1./whfluxmm(bi,bj)*whfluxmm(bi,bj) |