1 |
cnh |
1.2 |
C $Header: $ |
2 |
|
|
C $Name: $ |
3 |
heimbach |
1.1 |
C /==========================================================\ |
4 |
|
|
C | KPP_OPTIONS.h | |
5 |
|
|
C | o CPP options file for KPP package. | |
6 |
|
|
C |==========================================================| |
7 |
|
|
C | Use this file for selecting options within the KPP | |
8 |
|
|
C | package. KPP is enabled with ALLOW_KPP in CPP_OPTIONS.h | |
9 |
|
|
C \==========================================================/ |
10 |
|
|
|
11 |
|
|
#include "CPP_OPTIONS.h" |
12 |
|
|
|
13 |
|
|
#define _KPP_RL Real*8 |
14 |
|
|
|
15 |
|
|
#ifdef ALLOW_KPP |
16 |
|
|
|
17 |
|
|
C o When set, use exchange calls rather than recomputation |
18 |
|
|
C to obtain KPP parameters in overlap region. This option |
19 |
|
|
C was added to reduce stack size requirements on the |
20 |
|
|
C Origin 2000. It decreases memory and computation |
21 |
|
|
C requirements at the expense of increased communications. |
22 |
|
|
C For a 64-processor 360x224x46 MPI configuration on the |
23 |
|
|
C Exemplar or Origin 2000, wall clock time is about the |
24 |
|
|
C same whether FRUGAL_KPP is turned on or off. |
25 |
|
|
#undef FRUGAL_KPP |
26 |
|
|
|
27 |
|
|
C o When set, smooth zonal shear meridionally and |
28 |
|
|
C meridional shear zonally with 121 filters |
29 |
|
|
#define KPP_SMOOTH_SHSQ |
30 |
|
|
#undef KPP_SMOOTH_DVSQ |
31 |
|
|
|
32 |
|
|
C o When set, smooth dbloc KPP variable horizontally |
33 |
|
|
#define KPP_SMOOTH_DBLOC |
34 |
|
|
|
35 |
|
|
C o When set, smooth all KPP density variables horizontally |
36 |
|
|
#undef KPP_SMOOTH_DENS |
37 |
|
|
#ifdef KPP_SMOOTH_DENS |
38 |
|
|
# define KPP_SMOOTH_DBLOC |
39 |
|
|
#endif |
40 |
|
|
|
41 |
|
|
C o When set, smooth vertical viscosity horizontally |
42 |
|
|
#undef KPP_SMOOTH_VISC |
43 |
|
|
|
44 |
|
|
C o When set, smooth vertical diffusivity horizontally |
45 |
|
|
#undef KPP_SMOOTH_DIFF |
46 |
|
|
|
47 |
|
|
C o Get rid of vertical resolution dependence of dVsq term by |
48 |
|
|
C estimating a surface velocity that is independent of first |
49 |
|
|
C level thickness in the model. |
50 |
|
|
#undef KPP_ESTIMATE_UREF |
51 |
|
|
|
52 |
|
|
C o Include/exclude various time-averaged diagnostic output |
53 |
|
|
C for saving storage space |
54 |
|
|
#ifdef INCLUDE_DIAGNOSTICS_INTERFACE_CODE |
55 |
|
|
#define INCLUDE_DIAGNOSTICS_KPP |
56 |
|
|
#undef INCLUDE_DIAGNOSTICS_KPPDIFFKZSTAVE |
57 |
|
|
#endif |
58 |
|
|
|
59 |
|
|
C o Include/exclude KPP non/local transport terms |
60 |
|
|
#define KPP_GHAT |
61 |
|
|
|
62 |
|
|
C o Set precision for KPP variables (Real*4 or Real*8) |
63 |
|
|
|
64 |
|
|
#endif /* ALLOW_KPP */ |