/[MITgcm]/MITgcm/pkg/ctrl/ctrl_weights.h
ViewVC logotype

Contents of /MITgcm/pkg/ctrl/ctrl_weights.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph

Revision 1.2 - (show annotations) (download)
Fri Dec 3 00:48:57 2004 UTC (19 years, 6 months ago) by mlosch
Branch: MAIN
CVS Tags: checkpoint57o_post, checkpoint57m_post, checkpoint57k_post, checkpoint57d_post, checkpoint57g_post, checkpoint57b_post, checkpoint57c_pre, checkpoint57i_post, checkpoint57e_post, checkpoint57g_pre, checkpoint56c_post, checkpoint57f_pre, checkpoint57a_post, checkpoint57a_pre, checkpoint57, eckpoint57e_pre, checkpoint57h_done, checkpoint57n_post, checkpoint57p_post, checkpoint57f_post, checkpoint57q_post, checkpoint57c_post, checkpoint57j_post, checkpoint57h_pre, checkpoint57l_post, checkpoint57h_post
Changes since 1.1: +29 -0 lines
File MIME type: text/plain 
o OBCS as control variables
  - update ad_diff.list
  - remove balance of obcs controls from default
  - fix index bug nobcs in ctrl_init
  - fix dummy fields filen in ctrl_pack
  - add dummy weights for obcs
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) || \
9 defined (ALLOW_OBCSN_CONTROL))
10 common /ctrl_cost_weights_obcsn/
11 & wobcsn, wobcsnLev
12 _RL wobcsn ( nr,nobcs)
13 _RL wobcsnLev (1-olx:snx+olx,nr,nsx,nsy,nobcs)
14 #endif
15 #if (defined (ALLOW_OBCSS_COST_CONTRIBUTION) || \
16 defined (ALLOW_OBCSS_CONTROL))
17 common /ctrl_cost_weights_obcss/
18 & wobcss, wobcssLev
19 _RL wobcss ( nr,nobcs)
20 _RL wobcssLev (1-olx:snx+olx,nr,nsx,nsy,nobcs)
21 #endif
22 #if (defined (ALLOW_OBCSW_COST_CONTRIBUTION) || \
23 defined (ALLOW_OBCSW_CONTROL))
24 common /ctrl_cost_weights_obcsw/
25 & wobcsw, wobcswLev
26 _RL wobcsw ( nr,nobcs)
27 _RL wobcswLev (1-oly:sny+oly,nr,nsx,nsy,nobcs)
28 #endif
29 #if (defined (ALLOW_OBCSE_COST_CONTRIBUTION) || \
30 defined (ALLOW_OBCSE_CONTROL))
31 common /ctrl_cost_weights_obcse/
32 & wobcse, wobcseLev
33 _RL wobcse ( nr,nobcs)
34 _RL wobcseLev (1-oly:sny+oly,nr,nsx,nsy,nobcs)
35 #endif
  ViewVC Help
Powered by ViewVC 1.1.22