| 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_BULK_FORCE | 
| 34 |  | #ifdef ALLOW_BULK_FORCE | 
| 35 |  | cswdice -- add --- | 
| 36 |  | C o allow seaice | 
| 37 |  | #define ALLOW_THERM_SEAICE | 
| 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 |