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" |