global_ocean.90x40x15/code_ad/GMREDI_OPTIONS.h

816b5c73de Patr*0001 C CPP options file for GM/Redi package
                0002 C Use this file for selecting options within the GM/Redi package
87049f71ad Jean*0003
577a31280a Ed H*0004 #ifndef GMREDI_OPTIONS_H
                0005 #define GMREDI_OPTIONS_H
                0006 #include "PACKAGES_CONFIG.h"
                0007 #include "CPP_OPTIONS.h"
                0008
a589927d63 Jean*0009 #ifdef ALLOW_GMREDI
                0010 C     Package-specific Options & Macros go here
                0011
7d6bf8d1e2 Jean*0012 C Designed to simplify the Ajoint code:
a589927d63 Jean*0013 C #define GMREDI_WITH_STABLE_ADJOINT
                0014 C -- exclude the clipping/tapering part of the code that is not used
7d6bf8d1e2 Jean*0015 #define GM_EXCLUDE_CLIPPING
dffc9eb098 Patr*0016 #define GM_EXCLUDE_FM07_TAP
a589927d63 Jean*0017 #define GM_EXCLUDE_AC02_TAP
87049f71ad Jean*0018 #undef GM_EXCLUDE_TAPERING
                0019 #define GM_EXCLUDE_SUBMESO
                0020
94a8024bbe Jean*0021 C Allows to read-in background 3-D Redi and GM diffusivity coefficients
                0022 C Note: need these to be defined for use as control (pkg/ctrl) parameters
                0023 #define GM_READ_K3D_REDI
                0024 #define GM_READ_K3D_GM
                0025
2169e038f7 Patr*0026 C This allows to use Visbeck et al formulation to compute K_GM+Redi
4eab341f61 Patr*0027 #undef GM_VISBECK_VARIABLE_K
a589927d63 Jean*0028 C Use old calculation (before 2007/05/24) of Visbeck etal K_GM+Redi
                0029 C (which depends on tapering scheme)
                0030 #undef OLD_VISBECK_CALC
816b5c73de Patr*0031
94a8024bbe Jean*0032 C This allows the Bates et al formulation to calculate the
                0033 C bolus transport and K for Redi
                0034 #undef GM_BATES_K3D
                0035 #undef GM_BATES_PASSIVE
                0036
816b5c73de Patr*0037 C This allows the leading diagonal (top two rows) to be non-unity
                0038 C (a feature required when tapering adiabatically).
a589927d63 Jean*0039 #define GM_NON_UNITY_DIAGONAL
816b5c73de Patr*0040
                0041 C Allows to use different values of K_GM and K_Redi ; also to
                0042 C be used with the advective form (Bolus velocity) of GM
a589927d63 Jean*0043 #define GM_EXTRA_DIAGONAL
816b5c73de Patr*0044
                0045 C Allows to use the advective form (Bolus velocity) of GM
                0046 C  instead of the Skew-Flux form (=default)
a589927d63 Jean*0047 #define GM_BOLUS_ADVEC
816b5c73de Patr*0048
87049f71ad Jean*0049 C Allows to use the Boundary-Value-Problem method to evaluate GM Bolus transport
                0050 #undef GM_BOLUS_BVP
816b5c73de Patr*0051
94a8024bbe Jean*0052 C Allow QG Leith variable viscosity to be added to GMRedi coefficient
                0053 #undef ALLOW_GM_LEITH_QG
                0054
816b5c73de Patr*0055 #endif /* ALLOW_GMREDI */
577a31280a Ed H*0056 #endif /* GMREDI_OPTIONS_H */
                0057
a589927d63 Jean*0058 CEH3 ;;; Local Variables: ***
                0059 CEH3 ;;; mode:fortran ***
                0060 CEH3 ;;; End: ***