/[MITgcm]/MITgcm/pkg/autodiff/checkpoint_lev3_directives.h
ViewVC logotype

Contents of /MITgcm/pkg/autodiff/checkpoint_lev3_directives.h

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

Revision 1.4 - (show annotations) (download)
Thu Nov 14 22:37:39 2002 UTC (21 years, 7 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint47e_post, checkpoint47c_post, checkpoint48b_post, checkpoint48c_pre, checkpoint47d_pre, checkpoint47a_post, checkpoint47i_post, checkpoint47d_post, checkpoint47g_post, checkpoint48a_post, checkpoint47j_post, branch-exfmods-tag, checkpoint47b_post, checkpoint47f_post, checkpoint47, checkpoint48, checkpoint47h_post
Branch point for: branch-exfmods-curt
Changes since 1.3: +17 -0 lines
File MIME type: text/plain 
Bringing differentiability up to date.
1 c
2 c store directives for checkpoint level 3
3 c
4 c created: heimbach@mit.edu 10-Jan-2002
5 c
6 CADJ STORE gsnm1 = tapelev3, key = ilev_3
7 CADJ STORE gtnm1 = tapelev3, key = ilev_3
8 CADJ STORE gunm1 = tapelev3, key = ilev_3
9 CADJ STORE gvnm1 = tapelev3, key = ilev_3
10 CADJ STORE theta = tapelev3, key = ilev_3
11 CADJ STORE salt = tapelev3, key = ilev_3
12 CADJ STORE uvel = tapelev3, key = ilev_3
13 CADJ STORE vvel = tapelev3, key = ilev_3
14 CADJ STORE wvel = tapelev3, key = ilev_3
15 CADJ STORE etan = tapelev3, key = ilev_3
16 CADJ STORE gu = tapelev3, key = ilev_3
17 CADJ STORE gv = tapelev3, key = ilev_3
18 CADJ STORE pressure = tapelev3, key = ilev_3
19
20 #ifdef INCLUDE_CD_CODE
21 CADJ STORE uveld = tapelev3, key = ilev_3
22 CADJ STORE vveld = tapelev3, key = ilev_3
23 CADJ STORE etanm1 = tapelev3, key = ilev_3
24 CADJ STORE unm1 = tapelev3, key = ilev_3
25 CADJ STORE vnm1 = tapelev3, key = ilev_3
26 CADJ STORE gucd = tapelev3, key = ilev_3
27 CADJ STORE gvcd = tapelev3, key = ilev_3
28 #endif /* INCLUDE_CD_CODE */
29
30 #ifdef ALLOW_PASSIVE_TRACER
31 CADJ STORE tr1 = tapelev3, key = ilev_3
32 CADJ STORE gtr1nm1 = tapelev3, key = ilev_3
33 #endif /* */
34
35 #ifdef EXACT_CONSERV
36 CADJ STORE etaH = tapelev3, key = ilev_3
37 CADJ STORE hDivFlow = tapelev3, key = ilev_3
38 #endif /* */
39
40 #ifdef INCLUDE_EXTERNAL_FORCING_PACKAGE
41 # ifdef ALLOW_ATM_TEMP
42 CADJ STORE aqh0 = tapelev3, key = ilev_3
43 CADJ STORE aqh1 = tapelev3, key = ilev_3
44 CADJ STORE atemp0 = tapelev3, key = ilev_3
45 CADJ STORE atemp1 = tapelev3, key = ilev_3
46 CADJ STORE precip0 = tapelev3, key = ilev_3
47 CADJ STORE precip1 = tapelev3, key = ilev_3
48 CADJ STORE lwflux0 = tapelev3, key = ilev_3
49 CADJ STORE lwflux1 = tapelev3, key = ilev_3
50 CADJ STORE swflux0 = tapelev3, key = ilev_3
51 CADJ STORE swflux1 = tapelev3, key = ilev_3
52 # else
53 CADJ STORE hflux0 = tapelev3, key = ilev_3
54 CADJ STORE hflux1 = tapelev3, key = ilev_3
55 CADJ STORE sflux0 = tapelev3, key = ilev_3
56 CADJ STORE sflux1 = tapelev3, key = ilev_3
57 # ifdef ALLOW_KPP
58 CADJ STORE swflux0 = tapelev3, key = ilev_3
59 CADJ STORE swflux1 = tapelev3, key = ilev_3
60 # endif
61 # endif /* ALLOW_ATM_TEMP */
62 # ifdef ALLOW_ATM_WIND
63 CADJ STORE uwind0 = tapelev3, key = ilev_3
64 CADJ STORE uwind1 = tapelev3, key = ilev_3
65 CADJ STORE vwind0 = tapelev3, key = ilev_3
66 CADJ STORE vwind1 = tapelev3, key = ilev_3
67 # else
68 CADJ STORE ustress0 = tapelev3, key = ilev_3
69 CADJ STORE ustress1 = tapelev3, key = ilev_3
70 CADJ STORE vstress0 = tapelev3, key = ilev_3
71 CADJ STORE vstress1 = tapelev3, key = ilev_3
72 # endif /* ALLOW_ATM_WIND */
73
74 #else /* INCLUDE_EXTERNAL_FORCING_PACKAGE undef */
75
76 CADJ STORE empmr = tapelev3, key = ilev_3
77 CADJ STORE fu = tapelev3, key = ilev_3
78 CADJ STORE fv = tapelev3, key = ilev_3
79 CADJ STORE qnet = tapelev3, key = ilev_3
80 CADJ STORE sss = tapelev3, key = ilev_3
81 CADJ STORE sst = tapelev3, key = ilev_3
82 #ifdef ATMOSPHERIC_LOADING
83 CADJ STORE pload = tapelev3, key = ilev_3
84 #endif
85 c
86 CADJ STORE taux0 = tapelev3, key = ilev_3
87 CADJ STORE taux1 = tapelev3, key = ilev_3
88 CADJ STORE tauy0 = tapelev3, key = ilev_3
89 CADJ STORE tauy1 = tapelev3, key = ilev_3
90 CADJ STORE Qnet0 = tapelev3, key = ilev_3
91 CADJ STORE Qnet1 = tapelev3, key = ilev_3
92 CADJ STORE EmPmR0 = tapelev3, key = ilev_3
93 CADJ STORE EmPmR1 = tapelev3, key = ilev_3
94 CADJ STORE SST0 = tapelev3, key = ilev_3
95 CADJ STORE SST1 = tapelev3, key = ilev_3
96 CADJ STORE SSS0 = tapelev3, key = ilev_3
97 CADJ STORE SSS1 = tapelev3, key = ilev_3
98 #ifdef SHORTWAVE_HEATING
99 CADJ STORE Qsw0 = tapelev3, key = ilev_3
100 CADJ STORE Qsw1 = tapelev3, key = ilev_3
101 #endif
102 #ifdef ATMOSPHERIC_LOADING
103 CADJ STORE pload0 = tapelev3, key = ilev_3
104 CADJ STORE pload1 = tapelev3, key = ilev_3
105 #endif
106
107 #endif /* INCLUDE_EXTERNAL_FORCING_PACKAGE */
108
109 #ifdef ALLOW_OBCS
110 #ifdef ALLOW_OBCS_NORTH
111 CADJ STORE OBNu = tapelev3, key = ilev_3
112 CADJ STORE OBNv = tapelev3, key = ilev_3
113 CADJ STORE OBNt = tapelev3, key = ilev_3
114 CADJ STORE OBNs = tapelev3, key = ilev_3
115 #endif /* ALLOW_OBCS_NORTH */
116 #ifdef ALLOW_OBCS_SOUTH
117 CADJ STORE OBSu = tapelev3, key = ilev_3
118 CADJ STORE OBSv = tapelev3, key = ilev_3
119 CADJ STORE OBSt = tapelev3, key = ilev_3
120 CADJ STORE OBSs = tapelev3, key = ilev_3
121 #endif /* ALLOW_OBCS_SOUTH */
122 #ifdef ALLOW_OBCS_EAST
123 CADJ STORE OBEu = tapelev3, key = ilev_3
124 CADJ STORE OBEv = tapelev3, key = ilev_3
125 CADJ STORE OBEt = tapelev3, key = ilev_3
126 CADJ STORE OBEs = tapelev3, key = ilev_3
127 #endif /* ALLOW_OBCS_EAST */
128 #ifdef ALLOW_OBCS_WEST
129 CADJ STORE OBWu = tapelev3, key = ilev_3
130 CADJ STORE OBWv = tapelev3, key = ilev_3
131 CADJ STORE OBWt = tapelev3, key = ilev_3
132 CADJ STORE OBWs = tapelev3, key = ilev_3
133 #endif /* ALLOW_OBCS_WEST */
134 #endif /* ALLOW_OBCS */
135
  ViewVC Help
Powered by ViewVC 1.1.22