| File |
Line number |
Procedure |
Code |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
106 |
COST_WEIGHTS |
wtheta(k,bi,bj) = 1. _d 0/wti(k)/wti(k) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
42 |
COST_WEIGHTS |
_RL wti(Nr) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
59 |
COST_WEIGHTS |
wti(k) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
94 |
COST_WEIGHTS |
wti(k) = tmpwti(k) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
106 |
COST_WEIGHTS |
wtheta(k,bi,bj) = 1. _d 0/wti(k)/wti(k) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
42 |
COST_WEIGHTS |
_RL wti(Nr) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
59 |
COST_WEIGHTS |
wti(k) = 0. _d 0 |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
94 |
COST_WEIGHTS |
wti(k) = tmpwti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
111 |
ECCO_COST_WEIGHTS |
wti(k) = 0. _d 0 |
|
./pkg/ecco/ecco_cost_weights.F |
283 |
ECCO_COST_WEIGHTS |
read(gwunit,*) wti(k), wsi(k) |
|
./pkg/ecco/ecco_cost_weights.F |
311 |
ECCO_COST_WEIGHTS |
wtheta(k,bi,bj) = wti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
329 |
ECCO_COST_WEIGHTS |
wobcsn(k,1) = wti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
335 |
ECCO_COST_WEIGHTS |
wobcss(k,1) = wti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
341 |
ECCO_COST_WEIGHTS |
wobcsw(k,1) = wti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
347 |
ECCO_COST_WEIGHTS |
wobcse(k,1) = wti(k) |
|
./pkg/ecco/ecco_cost_weights.F |
62 |
ECCO_COST_WEIGHTS |
_RL wti(nr) |