1 |
heimbach |
1.1 |
c |
2 |
|
|
c store directives for checkpoint level 1 |
3 |
|
|
c |
4 |
|
|
c created: heimbach@mit.edu 10-Jan-2002 |
5 |
|
|
c |
6 |
edhill |
1.2 |
#ifdef ALLOW_EXF |
7 |
heimbach |
1.3 |
|
8 |
heimbach |
1.1 |
# ifdef ALLOW_ATM_TEMP |
9 |
heimbach |
1.3 |
|
10 |
heimbach |
1.1 |
CADJ STORE aqh0 = comlev1, key = ikey_dynamics |
11 |
|
|
CADJ STORE aqh1 = comlev1, key = ikey_dynamics |
12 |
|
|
CADJ STORE atemp0 = comlev1, key = ikey_dynamics |
13 |
|
|
CADJ STORE atemp1 = comlev1, key = ikey_dynamics |
14 |
|
|
CADJ STORE precip0 = comlev1, key = ikey_dynamics |
15 |
|
|
CADJ STORE precip1 = comlev1, key = ikey_dynamics |
16 |
|
|
CADJ STORE lwflux0 = comlev1, key = ikey_dynamics |
17 |
|
|
CADJ STORE lwflux1 = comlev1, key = ikey_dynamics |
18 |
|
|
CADJ STORE swflux0 = comlev1, key = ikey_dynamics |
19 |
|
|
CADJ STORE swflux1 = comlev1, key = ikey_dynamics |
20 |
|
|
# ifdef EXF_READ_EVAP |
21 |
|
|
CADJ STORE evap0 = comlev1, key = ikey_dynamics |
22 |
|
|
CADJ STORE evap1 = comlev1, key = ikey_dynamics |
23 |
|
|
# else |
24 |
|
|
CADJ STORE evap = comlev1, key = ikey_dynamics |
25 |
|
|
# endif /* EXF_READ_EVAP */ |
26 |
|
|
# ifdef ALLOW_DOWNWARD_RADIATION |
27 |
|
|
CADJ STORE swdown0 = comlev1, key = ikey_dynamics |
28 |
|
|
CADJ STORE swdown1 = comlev1, key = ikey_dynamics |
29 |
|
|
CADJ STORE lwdown0 = comlev1, key = ikey_dynamics |
30 |
|
|
CADJ STORE lwdown1 = comlev1, key = ikey_dynamics |
31 |
|
|
# endif |
32 |
heimbach |
1.4 |
# ifdef ALLOW_SEAICE |
33 |
|
|
CADJ STORE hflux0 = comlev1, key = ikey_dynamics |
34 |
|
|
CADJ STORE hflux1 = comlev1, key = ikey_dynamics |
35 |
|
|
# endif |
36 |
heimbach |
1.3 |
|
37 |
heimbach |
1.1 |
# else /* ALLOW_ATM_TEMP undef */ |
38 |
heimbach |
1.3 |
|
39 |
heimbach |
1.1 |
CADJ STORE hflux0 = comlev1, key = ikey_dynamics |
40 |
|
|
CADJ STORE hflux1 = comlev1, key = ikey_dynamics |
41 |
|
|
CADJ STORE sflux0 = comlev1, key = ikey_dynamics |
42 |
|
|
CADJ STORE sflux1 = comlev1, key = ikey_dynamics |
43 |
|
|
# ifdef SHORTWAVE_HEATING |
44 |
|
|
CADJ STORE swflux0 = comlev1, key = ikey_dynamics |
45 |
|
|
CADJ STORE swflux1 = comlev1, key = ikey_dynamics |
46 |
|
|
# endif |
47 |
heimbach |
1.3 |
|
48 |
heimbach |
1.1 |
# endif /* ALLOW_ATM_TEMP */ |
49 |
heimbach |
1.3 |
|
50 |
heimbach |
1.1 |
# ifdef ALLOW_ATM_WIND |
51 |
|
|
CADJ STORE uwind0 = comlev1, key = ikey_dynamics |
52 |
|
|
CADJ STORE uwind1 = comlev1, key = ikey_dynamics |
53 |
|
|
CADJ STORE vwind0 = comlev1, key = ikey_dynamics |
54 |
|
|
CADJ STORE vwind1 = comlev1, key = ikey_dynamics |
55 |
|
|
# else /* ALLOW_ATM_WIND undef */ |
56 |
|
|
CADJ STORE ustress0 = comlev1, key = ikey_dynamics |
57 |
|
|
CADJ STORE ustress1 = comlev1, key = ikey_dynamics |
58 |
|
|
CADJ STORE vstress0 = comlev1, key = ikey_dynamics |
59 |
|
|
CADJ STORE vstress1 = comlev1, key = ikey_dynamics |
60 |
|
|
# endif /* ALLOW_ATM_WIND */ |
61 |
heimbach |
1.3 |
|
62 |
heimbach |
1.1 |
# ifdef ALLOW_BULKFORMULAE |
63 |
|
|
CADJ STORE theta = comlev1, key = ikey_dynamics |
64 |
|
|
# endif |
65 |
|
|
# ifdef ALLOW_CLIMSSS_RELAXATION |
66 |
|
|
CADJ STORE climsss0 = comlev1, key = ikey_dynamics |
67 |
|
|
CADJ STORE climsss1 = comlev1, key = ikey_dynamics |
68 |
|
|
# endif |
69 |
|
|
# ifdef ALLOW_CLIMSST_RELAXATION |
70 |
|
|
CADJ STORE climsst0 = comlev1, key = ikey_dynamics |
71 |
|
|
CADJ STORE climsst1 = comlev1, key = ikey_dynamics |
72 |
|
|
# endif |
73 |
|
|
# ifdef ALLOW_CLIMSALT_RELAXATION |
74 |
|
|
cph not used so far |
75 |
|
|
cphCADJ STORE climsalt0 = comlev1, key = ikey_dynamics |
76 |
|
|
cphCADJ STORE climsalt1 = comlev1, key = ikey_dynamics |
77 |
|
|
# endif |
78 |
|
|
# ifdef ALLOW_CLIMTEMP_RELAXATION |
79 |
|
|
cph not used so far |
80 |
|
|
cphCADJ STORE climtemp0 = comlev1, key = ikey_dynamics |
81 |
|
|
cphCADJ STORE climtemp1 = comlev1, key = ikey_dynamics |
82 |
|
|
# endif |
83 |
|
|
# ifdef ATMOSPHERIC_LOADING |
84 |
|
|
CADJ STORE apressure0 = comlev1, key = ikey_dynamics |
85 |
|
|
CADJ STORE apressure1 = comlev1, key = ikey_dynamics |
86 |
|
|
# endif |
87 |
|
|
|
88 |
|
|
# ifdef ALLOW_HFLUX_CONTROL |
89 |
|
|
CADJ STORE xx_hflux0 = comlev1, key = ikey_dynamics |
90 |
|
|
CADJ STORE xx_hflux1 = comlev1, key = ikey_dynamics |
91 |
|
|
# endif |
92 |
|
|
# ifdef ALLOW_SFLUX_CONTROL |
93 |
|
|
CADJ STORE xx_sflux0 = comlev1, key = ikey_dynamics |
94 |
|
|
CADJ STORE xx_sflux1 = comlev1, key = ikey_dynamics |
95 |
|
|
# endif |
96 |
|
|
# ifdef ALLOW_USTRESS_CONTROL |
97 |
|
|
CADJ STORE xx_tauu0 = comlev1, key = ikey_dynamics |
98 |
|
|
CADJ STORE xx_tauu1 = comlev1, key = ikey_dynamics |
99 |
|
|
# endif |
100 |
|
|
# ifdef ALLOW_VSTRESS_CONTROL |
101 |
|
|
CADJ STORE xx_tauv0 = comlev1, key = ikey_dynamics |
102 |
|
|
CADJ STORE xx_tauv1 = comlev1, key = ikey_dynamics |
103 |
|
|
# endif |
104 |
|
|
# ifdef ALLOW_UWIND_CONTROL |
105 |
|
|
CADJ STORE xx_uwind0 = comlev1, key = ikey_dynamics |
106 |
|
|
CADJ STORE xx_uwind1 = comlev1, key = ikey_dynamics |
107 |
|
|
# endif |
108 |
|
|
# ifdef ALLOW_VWIND_CONTROL |
109 |
|
|
CADJ STORE xx_vwind0 = comlev1, key = ikey_dynamics |
110 |
|
|
CADJ STORE xx_vwind1 = comlev1, key = ikey_dynamics |
111 |
|
|
# endif |
112 |
|
|
# ifdef ALLOW_ATEMP_CONTROL |
113 |
|
|
CADJ STORE xx_atemp0 = comlev1, key = ikey_dynamics |
114 |
|
|
CADJ STORE xx_atemp1 = comlev1, key = ikey_dynamics |
115 |
|
|
# endif |
116 |
|
|
# ifdef ALLOW_AQH_CONTROL |
117 |
|
|
CADJ STORE xx_aqh0 = comlev1, key = ikey_dynamics |
118 |
|
|
CADJ STORE xx_aqh1 = comlev1, key = ikey_dynamics |
119 |
|
|
# endif |
120 |
heimbach |
1.3 |
|
121 |
edhill |
1.2 |
#endif /* ALLOW_EXF */ |