74 |
|
|
75 |
C-- Only for the C-grid version it is possible to |
C-- Only for the C-grid version it is possible to |
76 |
#ifdef SEAICE_CGRID |
#ifdef SEAICE_CGRID |
77 |
|
C enable JFNK code by defining the following flag |
78 |
|
# define SEAICE_ALLOW_JFNK |
79 |
C enable EVP code by defining the following flag |
C enable EVP code by defining the following flag |
80 |
# define SEAICE_ALLOW_EVP |
# define SEAICE_ALLOW_EVP |
81 |
# ifdef SEAICE_ALLOW_EVP |
# ifdef SEAICE_ALLOW_EVP |
82 |
C-- When set use SEAICE_zetaMin and SEAICE_evpDampC to limit viscosities |
C-- When set use SEAICE_zetaMin and SEAICE_evpDampC to limit viscosities |
83 |
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 |
84 |
# undef SEAICE_ALLOW_CLIPZETA |
# undef SEAICE_ALLOW_CLIPZETA |
85 |
|
# else /* not EVP */ |
86 |
|
C regularize zeta to zmax with a smooth tanh-function instead |
87 |
|
C of a min(zeta,zmax). This improves convergence of iterative |
88 |
|
C solvers (Lemieux and Tremblay 2009, JGR). No effect on EVP |
89 |
|
# undef SEAICE_ZETA_SMOOTHREG |
90 |
# endif /* SEAICE_ALLOW_EVP */ |
# endif /* SEAICE_ALLOW_EVP */ |
91 |
C allow the truncated ellipse rheology (runtime flag SEAICEuseTEM) |
C allow the truncated ellipse rheology (runtime flag SEAICEuseTEM) |
92 |
# undef SEAICE_ALLOW_TEM |
# undef SEAICE_ALLOW_TEM |