| File |
Line number |
Procedure |
Code |
|
./pkg/admtlm/admtlm_dsvd2model.F |
437 |
ADMTLM_DSVD2MODEL |
& weighttype, wobcss, nWetobcssGlo, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
350 |
ADMTLM_MODEL2DSVD |
& weighttype, wobcss, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
402 |
CTRL_PACK |
& weighttype, wobcss, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
498 |
CTRL_UNPACK |
& weighttype, wobcss, nWetobcssGlo, mythid) |
|
./pkg/ctrl/ctrl_weights.h |
31 |
NO PROCEDURE |
& wobcss, wobcssLev |
|
./pkg/ctrl/ctrl_weights.h |
32 |
NO PROCEDURE |
_RL wobcss ( nr,nobcs) |
|
./pkg/ecco/cost_obcss.F |
175 |
COST_OBCSS |
fctile = fctile + wobcss(k,iobcs) |
|
./pkg/ecco/cost_obcss.F |
179 |
COST_OBCSS |
if (wobcss(k,iobcs)*maskxz(i,k,bi,bj).ne.0.) |
|
./pkg/ecco/ecco_cost.h |
1313 |
NO PROCEDURE |
& wobcss, wobcssLev |
|
./pkg/ecco/ecco_cost.h |
1314 |
NO PROCEDURE |
_RL wobcss ( nr,nobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
1941 |
ECCO_COST_WEIGHTS |
if (wobcss(k,iobcs) .ne. 0.) then |
|
./pkg/ecco/ecco_cost_weights.F |
1942 |
ECCO_COST_WEIGHTS |
wobcss(k,iobcs) = |
|
./pkg/ecco/ecco_cost_weights.F |
1943 |
ECCO_COST_WEIGHTS |
& ratio/wobcss(k,iobcs)/wobcss(k,iobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
1945 |
ECCO_COST_WEIGHTS |
wobcss(k,iobcs) = 0.0 _d 0 |
|
./pkg/ecco/ecco_cost_weights.F |
216 |
ECCO_COST_WEIGHTS |
wobcss(k,iobcs) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_weights.F |
335 |
ECCO_COST_WEIGHTS |
wobcss(k,1) = wti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
336 |
ECCO_COST_WEIGHTS |
wobcss(k,2) = wsi(k) |
|
./pkg/ecco/ecco_cost_weights.F |
337 |
ECCO_COST_WEIGHTS |
wobcss(k,3) = wvi(k) |
|
./pkg/ecco/ecco_cost_weights.F |
338 |
ECCO_COST_WEIGHTS |
wobcss(k,4) = wvi(k) |