File |
Line number |
Procedure |
Code |
./pkg/ecco/ecco_cost_weights.F |
1929 |
ECCO_COST_WEIGHTS |
if (wobcse(k,iobcs) .ne. 0.) then |
./pkg/ecco/ecco_cost_weights.F |
1930 |
ECCO_COST_WEIGHTS |
wobcse(k,iobcs) = |
./pkg/ecco/ecco_cost_weights.F |
1931 |
ECCO_COST_WEIGHTS |
& ratio/wobcse(k,iobcs)/wobcse(k,iobcs) |
./pkg/ecco/ecco_cost_weights.F |
1933 |
ECCO_COST_WEIGHTS |
wobcse(k,iobcs) = 0.0 _d 0 |
./pkg/ecco/ecco_cost_weights.F |
235 |
ECCO_COST_WEIGHTS |
wobcse(k,iobcs) = 0. _d 0 |
./pkg/ecco/ecco_cost_weights.F |
365 |
ECCO_COST_WEIGHTS |
wobcse(k,1) = wti(k) |
./pkg/ecco/ecco_cost_weights.F |
366 |
ECCO_COST_WEIGHTS |
wobcse(k,2) = wsi(k) |
./pkg/ecco/ecco_cost_weights.F |
367 |
ECCO_COST_WEIGHTS |
wobcse(k,3) = wvi(k) |
./pkg/ecco/ecco_cost_weights.F |
368 |
ECCO_COST_WEIGHTS |
wobcse(k,4) = wvi(k) |
./pkg/admtlm/admtlm_dsvd2model.F |
455 |
ADMTLM_DSVD2MODEL |
& weighttype, wobcse, nWetobcseGlo, mythid) |
./pkg/admtlm/admtlm_model2dsvd.F |
368 |
ADMTLM_MODEL2DSVD |
& weighttype, wobcse, lxxadxx, mythid) |
./pkg/ctrl/CTRL_OBCS.h |
148 |
NO PROCEDURE |
& wobcse, wobcseLev |
./pkg/ctrl/CTRL_OBCS.h |
149 |
NO PROCEDURE |
_RL wobcse ( nr,nobcs) |
./pkg/ctrl/ctrl_pack.F |
309 |
CTRL_PACK |
& weighttype, wobcse, lxxadxx, mythid) |
./pkg/ctrl/ctrl_unpack.F |
397 |
CTRL_UNPACK |
& weighttype, wobcse, nWetobcseGlo, mythid) |
./pkg/ecco/cost_obcse.F |
184 |
COST_OBCSE |
fctile = fctile + wobcse(k,iobcs) |
./pkg/ecco/cost_obcse.F |
188 |
COST_OBCSE |
if (wobcse(k,iobcs)*maskyz(j,k,bi,bj).ne.0.) |