| 1 |
|
| 2 |
c Define dummy weights as a placeholder |
| 3 |
common /ctrl_weights_dummy_r/ |
| 4 |
& wtheta, wsalt |
| 5 |
_RL wtheta ( nr,nsx,nsy ) |
| 6 |
_RL wsalt ( nr,nsx,nsy ) |
| 7 |
|
| 8 |
#if (defined (ALLOW_OBCSN_COST_CONTRIBUTION) || defined (ALLOW_OBCSN_CONTROL)) |
| 9 |
common /ctrl_cost_weights_obcsn/ |
| 10 |
& wobcsn, wobcsnLev |
| 11 |
_RL wobcsn ( nr,nobcs) |
| 12 |
_RL wobcsnLev (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
| 13 |
#endif |
| 14 |
#if (defined (ALLOW_OBCSS_COST_CONTRIBUTION) || defined (ALLOW_OBCSS_CONTROL)) |
| 15 |
common /ctrl_cost_weights_obcss/ |
| 16 |
& wobcss, wobcssLev |
| 17 |
_RL wobcss ( nr,nobcs) |
| 18 |
_RL wobcssLev (1-olx:snx+olx,nr,nsx,nsy,nobcs) |
| 19 |
#endif |
| 20 |
#if (defined (ALLOW_OBCSW_COST_CONTRIBUTION) || defined (ALLOW_OBCSW_CONTROL)) |
| 21 |
common /ctrl_cost_weights_obcsw/ |
| 22 |
& wobcsw, wobcswLev |
| 23 |
_RL wobcsw ( nr,nobcs) |
| 24 |
_RL wobcswLev (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
| 25 |
#endif |
| 26 |
#if (defined (ALLOW_OBCSE_COST_CONTRIBUTION) || defined (ALLOW_OBCSE_CONTROL)) |
| 27 |
common /ctrl_cost_weights_obcse/ |
| 28 |
& wobcse, wobcseLev |
| 29 |
_RL wobcse ( nr,nobcs) |
| 30 |
_RL wobcseLev (1-oly:sny+oly,nr,nsx,nsy,nobcs) |
| 31 |
#endif |
Parent Directory
| 
Revision Log
| 
Revision Graph