13 |
|
|
14 |
#ifdef ALLOW_SEAICE |
#ifdef ALLOW_SEAICE |
15 |
|
|
16 |
C-- Write "text-plots" of certain fields in STDOUT for debugging. |
C-- Write "text-plots" of certain fields in STDOUT for debugging. |
17 |
#undef SEAICE_DEBUG |
#undef SEAICE_DEBUG |
18 |
|
|
19 |
C-- Allow sea-ice dynamic code. |
C-- Allow sea-ice dynamic code. |
20 |
C This option is provided to allow us to use the TAMC |
C This option is provided to allow use of TAMC |
21 |
C on the thermodynamics component of the code only. |
C on the thermodynamics component of the code only. |
22 |
C Sea-ice dynamics can also be turned off at runtime |
C Sea-ice dynamics can also be turned off at runtime |
23 |
C using variable SEAICEuseDYNAMICS. |
C using variable SEAICEuseDYNAMICS. |
24 |
#define SEAICE_ALLOW_DYNAMICS |
#define SEAICE_ALLOW_DYNAMICS |
25 |
|
|
26 |
|
C-- By default, pkg/seaice defines forcing variable internally, in |
27 |
|
C SEAICE_FFIELDS.h, and reads them in from files. When CPP option |
28 |
|
C SEAICE_EXTERNAL_FORCING is defined, the above forcing variables |
29 |
|
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 |
31 |
|
C include file exf_fields.h. |
32 |
|
#undef SEAICE_EXTERNAL_FORCING |
33 |
|
|
34 |
|
C-- By default, the sea-ice package uses its own integrated bulk |
35 |
|
C formulae to compute fluxes (fu, fv, EmPmR, Qnet, and Qsw) over |
36 |
|
C open-ocean. When this flag is set, these variables are computed |
37 |
|
C in a separate external package, for example, pkg/exf, and then |
38 |
|
C modified for sea-ice effects by pkg/seaice. |
39 |
|
#undef SEAICE_EXTERNAL_FLUXES |
40 |
|
|
41 |
#endif ALLOW_SEAICE |
#endif ALLOW_SEAICE |