| 58 | #endif | #endif | 
| 59 |  |  | 
| 60 | C o Include/exclude biharmonic viscosity code | C o Include/exclude biharmonic viscosity code | 
| 61 | #undef   INCLUDE_BH_MOMENTUM_DIFFUSION_CODE | #define  INCLUDE_BH_MOMENTUM_DIFFUSION_CODE | 
| 62 | #ifdef   INCLUDE_BH_MOMENTUM_DIFFUSION_CODE | #ifdef   INCLUDE_BH_MOMENTUM_DIFFUSION_CODE | 
| 63 | #define  _BHM(a) a | #define  _BHM(a) a | 
| 64 | #endif | #endif | 
| 112 | C o Include/exclude call to S/R CALC_DIFFUSIVITY | C o Include/exclude call to S/R CALC_DIFFUSIVITY | 
| 113 | #define INCLUDE_CALC_DIFFUSIVITY_CALL | #define INCLUDE_CALC_DIFFUSIVITY_CALL | 
| 114 |  |  | 
| 115 |  | C o Use "OLD" UV discretisation near boundaries (*not* recommended) | 
| 116 |  | C   Note - only works with  #undef NO_SLIP_LATERAL  in calc_mom_rhs.F | 
| 117 |  | C          because the old code did not have no-slip BCs | 
| 118 |  | #undef  OLD_ADV_BCS | 
| 119 |  |  | 
| 120 |  | C o Use "OLD" UV geometry on sphere (definately *NOT* recommended) | 
| 121 |  | C   Note - only works with  #undef NO_SLIP_LATERAL  in calc_mom_rhs.F | 
| 122 |  | C          because the old code did not have no-slip BCs | 
| 123 |  | #undef  OLD_UV_GEOMETRY | 
| 124 |  |  | 
| 125 | C o Execution environment support options | C o Execution environment support options | 
| 126 | #include "CPP_EEOPTIONS.h" | #include "CPP_EEOPTIONS.h" |