/[MITgcm]/MITgcm/pkg/obcs/obcs_ad_check_lev3_dir.h
ViewVC logotype

Annotation of /MITgcm/pkg/obcs/obcs_ad_check_lev3_dir.h

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

Revision 1.2 - (hide annotations) (download)
Wed Mar 29 17:04:18 2006 UTC (18 years, 2 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint58l_post, checkpoint58e_post, checkpoint58u_post, checkpoint58w_post, checkpoint58r_post, checkpoint58n_post, checkpoint58x_post, checkpoint58t_post, checkpoint58h_post, checkpoint58q_post, checkpoint58j_post, checkpoint59a, checkpoint59b, checkpoint59, checkpoint58f_post, checkpoint58d_post, checkpoint58i_post, checkpoint58g_post, checkpoint58o_post, checkpoint58y_post, checkpoint58k_post, checkpoint58v_post, checkpoint58s_post, checkpoint58p_post, checkpoint58m_post
Changes since 1.1: +33 -0 lines
File MIME type: text/plain 
Adding tapelev+comlev fields for obcs+ptracers adjoint.
1 heimbach 1.1 #ifdef ALLOW_OBCS
2     #
3     CADJ STORE shiftvel = tapelev3, key = ilev_3
4     #
5     # ifdef ALLOW_OBCS_NORTH
6     CADJ STORE OBNt = tapelev3, key = ilev_3
7     CADJ STORE OBNs = tapelev3, key = ilev_3
8     CADJ STORE OBNu0 = tapelev3, key = ilev_3
9     CADJ STORE OBNv0 = tapelev3, key = ilev_3
10     CADJ STORE OBNt0 = tapelev3, key = ilev_3
11     CADJ STORE OBNs0 = tapelev3, key = ilev_3
12     CADJ STORE OBNu1 = tapelev3, key = ilev_3
13     CADJ STORE OBNv1 = tapelev3, key = ilev_3
14     CADJ STORE OBNt1 = tapelev3, key = ilev_3
15     CADJ STORE OBNs1 = tapelev3, key = ilev_3
16     # ifdef ALLOW_OBCSN_CONTROL
17     CADJ STORE xx_obcsn0 = tapelev3, key = ilev_3
18     CADJ STORE xx_obcsn1 = tapelev3, key = ilev_3
19     # endif
20     # endif /* ALLOW_OBCS_NORTH */
21     #
22     # ifdef ALLOW_OBCS_SOUTH
23     CADJ STORE OBSt = tapelev3, key = ilev_3
24     CADJ STORE OBSs = tapelev3, key = ilev_3
25     CADJ STORE OBSu0 = tapelev3, key = ilev_3
26     CADJ STORE OBSv0 = tapelev3, key = ilev_3
27     CADJ STORE OBSt0 = tapelev3, key = ilev_3
28     CADJ STORE OBSs0 = tapelev3, key = ilev_3
29     CADJ STORE OBSu1 = tapelev3, key = ilev_3
30     CADJ STORE OBSv1 = tapelev3, key = ilev_3
31     CADJ STORE OBSt1 = tapelev3, key = ilev_3
32     CADJ STORE OBSs1 = tapelev3, key = ilev_3
33     # ifdef ALLOW_OBCSS_CONTROL
34     CADJ STORE xx_obcss0 = tapelev3, key = ilev_3
35     CADJ STORE xx_obcss1 = tapelev3, key = ilev_3
36     # endif
37     # endif /* ALLOW_OBCS_SOUTH */
38     #
39     # ifdef ALLOW_OBCS_EAST
40     CADJ STORE OBEt = tapelev3, key = ilev_3
41     CADJ STORE OBEs = tapelev3, key = ilev_3
42     CADJ STORE OBEu0 = tapelev3, key = ilev_3
43     CADJ STORE OBEv0 = tapelev3, key = ilev_3
44     CADJ STORE OBEt0 = tapelev3, key = ilev_3
45     CADJ STORE OBEs0 = tapelev3, key = ilev_3
46     CADJ STORE OBEu1 = tapelev3, key = ilev_3
47     CADJ STORE OBEv1 = tapelev3, key = ilev_3
48     CADJ STORE OBEt1 = tapelev3, key = ilev_3
49     CADJ STORE OBEs1 = tapelev3, key = ilev_3
50     # ifdef ALLOW_OBCSE_CONTROL
51     CADJ STORE xx_obcse0 = tapelev3, key = ilev_3
52     CADJ STORE xx_obcse1 = tapelev3, key = ilev_3
53     # endif
54     # endif /* ALLOW_OBCS_EAST */
55     #
56     # ifdef ALLOW_OBCS_WEST
57     CADJ STORE OBWt = tapelev3, key = ilev_3
58     CADJ STORE OBWs = tapelev3, key = ilev_3
59     CADJ STORE OBWu0 = tapelev3, key = ilev_3
60     CADJ STORE OBWv0 = tapelev3, key = ilev_3
61     CADJ STORE OBWt0 = tapelev3, key = ilev_3
62     CADJ STORE OBWs0 = tapelev3, key = ilev_3
63     CADJ STORE OBWu1 = tapelev3, key = ilev_3
64     CADJ STORE OBWv1 = tapelev3, key = ilev_3
65     CADJ STORE OBWt1 = tapelev3, key = ilev_3
66     CADJ STORE OBWs1 = tapelev3, key = ilev_3
67     # ifdef ALLOW_OBCSW_CONTROL
68     CADJ STORE xx_obcsw0 = tapelev3, key = ilev_3
69     CADJ STORE xx_obcsw1 = tapelev3, key = ilev_3
70     # endif
71     # endif /* ALLOW_OBCS_WEST */
72     #
73 heimbach 1.2 # ifdef ALLOW_PTRACERS
74     #
75     #ifdef ALLOW_OBCS_NORTH
76     CADJ STORE OBNptr = tapelev3, key = ilev_3
77     #ifdef ALLOW_OBCS_PRESCRIBE
78     CADJ STORE OBNptr0 = tapelev3, key = ilev_3
79     CADJ STORE OBNptr1 = tapelev3, key = ilev_3
80     #endif /* ALLOW_OBCS_PRESCRIBE */
81     #endif /* ALLOW_OBCS_NORTH */
82     #ifdef ALLOW_OBCS_SOUTH
83     CADJ STORE OBSptr = tapelev3, key = ilev_3
84     #ifdef ALLOW_OBCS_PRESCRIBE
85     CADJ STORE OBSptr0 = tapelev3, key = ilev_3
86     CADJ STORE OBSptr1 = tapelev3, key = ilev_3
87     #endif /* ALLOW_OBCS_PRESCRIBE */
88     #endif /* ALLOW_OBCS_SOUTH */
89     #ifdef ALLOW_OBCS_EAST
90     CADJ STORE OBEptr = tapelev3, key = ilev_3
91     #ifdef ALLOW_OBCS_PRESCRIBE
92     CADJ STORE OBEptr0 = tapelev3, key = ilev_3
93     CADJ STORE OBEptr1 = tapelev3, key = ilev_3
94     #endif /* ALLOW_OBCS_PRESCRIBE */
95     #endif /* ALLOW_OBCS_EAST */
96     #ifdef ALLOW_OBCS_WEST
97     CADJ STORE OBWptr = tapelev3, key = ilev_3
98     #ifdef ALLOW_OBCS_PRESCRIBE
99     CADJ STORE OBWptr0 = tapelev3, key = ilev_3
100     CADJ STORE OBWptr1 = tapelev3, key = ilev_3
101     #endif /* ALLOW_OBCS_PRESCRIBE */
102     #endif /* ALLOW_OBCS_WEST */
103     #
104     # endif /* ALLOW_PTRACERS */
105     #
106 heimbach 1.1 #endif /* ALLOW_OBCS */
  ViewVC Help
Powered by ViewVC 1.1.22