| File |
Line number |
Procedure |
Code |
|
./verification/OpenAD/code_oad_all/ctrl_pack.F |
319 |
CTRL_PACK |
& weighttype, wobcsn, lxxadxx, mythid) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1144 |
ECCO_COST_WEIGHTS |
if (wobcsn(k,iobcs) .ne. 0.) then |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1145 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1146 |
ECCO_COST_WEIGHTS |
& ratio/wobcsn(k,iobcs)/wobcsn(k,iobcs) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1148 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = 0.0 _d 0 |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
165 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = 0. _d 0 |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
287 |
ECCO_COST_WEIGHTS |
wobcsn(k,1) = wti(k) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
288 |
ECCO_COST_WEIGHTS |
wobcsn(k,2) = wsi(k) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
289 |
ECCO_COST_WEIGHTS |
wobcsn(k,3) = wti(k)*0.02 |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
290 |
ECCO_COST_WEIGHTS |
wobcsn(k,4) = wti(k)*0.02 |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1137 |
ECCO_COST_WEIGHTS |
if (wobcsn(k,iobcs) .ne. 0.) then |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1138 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1139 |
ECCO_COST_WEIGHTS |
& ratio/wobcsn(k,iobcs)/wobcsn(k,iobcs) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
1141 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = 0.0 _d 0 |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
163 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = 0. _d 0 |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
285 |
ECCO_COST_WEIGHTS |
wobcsn(k,1) = wti(k) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
286 |
ECCO_COST_WEIGHTS |
wobcsn(k,2) = wsi(k) |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
287 |
ECCO_COST_WEIGHTS |
wobcsn(k,3) = wti(k)*0.02 |
|
./verification/global1x1_tot/code_taueddy/ecco_cost_weights.F |
288 |
ECCO_COST_WEIGHTS |
wobcsn(k,4) = wti(k)*0.02 |
|
./pkg/admtlm/admtlm_dsvd2model.F |
427 |
ADMTLM_DSVD2MODEL |
& weighttype, wobcsn, nWetobcsnGlo, mythid) |
|
./pkg/admtlm/admtlm_model2dsvd.F |
339 |
ADMTLM_MODEL2DSVD |
& weighttype, wobcsn, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_pack.F |
336 |
CTRL_PACK |
& weighttype, wobcsn, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
429 |
CTRL_UNPACK |
& weighttype, wobcsn, nWetobcsnGlo, mythid) |
|
./pkg/ctrl/ctrl_weights.h |
23 |
NO PROCEDURE |
& wobcsn, wobcsnLev |
|
./pkg/ctrl/ctrl_weights.h |
24 |
NO PROCEDURE |
_RL wobcsn ( nr,nobcs) |
|
./pkg/ecco/cost_obcsn.F |
132 |
COST_OBCSN |
& wobcsn(k,iobcs)*cosphi(i,j,bi,bj)* |
|
./pkg/ecco/cost_obcsn.F |
169 |
COST_OBCSN |
& wobcsn(k,iobcs)*cosphi(i,j,bi,bj)* |
|
./pkg/ecco/cost_obcsn.F |
205 |
COST_OBCSN |
& wobcsn(k,iobcs)*cosphi(i,j,bi,bj)* |
|
./pkg/ecco/cost_obcsn.F |
242 |
COST_OBCSN |
& wobcsn(k,iobcs)*cosphi(i,j,bi,bj)* |
|
./pkg/ecco/ecco_cost.h |
1159 |
NO PROCEDURE |
& wobcsn, wobcsnLev |
|
./pkg/ecco/ecco_cost.h |
1160 |
NO PROCEDURE |
_RL wobcsn ( nr,nobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
1786 |
ECCO_COST_WEIGHTS |
if (wobcsn(k,iobcs) .ne. 0.) then |
|
./pkg/ecco/ecco_cost_weights.F |
1787 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = |
|
./pkg/ecco/ecco_cost_weights.F |
1788 |
ECCO_COST_WEIGHTS |
& ratio/wobcsn(k,iobcs)/wobcsn(k,iobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
1790 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = 0.0 _d 0 |
|
./pkg/ecco/ecco_cost_weights.F |
200 |
ECCO_COST_WEIGHTS |
wobcsn(k,iobcs) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_weights.F |
312 |
ECCO_COST_WEIGHTS |
wobcsn(k,1) = wti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
313 |
ECCO_COST_WEIGHTS |
wobcsn(k,2) = wsi(k) |
|
./pkg/ecco/ecco_cost_weights.F |
314 |
ECCO_COST_WEIGHTS |
wobcsn(k,3) = wvi(k) |
|
./pkg/ecco/ecco_cost_weights.F |
315 |
ECCO_COST_WEIGHTS |
wobcsn(k,4) = wvi(k) |