1 |
|
C $Header$ |
2 |
|
C $Name$ |
3 |
|
|
4 |
c Define dummy weights as a placeholder |
c Define dummy weights as a placeholder |
5 |
common /ctrl_weights_dummy_r/ |
common /ctrl_weights_dummy_r/ |
6 |
& wtheta, wsalt |
& wtheta, wsalt, |
7 |
|
& wuvvel, wetan, |
8 |
|
& wdiffkr, wkapgm, |
9 |
|
& wedtaux, wedtauy |
10 |
|
|
11 |
_RL wtheta ( nr,nsx,nsy ) |
_RL wtheta ( nr,nsx,nsy ) |
12 |
_RL wsalt ( nr,nsx,nsy ) |
_RL wsalt ( nr,nsx,nsy ) |
13 |
|
_RL wuvvel ( nr,nsx,nsy ) |
14 |
|
_RL wetan ( snx,sny,nsx,nsy ) |
15 |
|
_RL wdiffkr ( nr,nsx,nsy ) |
16 |
|
_RL wkapgm ( nr,nsx,nsy ) |
17 |
|
_RL wedtaux ( nr,nsx,nsy ) |
18 |
|
_RL wedtauy ( nr,nsx,nsy ) |
19 |
|
|
20 |
#if (defined (ALLOW_OBCSN_COST_CONTRIBUTION) || defined (ALLOW_OBCSN_CONTROL)) |
#if (defined (ALLOW_OBCSN_COST_CONTRIBUTION) || defined (ALLOW_OBCSN_CONTROL)) |
21 |
common /ctrl_cost_weights_obcsn/ |
common /ctrl_cost_weights_obcsn/ |