pkg/autodiff/checkpoint_lev3_directives.h

c
c     store directives for checkpoint level 3
c
c     created: heimbach@mit.edu 10-Jan-2002
c
CADJ STORE gsnm1     = tapelev3, key = ilev_3
CADJ STORE gtnm1     = tapelev3, key = ilev_3
CADJ STORE gunm1     = tapelev3, key = ilev_3
CADJ STORE gvnm1     = tapelev3, key = ilev_3
CADJ STORE theta     = tapelev3, key = ilev_3
CADJ STORE salt      = tapelev3, key = ilev_3
CADJ STORE uvel      = tapelev3, key = ilev_3
CADJ STORE vvel      = tapelev3, key = ilev_3
CADJ STORE wvel      = tapelev3, key = ilev_3
CADJ STORE etan      = tapelev3, key = ilev_3
CADJ STORE gu        = tapelev3, key = ilev_3
CADJ STORE gv        = tapelev3, key = ilev_3

#ifdef INCLUDE_CD_CODE
CADJ STORE uveld     = tapelev3, key = ilev_3
CADJ STORE vveld     = tapelev3, key = ilev_3
CADJ STORE etanm1    = tapelev3, key = ilev_3
CADJ STORE unm1      = tapelev3, key = ilev_3
CADJ STORE vnm1      = tapelev3, key = ilev_3
CADJ STORE gucd      = tapelev3, key = ilev_3
CADJ STORE gvcd      = tapelev3, key = ilev_3
#endif

#ifdef ALLOW_PASSIVE_TRACER
CADJ STORE tr1       = tapelev3, key = ilev_3
CADJ STORE gtr1nm1   = tapelev3, key = ilev_3
#endif

#ifdef EXACT_CONSERV
CADJ STORE etaH      = tapelev3, key = ilev_3
CADJ STORE hDivFlow  = tapelev3, key = ilev_3
#endif

#ifdef INCLUDE_EXTERNAL_FORCING_PACKAGE
# ifdef ALLOW_ATM_TEMP
CADJ STORE aqh0      = tapelev3, key = ilev_3
CADJ STORE aqh1      = tapelev3, key = ilev_3
CADJ STORE atemp0    = tapelev3, key = ilev_3
CADJ STORE atemp1    = tapelev3, key = ilev_3
CADJ STORE precip0   = tapelev3, key = ilev_3
CADJ STORE precip1   = tapelev3, key = ilev_3
CADJ STORE lwflux0   = tapelev3, key = ilev_3
CADJ STORE lwflux1   = tapelev3, key = ilev_3
CADJ STORE swflux0   = tapelev3, key = ilev_3
CADJ STORE swflux1   = tapelev3, key = ilev_3
# else
CADJ STORE hflux0    = tapelev3, key = ilev_3
CADJ STORE hflux1    = tapelev3, key = ilev_3
CADJ STORE sflux0    = tapelev3, key = ilev_3
CADJ STORE sflux1    = tapelev3, key = ilev_3
#  ifdef ALLOW_KPP
CADJ STORE swflux0   = tapelev3, key = ilev_3
CADJ STORE swflux1   = tapelev3, key = ilev_3
#  endif
# endif /* ALLOW_ATM_TEMP */
# ifdef ALLOW_ATM_WIND
CADJ STORE uwind0    = tapelev3, key = ilev_3
CADJ STORE uwind1    = tapelev3, key = ilev_3
CADJ STORE vwind0    = tapelev3, key = ilev_3
CADJ STORE vwind1    = tapelev3, key = ilev_3
# else
CADJ STORE ustress0  = tapelev3, key = ilev_3
CADJ STORE ustress1  = tapelev3, key = ilev_3
CADJ STORE vstress0  = tapelev3, key = ilev_3
CADJ STORE vstress1  = tapelev3, key = ilev_3
# endif  /* ALLOW_ATM_WIND */
#endif /* INCLUDE_EXTERNAL_FORCING_PACKAGE */
1	heimbach	1.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
19			#ifdef INCLUDE_CD_CODE
20			CADJ STORE uveld = tapelev3, key = ilev_3
21			CADJ STORE vveld = tapelev3, key = ilev_3
22			CADJ STORE etanm1 = tapelev3, key = ilev_3
23			CADJ STORE unm1 = tapelev3, key = ilev_3
24			CADJ STORE vnm1 = tapelev3, key = ilev_3
25			CADJ STORE gucd = tapelev3, key = ilev_3
26			CADJ STORE gvcd = tapelev3, key = ilev_3
27			#endif
28
29			#ifdef ALLOW_PASSIVE_TRACER
30			CADJ STORE tr1 = tapelev3, key = ilev_3
31			CADJ STORE gtr1nm1 = tapelev3, key = ilev_3
32			#endif
33
34			#ifdef EXACT_CONSERV
35			CADJ STORE etaH = tapelev3, key = ilev_3
36			CADJ STORE hDivFlow = tapelev3, key = ilev_3
37			#endif
38
39			#ifdef INCLUDE_EXTERNAL_FORCING_PACKAGE
40			# ifdef ALLOW_ATM_TEMP
41			CADJ STORE aqh0 = tapelev3, key = ilev_3
42			CADJ STORE aqh1 = tapelev3, key = ilev_3
43			CADJ STORE atemp0 = tapelev3, key = ilev_3
44			CADJ STORE atemp1 = tapelev3, key = ilev_3
45			CADJ STORE precip0 = tapelev3, key = ilev_3
46			CADJ STORE precip1 = tapelev3, key = ilev_3
47			CADJ STORE lwflux0 = tapelev3, key = ilev_3
48			CADJ STORE lwflux1 = tapelev3, key = ilev_3
49			CADJ STORE swflux0 = tapelev3, key = ilev_3
50			CADJ STORE swflux1 = tapelev3, key = ilev_3
51			# else
52			CADJ STORE hflux0 = tapelev3, key = ilev_3
53			CADJ STORE hflux1 = tapelev3, key = ilev_3
54			CADJ STORE sflux0 = tapelev3, key = ilev_3
55			CADJ STORE sflux1 = tapelev3, key = ilev_3
56			# ifdef ALLOW_KPP
57			CADJ STORE swflux0 = tapelev3, key = ilev_3
58			CADJ STORE swflux1 = tapelev3, key = ilev_3
59			# endif
60			# endif /* ALLOW_ATM_TEMP */
61			# ifdef ALLOW_ATM_WIND
62			CADJ STORE uwind0 = tapelev3, key = ilev_3
63			CADJ STORE uwind1 = tapelev3, key = ilev_3
64			CADJ STORE vwind0 = tapelev3, key = ilev_3
65			CADJ STORE vwind1 = tapelev3, key = ilev_3
66			# else
67			CADJ STORE ustress0 = tapelev3, key = ilev_3
68			CADJ STORE ustress1 = tapelev3, key = ilev_3
69			CADJ STORE vstress0 = tapelev3, key = ilev_3
70			CADJ STORE vstress1 = tapelev3, key = ilev_3
71			# endif /* ALLOW_ATM_WIND */
72			#endif /* INCLUDE_EXTERNAL_FORCING_PACKAGE */