/[MITgcm]/MITgcm_contrib/MPMice/beaufort/code/SEAICE_OPTIONS.h
ViewVC logotype

Diff of /MITgcm_contrib/MPMice/beaufort/code/SEAICE_OPTIONS.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.4 by dimitri, Wed Mar 14 05:32:10 2012 UTC revision 1.5 by dimitri, Sat Oct 4 03:24:19 2014 UTC
# Line 33  C     in a separate external package, fo Line 33  C     in a separate external package, fo
33  C     modified for sea-ice effects by pkg/seaice.  C     modified for sea-ice effects by pkg/seaice.
34  #define SEAICE_EXTERNAL_FLUXES  #define SEAICE_EXTERNAL_FLUXES
35    
36  C--   By default, the sea-ice package uses 2-category thermodynamics.  C--   This CPP flag has been retired.  The number of ice categories
37  C     When this flag is set, an 8-category calculation of ice  C     used to solve for seaice flux is now specified by run-time
38  C     thermodynamics is carried out in groatb.F  C     parameter SEAICE_multDim.
39  C     Note the pickup_seaice.* generated by this option differ  C     Note: be aware of pickup_seaice.* compatibility issues when
40  C     from those generated with the default 2-category model.  C     restarting a simulation with a different number of categories.
41  C     Therefore it is not possible to switch between the two  c#define SEAICE_MULTICATEGORY
42  C     in the middle of an integration.  
43  #define SEAICE_MULTICATEGORY  C--   run with sea Ice Thickness Distribution (ITD);
44    C     set number of categories (nITD) in SEAICE_SIZE.h
45  C--   Use the Old version of seaice_growth (close to cvs version 1.70)  #undef SEAICE_ITD
 C     otherwise, use the merged version (with some of Ian Fenty s code)  
 #undef SEAICE_GROWTH_LEGACY  
46    
47  C--   Since the missing sublimation term is now included  C--   Since the missing sublimation term is now included
48  C     this flag is needed for backward compatibility  C     this flag is needed for backward compatibility
49  #undef SEAICE_DISABLE_SUBLIM  #undef SEAICE_DISABLE_SUBLIM
50    
51  C--   Suspected missing term in coupled ocn-ice heat budget (to be further  C--   Suspected missing term in coupled ocn-ice heat budget (to be confirmed)
 C     gtested)  
52  #undef SEAICE_DISABLE_HEATCONSFIX  #undef SEAICE_DISABLE_HEATCONSFIX
53    
54  C--   The freezing point of water is a simple linear dependence to salinity.  C--   Default is constant seaice salinity (SEAICE_salt0); Define the following
55  C     The flag below is now obsolete, but kept to ease the transition  C     flag to consider (space & time) variable salinity: advected and forming
56  C     from the old constant freezing point default (see seaice_check.F).  C     seaice with a fraction (=SEAICE_saltFrac) of freezing seawater salinity.
57  #define SEAICE_VARIABLE_FREEZING_POINT  C- Note: SItracer also offers an alternative way to handle variable salinity.
   
 C--   The functionality of this flag has been moved to SItracer making  
 C     this flag obsolete.  
58  #define SEAICE_VARIABLE_SALINITY  #define SEAICE_VARIABLE_SALINITY
59    
60  C--   Tracers of ice and/or ice cover.  C--   Tracers of ice and/or ice cover.
61  #define ALLOW_SITRACER  #undef ALLOW_SITRACER
62  #ifdef ALLOW_SITRACER  #ifdef ALLOW_SITRACER
63  C--   To try avoid 'spontaneous generation' of tracer maxima by advdiff.  C--   To try avoid 'spontaneous generation' of tracer maxima by advdiff.
64  # define ALLOW_SITRACER_ADVCAP  # define ALLOW_SITRACER_ADVCAP
65  #endif  #endif
66    
67    C--   Enable grease ice parameterization
68    C     The grease ice parameterization delays formation of solid
69    C     sea ice from frazil ice by a time constant and provides a
70    C     dynamic calculation of the initial solid sea ice thickness
71    C     HO as a function of winds, currents and available grease ice
72    C     volume. Grease ice does not significantly reduce heat loss
73    C     from the ocean in winter and area covered by grease is thus
74    C     handled like open water.
75    C     (For details see Smedsrud and Martin, 2014, Ann.Glac.)
76    C     Set SItrName(1) = 'grease' in namelist SEAICE_PARM03 in data.seaice
77    C     then output SItr01 is SItrNameLong(1) = 'grease ice volume fraction',
78    C     with SItrUnit(1) = '[0-1]', which needs to be multiplied by SIheff
79    C     to yield grease ice volume. Additionally, the actual grease ice
80    C     layer thickness (diagnostic SIgrsLT) can be saved.
81    #undef SEAICE_GREASE
82    C--   grease ice uses SItracer:
83    #ifdef SEAICE_GREASE
84    # define ALLOW_SITRACER
85    # define ALLOW_SITRACER_ADVCAP
86    #endif
87    
88  C--   By default the seaice model is discretized on a B-Grid (for  C--   By default the seaice model is discretized on a B-Grid (for
89  C     historical reasons). Define the following flag to use a new  C     historical reasons). Define the following flag to use a new
90  C     (not thoroughly) test version on a C-grid  C     (not thoroughly) test version on a C-grid
# Line 77  C     (not thoroughly) test version on a Line 92  C     (not thoroughly) test version on a
92    
93  C--   Only for the C-grid version it is possible to  C--   Only for the C-grid version it is possible to
94  #ifdef SEAICE_CGRID  #ifdef SEAICE_CGRID
95    C     enable JFNK code by defining the following flag
96    # define SEAICE_ALLOW_JFNK
97    C     enable LSR to use global (multi-tile) tri-diagonal solver
98    # undef SEAICE_GLOBAL_3DIAG_SOLVER
99  C     enable EVP code by defining the following flag  C     enable EVP code by defining the following flag
100  # define SEAICE_ALLOW_EVP  # undef SEAICE_ALLOW_EVP
101  # ifdef SEAICE_ALLOW_EVP  # ifdef SEAICE_ALLOW_EVP
102  C--   When set use SEAICE_zetaMin and SEAICE_evpDampC to limit  C--   When set use SEAICE_zetaMin and SEAICE_evpDampC to limit viscosities
103  C--   viscosities from below and above in seaice_evp  C     from below and above in seaice_evp: not necessary, and not recommended
 C--   not necessary, and not recommended  
104  #  undef SEAICE_ALLOW_CLIPZETA  #  undef SEAICE_ALLOW_CLIPZETA
105  # endif /* SEAICE_ALLOW_EVP */  # endif /* SEAICE_ALLOW_EVP */
106    C     regularize zeta to zmax with a smooth tanh-function instead
107    C     of a min(zeta,zmax). This improves convergence of iterative
108    C     solvers (Lemieux and Tremblay 2009, JGR). No effect on EVP
109    # undef SEAICE_ZETA_SMOOTHREG
110  C     allow the truncated ellipse rheology (runtime flag SEAICEuseTEM)  C     allow the truncated ellipse rheology (runtime flag SEAICEuseTEM)
111  # undef SEAICE_ALLOW_TEM  # undef SEAICE_ALLOW_TEM
112    C     Use LSR vector code; not useful on non-vector machines, because it
113    C     slows down convergence considerably, but the extra iterations are
114    C     more than made up by the much faster code on vector machines. For
115    C     the only regularly test vector machine these flags a specified
116    C     in the build options file SUPER-UX_SX-8_sxf90_awi, so that we comment
117    C     them out here.
118    C# define SEAICE_VECTORIZE_LSR
119    C# ifdef SEAICE_VECTORIZE_LSR
120    C     Use modified LSR vector code that splits vector loop into two with
121    C     step size 2. This modification improves the convergence of the vector
122    C     code dramatically, so that is may actually be useful in general, but
123    C     that needs to be tested.
124    C#  define SEAICE_VECTORIZE_LSR_ZEBRA
125    C# endif
126  #else /* not SEAICE_CGRID, but old B-grid */  #else /* not SEAICE_CGRID, but old B-grid */
127  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
128  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.
# Line 97  C--   By default for B-grid dynamics sol Line 133  C--   By default for B-grid dynamics sol
133  C     indirectly via geostrophic velocities. Define following CPP  C     indirectly via geostrophic velocities. Define following CPP
134  C     in order to use ETAN instead.  C     in order to use ETAN instead.
135  # define EXPLICIT_SSH_SLOPE  # define EXPLICIT_SSH_SLOPE
136  C--   Defining this flag turns on a FV-discretization of the B-grid LSOR  C--   Defining this flag turns on FV-discretization of the B-grid LSOR solver.
137  C     solver. It is smoother and includes all metric terms, similar to the  C     It is smoother and includes all metric terms, similar to C-grid solvers.
138  C     C-grid solver. It is here for completeness, but its usefulness is  C     It is here for completeness, but its usefulness is unclear.
 C     unclear.  
139  # undef SEAICE_LSRBNEW  # undef SEAICE_LSRBNEW
140  #endif /* SEAICE_CGRID */  #endif /* SEAICE_CGRID */
141    
 C--   When set use MAX_HEFF to cap sea ice thickness in seaice_growth  
 C     currently only relevant for SEAICE_GROWTH_LEGACY  
 #undef SEAICE_CAP_HEFF  
142  C--   When set limit the Ice-Loading to mass of 1/5 of Surface ocean grid-box  C--   When set limit the Ice-Loading to mass of 1/5 of Surface ocean grid-box
143  #undef SEAICE_CAP_ICELOAD  #undef SEAICE_CAP_ICELOAD
144  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,
145  C--   not recommended  C     not recommended
146  #undef SEAICE_ALLOW_CLIPVELS  #undef SEAICE_ALLOW_CLIPVELS
147  C--   When set cap the sublimation latent heat flux in solve4temp  C--   When set cap the sublimation latent heat flux in solve4temp according
148  C     according to the available amount of ice+snow. Otherwise this  C     to the available amount of ice+snow. Otherwise this term is treated
149  C     term is treated like all of the others -- residuals heat and  C     like all of the others -- residuals heat and fw stocks are passed to
150  C     fw stocks are passed to the ocean at the end of seaice_growth  C     the ocean at the end of seaice_growth in a conservative manner.
151  C     in a conservative manner. SEAICE_CAP_SUBLIM is not needed  C     SEAICE_CAP_SUBLIM is not needed as of now, but kept just in case.
 C     as of now, but kept just in case.  
152  #undef SEAICE_CAP_SUBLIM  #undef SEAICE_CAP_SUBLIM
153    
154  C--   enable free drift code  C--   Enable free drift code
155  #undef SEAICE_ALLOW_FREEDRIFT  #undef SEAICE_ALLOW_FREEDRIFT
156    
157    C--   pkg/seaice cost functions compile flags
158    c       >>> Sea-ice volume (requires pkg/cost)
159    #undef ALLOW_COST_ICE
160    c       >>> Sea-ice misfit to obs (requires pkg/cost and ecco)
161    #undef ALLOW_SEAICE_COST_SMR_AREA
162    
163  #endif /* ALLOW_SEAICE */  #endif /* ALLOW_SEAICE */
164  #endif /* SEAICE_OPTIONS_H */  #endif /* SEAICE_OPTIONS_H */
165    

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

  ViewVC Help
Powered by ViewVC 1.1.22