1 |
C $Header: /u/gcmpack/MITgcm/verification/natl_box_adjoint/code/Attic/GAD_OPTIONS.h,v 1.1.2.1 2002/02/05 20:34:35 heimbach 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 |
#ifndef DISABLE_GENERIC_ADVDIFF |
22 |
|
23 |
#include "CPP_OPTIONS.h" |
24 |
|
25 |
C The selects the form of COSINE(lat) scaling of bi-harmonic term. |
26 |
C *only for use on a lat-lon grid* |
27 |
#define COSINEMETH_III |
28 |
|
29 |
C The selects isotropic scaling of bi-harmonic term when |
30 |
C using the COSINE(lat) scaling. |
31 |
#undef ISOTROPIC_COS_SCALING |
32 |
|
33 |
C As of checkpoint41, the inclusion of multi-dimensional advection |
34 |
C introduces excessive recomputation/storage for the adjoint. |
35 |
C We can disable it here using CPP because run-time flags are insufficient. |
36 |
#define DISABLE_MULTIDIM_ADVECTION |
37 |
|
38 |
#else |
39 |
|
40 |
C If GAD is disabled then so is multi-dimensional advection |
41 |
#define DISABLE_MULTIDIM_ADVECTION |
42 |
|
43 |
#endif /* DISABLE_GENERIC_ADVDIFF */ |
44 |
#endif /* GAD_OPTIONS_H */ |