| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_weights.F |
177 |
ECCO_COST_WEIGHTS |
wobcsw(k,iobcs) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_weights.F |
299 |
ECCO_COST_WEIGHTS |
wobcsw(k,1) = wti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
300 |
ECCO_COST_WEIGHTS |
wobcsw(k,2) = wsi(k) |
|
./pkg/ecco/ecco_cost_weights.F |
301 |
ECCO_COST_WEIGHTS |
wobcsw(k,3) = wti(k)*0.02 |
|
./pkg/ecco/ecco_cost_weights.F |
302 |
ECCO_COST_WEIGHTS |
wobcsw(k,4) = wti(k)*0.02 |
|
./pkg/ecco/ecco_cost_weights.F |
989 |
ECCO_COST_WEIGHTS |
if (wobcsw(k,iobcs) .ne. 0.) then |
|
./pkg/ecco/ecco_cost_weights.F |
990 |
ECCO_COST_WEIGHTS |
wobcsw(k,iobcs) = |
|
./pkg/ecco/ecco_cost_weights.F |
991 |
ECCO_COST_WEIGHTS |
& ratio/wobcsw(k,iobcs)/wobcsw(k,iobcs) |
|
./pkg/ecco/ecco_cost_weights.F |
993 |
ECCO_COST_WEIGHTS |
wobcsw(k,iobcs) = 0.0 _d 0 |
|
./pkg/ecco/cost_obcsw.F |
130 |
COST_OBCSW |
& wobcsw(k,iobcs)*cosphi(i,j,bi,bj)* |
|
./pkg/ecco/cost_obcsw.F |
167 |
COST_OBCSW |
& wobcsw(k,iobcs)*cosphi(i,j,bi,bj)* |
|
./pkg/ecco/cost_obcsw.F |
203 |
COST_OBCSW |
& wobcsw(k,iobcs)*cosphi(i,j,bi,bj)* |
|
./pkg/ecco/cost_obcsw.F |
240 |
COST_OBCSW |
& wobcsw(k,iobcs)*cosphi(i,j,bi,bj)* |
|
./pkg/ecco/ecco_cost.h |
778 |
NO PROCEDURE |
& wobcsw, wobcswLev |
|
./pkg/ecco/ecco_cost.h |
779 |
NO PROCEDURE |
_RL wobcsw ( nr,nobcs) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1051 |
ECCO_COST_WEIGHTS |
if (wobcsw(k,iobcs) .ne. 0.) then |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1052 |
ECCO_COST_WEIGHTS |
wobcsw(k,iobcs) = |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1053 |
ECCO_COST_WEIGHTS |
& ratio/wobcsw(k,iobcs)/wobcsw(k,iobcs) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
1055 |
ECCO_COST_WEIGHTS |
wobcsw(k,iobcs) = 0.0 _d 0 |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
177 |
ECCO_COST_WEIGHTS |
wobcsw(k,iobcs) = 0. _d 0 |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
303 |
ECCO_COST_WEIGHTS |
wobcsw(k,1) = wti(k) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
304 |
ECCO_COST_WEIGHTS |
wobcsw(k,2) = wsi(k) |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
305 |
ECCO_COST_WEIGHTS |
wobcsw(k,3) = wti(k)*0.02 |
|
./verification/global1x1_tot/code/ecco_cost_weights.F |
306 |
ECCO_COST_WEIGHTS |
wobcsw(k,4) = wti(k)*0.02 |
|
./pkg/ctrl/ctrl_weights.h |
25 |
NO PROCEDURE |
& wobcsw, wobcswLev |
|
./pkg/ctrl/ctrl_weights.h |
26 |
NO PROCEDURE |
_RL wobcsw ( nr,nobcs) |
|
./pkg/ctrl/ctrl_pack.F |
324 |
CTRL_PACK |
& weighttype, wobcsw, lxxadxx, mythid) |
|
./pkg/ctrl/ctrl_unpack.F |
416 |
CTRL_UNPACK |
& weighttype, wobcsw, nWetobcswGlo, mythid) |