1 |
|
|
2 |
c Define dummy weights as a placeholder |
c Define dummy weights as a placeholder |
3 |
common /ctrl_weights_dummy_r/ |
common /ctrl_weights_dummy_r/ |
4 |
& wtheta, wsalt |
& wtheta, wsalt, |
5 |
_RL wtheta ( nr,nsx,nsy ) |
& wdiffkr, wkapgm, |
6 |
_RL wsalt ( nr,nsx,nsy ) |
& wedtaux, wedtauy |
7 |
|
|
8 |
|
_RL wtheta ( nr,nsx,nsy ) |
9 |
|
_RL wsalt ( nr,nsx,nsy ) |
10 |
|
_RL wdiffkr ( nr,nsx,nsy ) |
11 |
|
_RL wkapgm ( nr,nsx,nsy ) |
12 |
|
_RL wedtaux ( nr,nsx,nsy ) |
13 |
|
_RL wedtauy ( nr,nsx,nsy ) |
14 |
|
|
15 |
#if (defined (ALLOW_OBCSN_COST_CONTRIBUTION) || defined (ALLOW_OBCSN_CONTROL)) |
#if (defined (ALLOW_OBCSN_COST_CONTRIBUTION) || defined (ALLOW_OBCSN_CONTROL)) |
16 |
common /ctrl_cost_weights_obcsn/ |
common /ctrl_cost_weights_obcsn/ |