1 |
C $Header: /u/gcmpack/MITgcm/verification/advect_cs/code/GAD_OPTIONS.h,v 1.2 2008/05/09 21:46:25 jmc Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
CBOP |
5 |
C !ROUTINE: GAD_OPTIONS.h |
6 |
|
7 |
C !INTERFACE: |
8 |
C #include "GAD_OPTIONS.h" |
9 |
|
10 |
C !DESCRIPTION: |
11 |
C Contains CPP macros/flags for controlling optional features of package. |
12 |
CEOP |
13 |
|
14 |
C CPP options file for GAD (Generic Advection Diffusion) package |
15 |
C |
16 |
C Use this file for selecting options within the GAD package |
17 |
|
18 |
#ifndef GAD_OPTIONS_H |
19 |
#define GAD_OPTIONS_H |
20 |
#include "PACKAGES_CONFIG.h" |
21 |
#include "CPP_OPTIONS.h" |
22 |
|
23 |
#ifdef ALLOW_GENERIC_ADVDIFF |
24 |
C Package-specific Options & Macros go here |
25 |
|
26 |
C This flag selects the form of COSINE(lat) scaling of bi-harmonic term. |
27 |
C *only for use on a lat-lon grid* |
28 |
C Setting this flag here only affects the bi-harmonic tracer terms; to |
29 |
C use COSINEMETH_III in the momentum equations set it CPP_OPTIONS.h |
30 |
#undef COSINEMETH_III |
31 |
|
32 |
C This selects isotropic scaling of harmonic and bi-harmonic term when |
33 |
C using the COSINE(lat) scaling. |
34 |
C Setting this flag here only affects the tracer diffusion terms; to |
35 |
C use ISOTROPIC_COS_SCALING of the horizontal viscosity terms in the |
36 |
C momentum equations set it CPP_OPTIONS.h; the following line |
37 |
C even overrides setting the flag in CPP_OPTIONS.h |
38 |
#undef ISOTROPIC_COS_SCALING |
39 |
|
40 |
C As of checkpoint41, the inclusion of multi-dimensional advection |
41 |
C introduces excessive recomputation/storage for the adjoint. |
42 |
C We can disable it here using CPP because run-time flags are insufficient. |
43 |
#define DISABLE_MULTIDIM_ADVECTION |
44 |
|
45 |
C This enable the use of 2nd-Order Moment advection scheme (Prather, 1986) for |
46 |
C Temperature and Salinity ; due to large memory space (10 times more / tracer) |
47 |
C requirement, by default, this part of the code is not compiled. |
48 |
#undef GAD_ALLOW_TS_SOM_ADV |
49 |
|
50 |
#else |
51 |
|
52 |
C If GAD is disabled then so is multi-dimensional advection |
53 |
#define DISABLE_MULTIDIM_ADVECTION |
54 |
|
55 |
#endif /* ALLOW_GENERIC_ADVDIFF */ |
56 |
#endif /* GAD_OPTIONS_H */ |