46 |
C set the following flag (pressure is assumed to have no effect, |
C set the following flag (pressure is assumed to have no effect, |
47 |
C which is a good assumption for the top 20 meters). With this |
C which is a good assumption for the top 20 meters). With this |
48 |
C option defined the parameter SEAICE_freeze has no effect. |
C option defined the parameter SEAICE_freeze has no effect. |
49 |
#undef SEAICE_VARIABLE_FREEZING_POINT |
#define SEAICE_VARIABLE_FREEZING_POINT |
50 |
|
|
51 |
C-- Allow SEAICEuseFlooding, which converts snow to ice if submerged. |
C-- Allow SEAICEuseFlooding, which converts snow to ice if submerged. |
52 |
#define ALLOW_SEAICE_FLOODING |
#define ALLOW_SEAICE_FLOODING |
74 |
# ifdef SEAICE_ALLOW_EVP |
# ifdef SEAICE_ALLOW_EVP |
75 |
C-- When set use SEAICE_zetaMin and SEAICE_evpDampC to limit |
C-- When set use SEAICE_zetaMin and SEAICE_evpDampC to limit |
76 |
C-- viscosities from below and above in seaice_evp |
C-- viscosities from below and above in seaice_evp |
77 |
C-- not necessary, and not recommended, but used here for backward |
C-- not necessary, and not recommended |
|
C-- compatibility |
|
78 |
# define SEAICE_ALLOW_CLIPZETA |
# define SEAICE_ALLOW_CLIPZETA |
79 |
# endif /* SEAICE_ALLOW_EVP */ |
# endif /* SEAICE_ALLOW_EVP */ |
80 |
C allow the truncated ellipse rheology (runtime flag SEAICEuseTEM) |
C allow the truncated ellipse rheology (runtime flag SEAICEuseTEM) |
94 |
C-- When set use MAX_HEFF to cap sea ice thickness in seaice_growth |
C-- When set use MAX_HEFF to cap sea ice thickness in seaice_growth |
95 |
#undef SEAICE_CAP_HEFF |
#undef SEAICE_CAP_HEFF |
96 |
C-- When set use SEAICE_clipVelocties = .true., to clip U/VICE at 40cm/s, |
C-- When set use SEAICE_clipVelocties = .true., to clip U/VICE at 40cm/s, |
97 |
C-- not recommended, here enabled for backward compatibility |
C-- not recommended |
98 |
#define SEAICE_ALLOW_CLIPVELS |
#define SEAICE_ALLOW_CLIPVELS |
99 |
|
|
100 |
C enable free drift code |
C enable free drift code |