89 |
# undef SEAICE_ZETA_SMOOTHREG |
# undef SEAICE_ZETA_SMOOTHREG |
90 |
C allow the truncated ellipse rheology (runtime flag SEAICEuseTEM) |
C allow the truncated ellipse rheology (runtime flag SEAICEuseTEM) |
91 |
# undef SEAICE_ALLOW_TEM |
# undef SEAICE_ALLOW_TEM |
92 |
|
C The adjoint compiler TAF complains the least (and gives the best code) |
93 |
|
C when SEAICE_VECTORIZE_LSR is defined, but this is a bit of a hack |
94 |
|
# define SEAICE_VECTORIZE_LSR |
95 |
|
# define SEAICE_LSR_ADJOINT_ITER |
96 |
#else /* not SEAICE_CGRID, but old B-grid */ |
#else /* not SEAICE_CGRID, but old B-grid */ |
97 |
C-- By default for B-grid dynamics solver wind stress under sea-ice is |
C-- By default for B-grid dynamics solver wind stress under sea-ice is |
98 |
C set to the same value as it would be if there was no sea-ice. |
C set to the same value as it would be if there was no sea-ice. |
124 |
C-- Enable free drift code |
C-- Enable free drift code |
125 |
#define SEAICE_ALLOW_FREEDRIFT |
#define SEAICE_ALLOW_FREEDRIFT |
126 |
|
|
127 |
|
C-- pkg/seaice cost functions compile flags |
128 |
|
c >>> Sea-ice volume (requires pkg/cost) |
129 |
|
#undef ALLOW_COST_ICE |
130 |
|
c >>> Sea-ice misfit to obs (requires pkg/cost and ecco) |
131 |
|
#define ALLOW_SEAICE_COST_SMR_AREA |
132 |
|
|
133 |
#endif /* ALLOW_SEAICE */ |
#endif /* ALLOW_SEAICE */ |
134 |
#endif /* SEAICE_OPTIONS_H */ |
#endif /* SEAICE_OPTIONS_H */ |
135 |
|
|