| 1 |
C $Header$ |
C $Header$ |
| 2 |
C $Name$ |
C $Name$ |
| 3 |
|
|
| 4 |
|
These lines are here to deliberately cause a compile-time error. |
| 5 |
|
If you see these lines in your .F files or the compiler shows them |
| 6 |
|
as an error then it means you have not placed your configuration |
| 7 |
|
files in the appropriate place. |
| 8 |
|
You need to place you own copy of CPP_OPTIONS.h in the include |
| 9 |
|
path for the model. |
| 10 |
|
|
| 11 |
C |
C |
| 12 |
|
|
| 13 |
C |
CBOP |
| 14 |
|
C !ROUTINE: CPP_OPTIONS.h |
| 15 |
|
C !INTERFACE: |
| 16 |
|
C include "CPP_OPTIONS.h" |
| 17 |
|
C !DESCRIPTION: |
| 18 |
C CPP flags controlling which code in included in the files that |
C CPP flags controlling which code in included in the files that |
| 19 |
C will be compiled. |
C will be compiled. |
| 20 |
C |
CEOP |
| 21 |
|
|
| 22 |
C o Include/exclude code for AIM package |
C o Include/exclude code for AIM package |
| 23 |
#undef ALLOW_AIM |
#undef ALLOW_AIM |
| 28 |
C o Include/exclude code for KPP mixing scheme |
C o Include/exclude code for KPP mixing scheme |
| 29 |
#define ALLOW_KPP |
#define ALLOW_KPP |
| 30 |
|
|
| 31 |
|
cswdblk --- add --- |
| 32 |
|
C o Include/exclude code for bulk formula |
| 33 |
|
#define ALLOW_BULKFORMULA |
| 34 |
|
#ifdef ALLOW_BULKFORMULA |
| 35 |
|
cswdice -- add --- |
| 36 |
|
C o allow seaice |
| 37 |
|
#define ALLOW_TSEAICE |
| 38 |
|
cswdice -- end add --- |
| 39 |
|
|
| 40 |
|
C o try to conserve qnet and emp |
| 41 |
|
#define CONSERV_BULKF |
| 42 |
|
#endif |
| 43 |
|
cswdblk -- end add --- |
| 44 |
|
|
| 45 |
|
|
| 46 |
C o Shortwave heating as extra term in external_forcing.F |
C o Shortwave heating as extra term in external_forcing.F |
| 47 |
#ifdef ALLOW_KPP |
#ifdef ALLOW_KPP |
| 48 |
#define SHORTWAVE_HEATING |
#define SHORTWAVE_HEATING |
| 145 |
C instead of the "virtual salt flux" |
C instead of the "virtual salt flux" |
| 146 |
#undef USE_NATURAL_BCS |
#undef USE_NATURAL_BCS |
| 147 |
|
|
| 148 |
|
C o Use "Exact Convervation" of fluid in Free-Surface formulation |
| 149 |
|
C so that d/dt(eta) is exactly equal to - Div.Transport |
| 150 |
|
#undef EXACT_CONSERV |
| 151 |
|
|
| 152 |
|
C o Allow the use of Non-Linear Free-Surface formulation |
| 153 |
|
C this implies that surface thickness (hFactors) vary with time |
| 154 |
|
#undef NONLIN_FRSURF |
| 155 |
|
|
| 156 |
C o Use "OLD" UV discretisation near boundaries (*not* recommended) |
C o Use "OLD" UV discretisation near boundaries (*not* recommended) |
| 157 |
C Note - only works with #undef NO_SLIP_LATERAL in calc_mom_rhs.F |
C Note - only works with #undef NO_SLIP_LATERAL in calc_mom_rhs.F |
| 158 |
C because the old code did not have no-slip BCs |
C because the old code did not have no-slip BCs |