| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_weights.F |
1905 |
ECCO_COST_WEIGHTS |
if (wobcsn(k,iobcs) .ne. 0.) then |
|
./pkg/ecco/ecco_cost_weights.F |
1906 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = |
|
./pkg/ecco/ecco_cost_weights.F |
1907 |
ECCO_COST_WEIGHTS |
& ratio/wobcsn(k,iobcs)/wobcsn(k,iobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
1909 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = 0.0 _d 0 |
|
./pkg/ecco/ecco_cost_weights.F |
223 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_weights.F |
347 |
ECCO_COST_WEIGHTS |
wobcsn(k,1) = wti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
348 |
ECCO_COST_WEIGHTS |
wobcsn(k,2) = wsi(k) |
|
./pkg/ecco/ecco_cost_weights.F |
349 |
ECCO_COST_WEIGHTS |
wobcsn(k,3) = wvi(k) |
|
./pkg/ecco/ecco_cost_weights.F |
350 |
ECCO_COST_WEIGHTS |
wobcsn(k,4) = wvi(k) |
|
./pkg/admtlm/admtlm_dsvd2model.F |
428 |
ADMTLM_DSVD2MODEL |
& weighttype, wobcsn, nWetobcsnGlo, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
341 |
ADMTLM_MODEL2DSVD |
& weighttype, wobcsn, lxxadxx, mythid) |
|
./pkg/ctrl/CTRL_OBCS.h |
112 |
NO PROCEDURE |
& wobcsn, wobcsnLev |
|
./pkg/ctrl/CTRL_OBCS.h |
113 |
NO PROCEDURE |
_RL wobcsn ( nr,nobcs) |
|
./pkg/ctrl/ctrl_pack.F |
285 |
CTRL_PACK |
& weighttype, wobcsn, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
373 |
CTRL_UNPACK |
& weighttype, wobcsn, nWetobcsnGlo, mythid) |
|
./pkg/ecco/cost_obcsn.F |
182 |
COST_OBCSN |
fctile = fctile + wobcsn(k,iobcs) |
|
./pkg/ecco/cost_obcsn.F |
186 |
COST_OBCSN |
if (wobcsn(k,iobcs)*maskxz(i,k,bi,bj).ne.0.) |