/[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.41 - (show annotations) (download)
Tue Sep 23 06:13:59 2008 UTC (15 years, 9 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint61e, checkpoint61d
Changes since 1.40: +59 -3 lines
File MIME type: text/plain 
Modify checkpointing to fit large mdsio vector stores to file
(partly revert to individual field storing rather than to
StoreDynVars2, StoreDynVars3D for large tile sizes).
1 C $Header: /u/gcmpack/MITgcm/pkg/autodiff/checkpoint_lev3_directives.h,v 1.40 2008/06/21 13:49:08 heimbach Exp $
2 C $Name: $
3 c
4 c store directives for checkpoint level 4
5 c
6 c created: heimbach@mit.edu 10-Jan-2002
7 c
8 #ifdef AUTODIFF_USE_OLDSTORE_2D
9 c
10 CADJ STORE etan = tapelev3, key = ilev_3
11 CADJ STORE surfaceforcingTice = tapelev3, key = ilev_3
12 CADJ STORE taux0 = tapelev3, key = ilev_3
13 CADJ STORE taux1 = tapelev3, key = ilev_3
14 CADJ STORE tauy0 = tapelev3, key = ilev_3
15 CADJ STORE tauy1 = tapelev3, key = ilev_3
16 CADJ STORE qnet0 = tapelev3, key = ilev_3
17 CADJ STORE qnet1 = tapelev3, key = ilev_3
18 CADJ STORE empmr0 = tapelev3, key = ilev_3
19 CADJ STORE empmr1 = tapelev3, key = ilev_3
20 CADJ STORE sst0 = tapelev3, key = ilev_3
21 CADJ STORE sst1 = tapelev3, key = ilev_3
22 CADJ STORE sss0 = tapelev3, key = ilev_3
23 CADJ STORE sss1 = tapelev3, key = ilev_3
24 CADJ STORE saltflux0 = tapelev3, key = ilev_3
25 CADJ STORE saltflux1 = tapelev3, key = ilev_3
26 #ifdef SHORTWAVE_HEATING
27 CADJ STORE qsw0 = tapelev3, key = ilev_3
28 CADJ STORE qsw1 = tapelev3, key = ilev_3
29 #endif
30 #ifdef ATMOSPHERIC_LOADING
31 CADJ STORE pload0 = tapelev3, key = ilev_3
32 CADJ STORE pload1 = tapelev3, key = ilev_3
33 #endif
34 #ifdef EXACT_CONSERV
35 CADJ STORE etaH = tapelev3, key = ilev_3
36 CADJ STORE dEtaHdt = tapelev3, key = ilev_3
37 CADJ STORE PmEpR = tapelev3, key = ilev_3
38 #endif
39 c
40 #else /* ndef AUTODIFF_USE_OLDSTORE_2D */
41 c
42 CADJ STORE StoreDynVars2D = tapelev3, key = ilev_3
43 c
44 #endif /* AUTODIFF_USE_OLDSTORE_2D */
45 c
46 #ifdef AUTODIFF_USE_OLDSTORE_3D
47 c
48 CADJ STORE gs = tapelev3, key = ilev_3
49 CADJ STORE gt = tapelev3, key = ilev_3
50 CADJ STORE gtnm1 = tapelev3, key = ilev_3
51 CADJ STORE gsnm1 = tapelev3, key = ilev_3
52 CADJ STORE gunm1 = tapelev3, key = ilev_3
53 CADJ STORE gvnm1 = tapelev3, key = ilev_3
54 CADJ STORE theta = tapelev3, key = ilev_3
55 CADJ STORE salt = tapelev3, key = ilev_3
56 CADJ STORE uvel = tapelev3, key = ilev_3
57 CADJ STORE vvel = tapelev3, key = ilev_3
58 CADJ STORE wvel = tapelev3, key = ilev_3
59 CADJ STORE totphihyd = tapelev3, key = ilev_3
60 c
61 #else /* ndef AUTODIFF_USE_OLDSTORE_3D */
62 c
63 CADJ STORE StoreDynVars3D = tapelev3, key = ilev_3
64 c
65 #endif /* AUTODIFF_USE_OLDSTORE_3D */
66
67 cnewCADJ STORE ivdconvcount = tapelevx, key = ilev_x
68
69 #ifdef EXACT_CONSERV
70 cphCADJ STORE hDivFlow = tapelev3, key = ilev_3
71 #endif /* EXACT_CONSERV */
72
73 #ifdef ALLOW_PASSIVE_TRACER
74 CADJ STORE tr1 = tapelev3, key = ilev_3
75 CADJ STORE gtr1nm1 = tapelev3, key = ilev_3
76 #endif /* ALLOW_PASSIVE_TRACER */
77
78 #ifdef NONLIN_FRSURF
79 CADJ STORE hfac_surfc = tapelev3, key = ilev_3
80 CADJ STORE hfac_surfs = tapelev3, key = ilev_3
81 CADJ STORE hfac_surfw = tapelev3, key = ilev_3
82 CADJ STORE hfacc = tapelev3, key = ilev_3
83 CADJ STORE hfacs = tapelev3, key = ilev_3
84 CADJ STORE hfacw = tapelev3, key = ilev_3
85 CADJ STORE recip_hfacc = tapelev3, key = ilev_3
86 CADJ STORE recip_hfacs = tapelev3, key = ilev_3
87 CADJ STORE recip_hfacw = tapelev3, key = ilev_3
88 # ifndef DISABLE_RSTAR_CODE
89 CADJ STORE rstarexpc,rstarexps,rstarexpw
90 CADJ & = tapelev3, key = ilev_3
91 CADJ STORE rstarfacc,rstarfacs,rstarfacw
92 CADJ & = tapelev3, key = ilev_3
93 CADJ STORE rstardhcdt,rstardhsdt,rstardhwdt
94 CADJ & = tapelev3, key = ilev_3
95 CADJ STORE h0facc,h0facs,h0facw
96 CADJ & = tapelev3, key = ilev_3
97 # endif
98 #endif /* NONLIN_FRSURF */
99
100 #ifdef ALLOW_CD_CODE
101 # include "cd_code_ad_check_lev3_dir.h"
102 #endif /* ALLOW_CD_CODE */
103
104 #ifdef ALLOW_EXF
105 # include "exf_ad_check_lev3_dir.h"
106 #endif /* ALLOW_EXF */
107
108 #ifdef ALLOW_PTRACERS
109 # include "ptracers_ad_check_lev3_dir.h"
110 #endif
111
112 #ifdef ALLOW_OBCS
113 # include "obcs_ad_check_lev3_dir.h"
114 #endif /* ALLOW_OBCS */
115
116 #ifdef ALLOW_SEAICE
117 # include "seaice_ad_check_lev3_dir.h"
118 #endif /* ALLOW_SEAICE */
119
120 #ifdef ALLOW_THSICE
121 # include "thsice_ad_check_lev3_dir.h"
122 #endif /* ALLOW_THSICE */
123
124 #ifdef ALLOW_RBCS
125 # include "rbcs_ad_check_lev3_dir.h"
126 #endif /* ALLOW_rbcs */
127
128 #ifdef ALLOW_GCHEM
129 # include "gchem_ad_check_lev3_dir.h"
130 #endif
131
132 #ifdef ALLOW_CFC
133 # include "cfc_ad_check_lev3_dir.h"
134 #endif
135
136 #ifdef ALLOW_DIC
137 # include "dic_ad_check_lev3_dir.h"
138 #endif
139
140 #ifdef ALLOW_EBM
141 CADJ STORE fu = tapelev3, key = ilev_3
142 CADJ STORE fv = tapelev3, key = ilev_3
143 CADJ STORE qnet = tapelev3, key = ilev_3
144 CADJ STORE qsw = tapelev3, key = ilev_3
145 CADJ STORE sss = tapelev3, key = ilev_3
146 CADJ STORE empmr = tapelev3, key = ilev_3
147 # include "ebm_ad_check_lev3_dir.h"
148 #endif /* ALLOW_EBM */
149
150 #ifdef ALLOW_COST
151 CADJ STORE cMeanTheta = tapelev3, key = ilev_3
152 CADJ STORE cMeanUVel = tapelev3, key = ilev_3
153 CADJ STORE cMeanVVel = tapelev3, key = ilev_3
154 CADJ STORE cMeanThetaUVel = tapelev3, key = ilev_3
155 CADJ STORE cMeanThetaVVel = tapelev3, key = ilev_3
156 #endif
157
158 #ifdef ALLOW_COST_TRACER
159 CADJ STORE objf_tracer = tapelev3, key = ilev_3
160 #endif
161
162 #ifdef ALLOW_COST_TRANSPORT
163 CADJ STORE objf_transport = tapelev3, key = ilev_3
164 #endif
165
166 #ifdef ALLOW_HFLUXM_CONTROL
167 CADJ STORE qnetm = tapelev3, key = ilev_3
168 #endif
  ViewVC Help
Powered by ViewVC 1.1.22