global_ocean.cs32x15/code_ad/GMREDI_OPTIONS.h

550ebeedfe 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
550ebeedfe Patr*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
550ebeedfe Patr*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
550ebeedfe Patr*0015 #define GM_EXCLUDE_CLIPPING
                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
550ebeedfe Patr*0021 C This allows to use Visbeck et al formulation to compute K_GM+Redi
                0022 #undef GM_VISBECK_VARIABLE_K
a589927d63 Jean*0023 C Use old calculation (before 2007/05/24) of Visbeck etal K_GM+Redi
                0024 C (which depends on tapering scheme)
                0025 #undef OLD_VISBECK_CALC
550ebeedfe Patr*0026
                0027 C This allows the leading diagonal (top two rows) to be non-unity
                0028 C (a feature required when tapering adiabatically).
a589927d63 Jean*0029 #define GM_NON_UNITY_DIAGONAL
550ebeedfe Patr*0030
                0031 C Allows to use different values of K_GM and K_Redi ; also to
                0032 C be used with the advective form (Bolus velocity) of GM
a589927d63 Jean*0033 #define GM_EXTRA_DIAGONAL
550ebeedfe Patr*0034
                0035 C Allows to use the advective form (Bolus velocity) of GM
                0036 C  instead of the Skew-Flux form (=default)
a589927d63 Jean*0037 #define GM_BOLUS_ADVEC
550ebeedfe Patr*0038
87049f71ad Jean*0039 C Allows to use the Boundary-Value-Problem method to evaluate GM Bolus transport
                0040 #undef GM_BOLUS_BVP
550ebeedfe Patr*0041
                0042 #endif /* ALLOW_GMREDI */
                0043 #endif /* GMREDI_OPTIONS_H */
                0044
a589927d63 Jean*0045 CEH3 ;;; Local Variables: ***
                0046 CEH3 ;;; mode:fortran ***
                0047 CEH3 ;;; End: ***