/[MITgcm]/MITgcm_contrib/high_res_cube/code-mods/SEAICE_OPTIONS.h
ViewVC logotype

Diff of /MITgcm_contrib/high_res_cube/code-mods/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 Dec 22 17:32:21 2004 UTC revision 1.11 by dimitri, Fri Jun 22 20:16:51 2007 UTC
# Line 11  C     \================================= Line 11  C     \=================================
11  #ifndef SEAICE_OPTIONS_H  #ifndef SEAICE_OPTIONS_H
12  #define SEAICE_OPTIONS_H  #define SEAICE_OPTIONS_H
13  #include "PACKAGES_CONFIG.h"  #include "PACKAGES_CONFIG.h"
 #ifdef ALLOW_SEAICE  
   
14  #include "CPP_OPTIONS.h"  #include "CPP_OPTIONS.h"
15    
16  C--   Write "text-plots" of certain fields in STDOUT for debugging.  C--   Write "text-plots" of certain fields in STDOUT for debugging.
# Line 30  C     SEAICE_FFIELDS.h, and reads them i Line 28  C     SEAICE_FFIELDS.h, and reads them i
28  C     SEAICE_EXTERNAL_FORCING is defined, the above forcing variables  C     SEAICE_EXTERNAL_FORCING is defined, the above forcing variables
29  C     are defined and provided by an external package.  At present this  C     are defined and provided by an external package.  At present this
30  C     option is hardwired for pkg/exf and the variables are passed using  C     option is hardwired for pkg/exf and the variables are passed using
31  C     include file exf_fields.h.  C     include file EXF_FIELDS.h (=> cannot be defined without pkg/EXF )
32  #define SEAICE_EXTERNAL_FORCING  #define SEAICE_EXTERNAL_FORCING
33  #ifdef SEAICE_EXTERNAL_FORCING  #ifndef ALLOW_EXF
34  #include "EXF_OPTIONS.h"  # undef SEAICE_EXTERNAL_FORCING
35  #endif /* SEAICE_EXTERNAL_FORCING */  #endif
36    
37    #ifdef  SEAICE_EXTERNAL_FORCING
38    #  include "EXF_OPTIONS.h"
39  C--   By default, the sea-ice package uses its own integrated bulk  C--   By default, the sea-ice package uses its own integrated bulk
40  C     formulae to compute fluxes (fu, fv, EmPmR, Qnet, and Qsw) over  C     formulae to compute fluxes (fu, fv, EmPmR, Qnet, and Qsw) over
41  C     open-ocean.  When this flag is set, these variables are computed  C     open-ocean.  When this flag is set, these variables are computed
42  C     in a separate external package, for example, pkg/exf, and then  C     in a separate external package, for example, pkg/exf, and then
43  C     modified for sea-ice effects by pkg/seaice.  C     modified for sea-ice effects by pkg/seaice.
44  #define SEAICE_EXTERNAL_FLUXES  # define SEAICE_EXTERNAL_FLUXES
45    
46    #else  /* SEAICE_EXTERNAL_FORCING */
47    C-    current implementation requires those options to be set:
48    # undef  SEAICE_EXTERNAL_FLUXES
49    # define ALLOW_ATM_TEMP
50    # define ALLOW_DOWNWARD_RADIATION
51    # define ALLOW_RUNOFF
52    
53    #endif /* SEAICE_EXTERNAL_FORCING */
54    
55    
56  C--   By default, the sea-ice package uses 2-category thermodynamics.  C--   By default, the sea-ice package uses 2-category thermodynamics.
57  C     When this flag is set, an 8-category calculation of ice  C     When this flag is set, an 8-category calculation of ice
# Line 50  C     Note the pickup_seaice.* generated Line 60  C     Note the pickup_seaice.* generated
60  C     from those generated with the default 2-category model.  C     from those generated with the default 2-category model.
61  C     Therefore it is not possible to switch between the two  C     Therefore it is not possible to switch between the two
62  C     in the middle of an integration.  C     in the middle of an integration.
63  #undef SEAICE_MULTILEVEL  #define SEAICE_MULTICATEGORY
64    
65  C--   By default cdm wind stress under sea-ice is set to the  C--   By default cdm wind stress under sea-ice is set to the
66  C     same value as it would be if there was no sea-ice.  C     same value as it would be if there was no sea-ice.
# Line 62  C     also corresponds to that adopted b Line 72  C     also corresponds to that adopted b
72  C     adventurous user who requires ice-modified stress,  C     adventurous user who requires ice-modified stress,
73  C     following options are available.  C     following options are available.
74  #undef SEAICE_ORIGINAL_BAD_ICE_STRESS  #undef SEAICE_ORIGINAL_BAD_ICE_STRESS
75  #define SEAICE_TEST_ICE_STRESS_1  #undef SEAICE_TEST_ICE_STRESS_1
76    
77    C--   By default the freezing point of water is set to the value of
78    C     the parameter SEAICE_freeze (=-1.96 by default). To use a
79    C     simple linear dependence of the freezing point on salinity,
80    C     set the following flag (pressure is assumed to have no effect,
81    C     which is a good assumption for the top 20 meters). With this
82    C     option defined the parameter SEAICE_freeze has no effect.
83    #define SEAICE_VARIABLE_FREEZING_POINT
84    
85    C--   Allow SEAICEuseFlooding, which converts snow to ice if submerged.
86    #define ALLOW_SEAICE_FLOODING
87    
88    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
90    C     (not thoroughly) test version on a C-grid
91    #define SEAICE_CGRID
92    
93    C--   Only for the C-grid version it is possible to enable EVP code by
94    C     defining the following flag
95    #ifdef SEAICE_CGRID
96    #undef SEAICE_ALLOW_EVP
97    #endif /* SEAICE_CGRID */
98    
 #endif /* ALLOW_SEAICE */  
99  #endif /* SEAICE_OPTIONS_H */  #endif /* SEAICE_OPTIONS_H */
100    
101    CEH3 ;;; Local Variables: ***
102    CEH3 ;;; mode:fortran ***
103    CEH3 ;;; End: ***
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.11
  ViewVC Help
Powered by ViewVC 1.1.22