| 1 | C $Header: /u/gcmpack/MITgcm_contrib/submesoscale/code/GMREDI_OPTIONS.h,v 1.2 2008/05/30 22:13:42 dimitri Exp $ | 
| 2 | C $Name:  $ | 
| 3 |  | 
| 4 | C CPP options file for GM/Redi package | 
| 5 | C | 
| 6 | C Use this file for selecting options within the GM/Redi package | 
| 7 |  | 
| 8 | #ifndef GMREDI_OPTIONS_H | 
| 9 | #define GMREDI_OPTIONS_H | 
| 10 | #include "PACKAGES_CONFIG.h" | 
| 11 | #ifdef ALLOW_GMREDI | 
| 12 |  | 
| 13 | #include "CPP_OPTIONS.h" | 
| 14 |  | 
| 15 | C Designed to simplify the Ajoint code: | 
| 16 | C #define GMREDI_WITH_STABLE_ADJOINT | 
| 17 | C -- exclude the clipping/tapering part of the code that is not used | 
| 18 | C #define GM_EXCLUDE_CLIPPING | 
| 19 | C #define GM_EXCLUDE_FM07_TAP | 
| 20 | C #define GM_EXCLUDE_AC02_TAP | 
| 21 | C #define GM_EXCLUDE_TAPERING | 
| 22 |  | 
| 23 | C This allows to use Visbeck et al formulation to compute K_GM+Redi | 
| 24 | #undef GM_VISBECK_VARIABLE_K | 
| 25 | C Use old calculation (before 2007/05/24) of Visbeck etal K_GM+Redi | 
| 26 | C (which depends on tapering scheme) | 
| 27 | #undef OLD_VISBECK_CALC | 
| 28 |  | 
| 29 | C This allows the leading diagonal (top two rows) to be non-unity | 
| 30 | C (a feature required when tapering adiabatically). | 
| 31 | #define GM_NON_UNITY_DIAGONAL | 
| 32 |  | 
| 33 | C Allows to use different values of K_GM and K_Redi ; also to | 
| 34 | C be used with the advective form (Bolus velocity) of GM | 
| 35 | #define GM_EXTRA_DIAGONAL | 
| 36 |  | 
| 37 | C Allows to use the advective form (Bolus velocity) of GM | 
| 38 | C  instead of the Skew-Flux form (=default) | 
| 39 | #define GM_BOLUS_ADVEC | 
| 40 |  | 
| 41 | C Allows the use of the Fox-Kemper et al. Submesoscale Eddy Parameterization | 
| 42 | C  (=default) | 
| 43 | #define GM_SUBMESO | 
| 44 | C This controls whether the Front width scales with ML def. radius or not. | 
| 45 | C Recommendation is yes. | 
| 46 | #define GM_SUBMESO_VARYLf | 
| 47 |  | 
| 48 |  | 
| 49 | #endif /* ALLOW_GMREDI */ | 
| 50 | #endif /* GMREDI_OPTIONS_H */ | 
| 51 |  | 
| 52 | CEH3 ;;; Local Variables: *** | 
| 53 | CEH3 ;;; mode:fortran *** | 
| 54 | CEH3 ;;; End: *** |