1 |
|
2 |
C |
3 |
C CPP flags controlling which code is included in the files that |
4 |
C will be compiled. |
5 |
C |
6 |
C ******************************************************************** |
7 |
C *** ECCO Package *** |
8 |
C ******************************************************************** |
9 |
C |
10 |
C o include dump of snap shots for checks |
11 |
#undef ALLOW_SNAPSHOTS |
12 |
|
13 |
#define ALLOW_ECCO_FORWARD_RUN |
14 |
#undef ALLOW_ECCO_DIAGNOSTICS_RUN |
15 |
#undef ALLOW_ECCO_ADJOINT_RUN |
16 |
#undef ALLOW_ECCO_GRADIENT_CHECK |
17 |
#undef ALLOW_ECCO_OPTIMIZATION |
18 |
|
19 |
C >>> Do a long protocol. |
20 |
#undef ECCO_VERBOSE |
21 |
|
22 |
C >>> Just do a "dry" run ( useful for testing ). |
23 |
#undef ALLOW_NO_DYNAMICS |
24 |
C >>> Use the Yearly-Monthly-Daily-Stepping call tree. |
25 |
#undef ALLOW_YMDS_TREE |
26 |
C >>> Do not call stepping |
27 |
#define ALLOW_STEPPING_CALL |
28 |
|
29 |
C ******************************************************************** |
30 |
C *** Adjoint Support Package *** |
31 |
C ******************************************************************** |
32 |
|
33 |
C o Include/exclude code in order to be able to automatically |
34 |
C differentiate the MITgcmUV by using the Tangent Linear and |
35 |
C Adjoint Model Compiler (TAMC). |
36 |
#undef INCLUDE_AUTODIFF_PACKAGE |
37 |
C |
38 |
#undef ALLOW_AUTODIFF_TAMC |
39 |
C >>> Checkpointing as handled by TAMC |
40 |
#undef ALLOW_TAMC_CHECKPOINTING |
41 |
|
42 |
C o use divided adjoint to split adjoint computations |
43 |
#undef ALLOW_DIVIDED_ADJOINT |
44 |
|
45 |
C ******************************************************************** |
46 |
C *** Calendar Package *** |
47 |
C ******************************************************************** |
48 |
C |
49 |
C CPP flags controlling which code is included in the files that |
50 |
C will be compiled. |
51 |
C |
52 |
|
53 |
C o Include the calendar tool. |
54 |
#define ALLOW_CALENDAR |
55 |
#define ALLOW_CAL_NENDITER |
56 |
|
57 |
C ******************************************************************** |
58 |
C *** Cost function Package *** |
59 |
C ******************************************************************** |
60 |
C |
61 |
C >>> Use the EGM-96 geoid error covariance. |
62 |
#undef ALLOW_EGM96_ERROR_COV |
63 |
#undef ALLOW_READ_EGM_DATA |
64 |
C >>> Use NSCAT data. |
65 |
#undef ALLOW_NSCAT_DATA |
66 |
C >>> Cost function contributions |
67 |
#undef ALLOW_HFLUX_COST_CONTRIBUTION |
68 |
#undef ALLOW_SFLUX_COST_CONTRIBUTION |
69 |
#undef ALLOW_USTRESS_COST_CONTRIBUTION |
70 |
#undef ALLOW_VSTRESS_COST_CONTRIBUTION |
71 |
#undef ALLOW_THETA_COST_CONTRIBUTION |
72 |
#undef ALLOW_SALT_COST_CONTRIBUTION |
73 |
#undef ALLOW_SST_COST_CONTRIBUTION |
74 |
#undef ALLOW_SSH_COST_CONTRIBUTION |
75 |
#undef ALLOW_CTDT_COST_CONTRIBUTION |
76 |
#undef ALLOW_CTDS_COST_CONTRIBUTION |
77 |
#undef ALLOW_COST_ATLANTIC |
78 |
C >>> Projection onto Spherical Harmonics |
79 |
#undef ALLOW_SPH_PROJECTION |
80 |
|
81 |
C ******************************************************************** |
82 |
C *** Control vector Package *** |
83 |
C ******************************************************************** |
84 |
C |
85 |
#undef ALLOW_NONDIMENSIONAL_CONTROL_IO |
86 |
C >>> Replace hooks for the control variables. |
87 |
#ifdef INCLUDE_ECCO_PACKAGE |
88 |
#define _GET_HFLUX_CONTROL(a,b,c) call ctrl_getheatflux(a,b,c) |
89 |
#define _GET_SFLUX_CONTROL(a,b,c) call ctrl_getsaltflux(a,b,c) |
90 |
#define _GET_USTRESS_CONTROL(a,b,c) call ctrl_getzonstress(a,b,c) |
91 |
#define _GET_VSTRESS_CONTROL(a,b,c) call ctrl_getmerstress(a,b,c) |
92 |
#define _GET_SWFLUX_CONTROL(a,b,c) |
93 |
#define _GET_LWFLUX_CONTROL(a,b,c) |
94 |
#else |
95 |
#define _GET_HFLUX_CONTROL(a,b,c) |
96 |
#define _GET_SFLUX_CONTROL(a,b,c) |
97 |
#define _GET_USTRESS_CONTROL(a,b,c) |
98 |
#define _GET_VSTRESS_CONTROL(a,b,c) |
99 |
#define _GET_SWFLUX_CONTROL(a,b,c) |
100 |
#define _GET_LWFLUX_CONTROL(a,b,c) |
101 |
#endif |
102 |
|
103 |
C >>> Initial values. |
104 |
#undef ALLOW_THETA0_CONTROL |
105 |
#undef ALLOW_SALT0_CONTROL |
106 |
|
107 |
C >>> Surface fluxes. |
108 |
#undef ALLOW_HFLUX_CONTROL |
109 |
#undef ALLOW_SFLUX_CONTROL |
110 |
#undef ALLOW_USTRESS_CONTROL |
111 |
#undef ALLOW_VSTRESS_CONTROL |
112 |
#undef ALLOW_SWFLUX_CONTROL |
113 |
#undef ALLOW_LWFLUX_CONTROL |
114 |
|
115 |
C >>> Atmospheric state. |
116 |
#undef ALLOW_ATEMP_CONTROL |
117 |
#undef ALLOW_AQH_CONTROL |
118 |
#undef ALLOW_UWIND_CONTROL |
119 |
#undef ALLOW_VWIND_CONTROL |
120 |
#undef ALLOW_PRECIP_CONTROL |
121 |
|
122 |
C ******************************************************************** |
123 |
C *** External forcing Package *** |
124 |
C ******************************************************************** |
125 |
C |
126 |
C o Include/exclude the external forcing package. To use this package, |
127 |
C you have to include the calendar tool as well. KPP can be switched |
128 |
C on or off. The implementation automatically takes care of this. |
129 |
#define INCLUDE_EXTERNAL_FORCING_PACKAGE |
130 |
|
131 |
C Do more printout for the protocol file than usual. |
132 |
#define EXF_VERBOSE |
133 |
|
134 |
C Bulk formulae related flags. |
135 |
#undef ALLOW_BULKFORMULAE |
136 |
#undef ALLOW_ATM_TEMP |
137 |
#undef ALLOW_ATM_WIND |
138 |
|
139 |
C Relaxation to monthly climatologies. |
140 |
#undef ALLOW_CLIMTEMP_RELAXATION |
141 |
#undef ALLOW_CLIMSALT_RELAXATION |
142 |
#undef ALLOW_CLIMSST_RELAXATION |
143 |
#undef ALLOW_CLIMSSS_RELAXATION |
144 |
|
145 |
C Relaxation to constant surface fields. |
146 |
#undef ALLOW_CONST_SST_RELAXATION |
147 |
#undef ALLOW_CONST_SSS_RELAXATION |