43 |
C a simulation with a different number of categories. |
C a simulation with a different number of categories. |
44 |
#undef SEAICE_MULTICATEGORY |
#undef SEAICE_MULTICATEGORY |
45 |
|
|
46 |
|
C-- run with sea Ice Thickness Distribution (ITD); |
47 |
|
C set number of categories (nITD) in SEAICE_SIZE.h |
48 |
|
#undef SEAICE_ITD |
49 |
|
|
50 |
|
C-- SEAICE_ITD replaces SEAICE_MULTICATEGORY |
51 |
|
#ifdef SEAICE_ITD |
52 |
|
#undef SEAICE_MULTICATEGORY |
53 |
|
#endif |
54 |
|
|
55 |
C-- Use the Old version of seaice_growth (close to cvs version 1.70) |
C-- Use the Old version of seaice_growth (close to cvs version 1.70) |
56 |
C otherwise, use the merged version (with some of Ian Fenty s code) |
C otherwise, use the merged version (with some of Ian Fenty s code) |
57 |
#undef SEAICE_GROWTH_LEGACY |
#undef SEAICE_GROWTH_LEGACY |
92 |
C-- When set use SEAICE_zetaMin and SEAICE_evpDampC to limit viscosities |
C-- When set use SEAICE_zetaMin and SEAICE_evpDampC to limit viscosities |
93 |
C from below and above in seaice_evp: not necessary, and not recommended |
C from below and above in seaice_evp: not necessary, and not recommended |
94 |
# undef SEAICE_ALLOW_CLIPZETA |
# undef SEAICE_ALLOW_CLIPZETA |
95 |
# else /* not EVP */ |
# endif /* SEAICE_ALLOW_EVP */ |
96 |
C regularize zeta to zmax with a smooth tanh-function instead |
C regularize zeta to zmax with a smooth tanh-function instead |
97 |
C of a min(zeta,zmax). This improves convergence of iterative |
C of a min(zeta,zmax). This improves convergence of iterative |
98 |
C solvers (Lemieux and Tremblay 2009, JGR). No effect on EVP |
C solvers (Lemieux and Tremblay 2009, JGR). No effect on EVP |
99 |
# undef SEAICE_ZETA_SMOOTHREG |
# undef SEAICE_ZETA_SMOOTHREG |
|
# endif /* SEAICE_ALLOW_EVP */ |
|
100 |
C allow the truncated ellipse rheology (runtime flag SEAICEuseTEM) |
C allow the truncated ellipse rheology (runtime flag SEAICEuseTEM) |
101 |
# undef SEAICE_ALLOW_TEM |
# undef SEAICE_ALLOW_TEM |
102 |
#else /* not SEAICE_CGRID, but old B-grid */ |
#else /* not SEAICE_CGRID, but old B-grid */ |
133 |
C-- Enable free drift code |
C-- Enable free drift code |
134 |
#undef SEAICE_ALLOW_FREEDRIFT |
#undef SEAICE_ALLOW_FREEDRIFT |
135 |
|
|
|
C-- run with sea ice thickness distribution; |
|
|
C set number of categories (nITD) in SEAICE_SIZE.h |
|
|
#undef SEAICE_ITD |
|
|
C |
|
|
C-- SEAICE_ITD replaces SEAICE_MULTICATEGORY |
|
|
#ifdef SEAICE_ITD |
|
|
#undef SEAICE_MULTICATEGORY |
|
|
#endif |
|
|
|
|
136 |
#endif /* ALLOW_SEAICE */ |
#endif /* ALLOW_SEAICE */ |
137 |
#endif /* SEAICE_OPTIONS_H */ |
#endif /* SEAICE_OPTIONS_H */ |
138 |
|
|