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

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

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


Revision 1.35 - (hide annotations) (download)
Mon Apr 30 18:48:19 2007 UTC (17 years, 2 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint59a, checkpoint59b
Changes since 1.34: +2 -4 lines
File MIME type: text/plain
Change CADJ STORE pattern after removing some
#ifdef ALLOW_EXF ... #ELSE ... #ENDIF structures.

1 heimbach 1.35 C $Header: /u/gcmpack/MITgcm/pkg/autodiff/checkpoint_lev3_directives.h,v 1.34 2007/03/24 02:23:09 heimbach Exp $
2 heimbach 1.19 C $Name: $
3 heimbach 1.1 c
4     c store directives for checkpoint level 3
5     c
6     c created: heimbach@mit.edu 10-Jan-2002
7     c
8 heimbach 1.22 CADJ STORE gs = tapelev3, key = ilev_3
9     CADJ STORE gt = tapelev3, key = ilev_3
10     CADJ STORE gtnm1 = tapelev3, key = ilev_3
11 heimbach 1.1 CADJ STORE gsnm1 = tapelev3, key = ilev_3
12     CADJ STORE gunm1 = tapelev3, key = ilev_3
13     CADJ STORE gvnm1 = tapelev3, key = ilev_3
14     CADJ STORE theta = tapelev3, key = ilev_3
15     CADJ STORE salt = tapelev3, key = ilev_3
16     CADJ STORE uvel = tapelev3, key = ilev_3
17     CADJ STORE vvel = tapelev3, key = ilev_3
18     CADJ STORE wvel = tapelev3, key = ilev_3
19     CADJ STORE etan = tapelev3, key = ilev_3
20 heimbach 1.6 CADJ STORE totphihyd = tapelev3, key = ilev_3
21 heimbach 1.22 CADJ STORE surfaceforcingTice = tapelev3, key = ilev_3
22     cnewCADJ STORE ivdconvcount = tapelev3, key = ilev_3
23 heimbach 1.1
24 heimbach 1.12 #ifdef EXACT_CONSERV
25 heimbach 1.13 CADJ STORE etaH = tapelev3, key = ilev_3
26 heimbach 1.20 CADJ STORE dEtaHdt = tapelev3, key = ilev_3
27 heimbach 1.22 CADJ STORE PmEpR = tapelev3, key = ilev_3
28 heimbach 1.20 cphCADJ STORE hDivFlow = tapelev3, key = ilev_3
29 heimbach 1.12 #endif /* EXACT_CONSERV */
30    
31 heimbach 1.1 #ifdef ALLOW_PASSIVE_TRACER
32     CADJ STORE tr1 = tapelev3, key = ilev_3
33     CADJ STORE gtr1nm1 = tapelev3, key = ilev_3
34 heimbach 1.7 #endif /* ALLOW_PASSIVE_TRACER */
35 heimbach 1.15
36 heimbach 1.26 #ifdef NONLIN_FRSURF
37     CADJ STORE hfac_surfc = tapelev3, key = ilev_3
38     CADJ STORE hfac_surfs = tapelev3, key = ilev_3
39     CADJ STORE hfac_surfw = tapelev3, key = ilev_3
40     CADJ STORE hfacc = tapelev3, key = ilev_3
41     CADJ STORE hfacs = tapelev3, key = ilev_3
42     CADJ STORE hfacw = tapelev3, key = ilev_3
43     CADJ STORE recip_hfacc = tapelev3, key = ilev_3
44     CADJ STORE recip_hfacs = tapelev3, key = ilev_3
45     CADJ STORE recip_hfacw = tapelev3, key = ilev_3
46 heimbach 1.29 # ifndef DISABLE_RSTAR_CODE
47     CADJ STORE rstarexpc,rstarexps,rstarexpw
48     CADJ & = tapelev3, key = ilev_3
49     CADJ STORE rstarfacc,rstarfacs,rstarfacw
50     CADJ & = tapelev3, key = ilev_3
51     CADJ STORE rstardhcdt,rstardhsdt,rstardhwdt
52     CADJ & = tapelev3, key = ilev_3
53     CADJ STORE h0facc,h0facs,h0facw
54     CADJ & = tapelev3, key = ilev_3
55     # endif
56 heimbach 1.26 #endif /* NONLIN_FRSURF */
57    
58 heimbach 1.15 #ifdef ALLOW_CD_CODE
59     # include "cd_code_ad_check_lev3_dir.h"
60     #endif /* ALLOW_CD_CODE */
61 heimbach 1.1
62 edhill 1.16 #ifdef ALLOW_EXF
63 heimbach 1.13 # include "exf_ad_check_lev3_dir.h"
64 heimbach 1.35 #endif /* ALLOW_EXF undef */
65 heimbach 1.3
66     CADJ STORE taux0 = tapelev3, key = ilev_3
67     CADJ STORE taux1 = tapelev3, key = ilev_3
68     CADJ STORE tauy0 = tapelev3, key = ilev_3
69     CADJ STORE tauy1 = tapelev3, key = ilev_3
70     CADJ STORE Qnet0 = tapelev3, key = ilev_3
71     CADJ STORE Qnet1 = tapelev3, key = ilev_3
72     CADJ STORE EmPmR0 = tapelev3, key = ilev_3
73     CADJ STORE EmPmR1 = tapelev3, key = ilev_3
74     CADJ STORE SST0 = tapelev3, key = ilev_3
75     CADJ STORE SST1 = tapelev3, key = ilev_3
76     CADJ STORE SSS0 = tapelev3, key = ilev_3
77     CADJ STORE SSS1 = tapelev3, key = ilev_3
78 heimbach 1.25 CADJ STORE saltFlux0 = tapelev3, key = ilev_3
79     CADJ STORE saltFlux1 = tapelev3, key = ilev_3
80 heimbach 1.4 #ifdef SHORTWAVE_HEATING
81 heimbach 1.3 CADJ STORE Qsw0 = tapelev3, key = ilev_3
82     CADJ STORE Qsw1 = tapelev3, key = ilev_3
83 heimbach 1.4 #endif
84     #ifdef ATMOSPHERIC_LOADING
85     CADJ STORE pload0 = tapelev3, key = ilev_3
86     CADJ STORE pload1 = tapelev3, key = ilev_3
87 heimbach 1.33 CADJ STORE siceload = tapelev3, key = ilev_3
88 heimbach 1.4 #endif
89 heimbach 1.3
90 heimbach 1.13 #ifdef ALLOW_PTRACERS
91     # include "ptracers_ad_check_lev3_dir.h"
92 heimbach 1.7 #endif
93    
94 heimbach 1.13 #ifdef ALLOW_OBCS
95     # include "obcs_ad_check_lev3_dir.h"
96 heimbach 1.2 #endif /* ALLOW_OBCS */
97    
98 heimbach 1.7 #ifdef ALLOW_SEAICE
99 heimbach 1.13 # include "seaice_ad_check_lev3_dir.h"
100 heimbach 1.7 #endif /* ALLOW_SEAICE */
101 heimbach 1.19
102 heimbach 1.28 #ifdef ALLOW_THSICE
103     # include "thsice_ad_check_lev3_dir.h"
104 heimbach 1.31 #endif /* ALLOW_THSICE */
105    
106     #ifdef ALLOW_RBCS
107     # include "rbcs_ad_check_lev3_dir.h"
108     #endif /* ALLOW_rbcs */
109 heimbach 1.28
110 heimbach 1.19 #ifdef ALLOW_EBM
111 heimbach 1.22 CADJ STORE fu = tapelev3, key = ilev_3
112     CADJ STORE fv = tapelev3, key = ilev_3
113     CADJ STORE qnet = tapelev3, key = ilev_3
114     CADJ STORE qsw = tapelev3, key = ilev_3
115     CADJ STORE sss = tapelev3, key = ilev_3
116     CADJ STORE empmr = tapelev3, key = ilev_3
117 heimbach 1.19 # include "ebm_ad_check_lev3_dir.h"
118     #endif /* ALLOW_EBM */
119 heimbach 1.23
120 dfer 1.32 #ifdef ALLOW_COST
121 heimbach 1.23 CADJ STORE cMeanTheta = tapelev3, key = ilev_3
122     CADJ STORE cMeanUVel = tapelev3, key = ilev_3
123     CADJ STORE cMeanVVel = tapelev3, key = ilev_3
124 heimbach 1.34 CADJ STORE cMeanThetaUVel = tapelev3, key = ilev_3
125     CADJ STORE cMeanThetaVVel = tapelev3, key = ilev_3
126 heimbach 1.23 #endif
127 heimbach 1.24
128     #ifdef ALLOW_COST_TRACER
129     CADJ STORE objf_tracer = tapelev3, key = ilev_3
130     #endif
131 heimbach 1.30
132     #ifdef ALLOW_COST_TRANSPORT
133     CADJ STORE objf_transport = tapelev3, key = ilev_3
134     #endif

  ViewVC Help
Powered by ViewVC 1.1.22