| 1 | 
heimbach | 
1.1 | 
C $Header: /u/gcmpack/MITgcm_contrib/arctic40km/code/SEAICE_OPTIONS.h,v 1.1 2005/09/01 14:16:40 dimitri Exp $ | 
| 2 | 
  | 
  | 
 | 
| 3 | 
  | 
  | 
C     /==========================================================\ | 
| 4 | 
  | 
  | 
C     | SEAICE_OPTIONS.h                                         | | 
| 5 | 
  | 
  | 
C     | o CPP options file for sea ice package.                  | | 
| 6 | 
  | 
  | 
C     |==========================================================| | 
| 7 | 
  | 
  | 
C     | Use this file for selecting options within the sea ice   | | 
| 8 | 
  | 
  | 
C     | package.                                                 | | 
| 9 | 
  | 
  | 
C     \==========================================================/ | 
| 10 | 
  | 
  | 
 | 
| 11 | 
  | 
  | 
#ifndef SEAICE_OPTIONS_H | 
| 12 | 
  | 
  | 
#define SEAICE_OPTIONS_H | 
| 13 | 
  | 
  | 
#include "PACKAGES_CONFIG.h" | 
| 14 | 
  | 
  | 
#ifdef ALLOW_SEAICE | 
| 15 | 
  | 
  | 
 | 
| 16 | 
  | 
  | 
#include "CPP_OPTIONS.h" | 
| 17 | 
  | 
  | 
 | 
| 18 | 
  | 
  | 
C--   Write "text-plots" of certain fields in STDOUT for debugging. | 
| 19 | 
  | 
  | 
#undef SEAICE_DEBUG | 
| 20 | 
  | 
  | 
 | 
| 21 | 
  | 
  | 
C--   Allow sea-ice dynamic code. | 
| 22 | 
  | 
  | 
C     This option is provided to allow use of TAMC | 
| 23 | 
  | 
  | 
C     on the thermodynamics component of the code only. | 
| 24 | 
  | 
  | 
C     Sea-ice dynamics can also be turned off at runtime | 
| 25 | 
  | 
  | 
C     using variable SEAICEuseDYNAMICS. | 
| 26 | 
  | 
  | 
#define SEAICE_ALLOW_DYNAMICS | 
| 27 | 
  | 
  | 
 | 
| 28 | 
  | 
  | 
C--   By default, pkg/seaice defines forcing variable internally, in | 
| 29 | 
  | 
  | 
C     SEAICE_FFIELDS.h, and reads them in from files.  When CPP option | 
| 30 | 
  | 
  | 
C     SEAICE_EXTERNAL_FORCING is defined, the above forcing variables | 
| 31 | 
  | 
  | 
C     are defined and provided by an external package.  At present this | 
| 32 | 
  | 
  | 
C     option is hardwired for pkg/exf and the variables are passed using | 
| 33 | 
  | 
  | 
C     include file exf_fields.h. | 
| 34 | 
  | 
  | 
#define SEAICE_EXTERNAL_FORCING | 
| 35 | 
  | 
  | 
#ifdef SEAICE_EXTERNAL_FORCING | 
| 36 | 
  | 
  | 
#include "EXF_OPTIONS.h" | 
| 37 | 
  | 
  | 
#endif /* SEAICE_EXTERNAL_FORCING */ | 
| 38 | 
  | 
  | 
 | 
| 39 | 
  | 
  | 
C--   By default, the sea-ice package uses its own integrated bulk | 
| 40 | 
  | 
  | 
C     formulae to compute fluxes (fu, fv, EmPmR, Qnet, and Qsw) over | 
| 41 | 
  | 
  | 
C     open-ocean.  When this flag is set, these variables are computed | 
| 42 | 
  | 
  | 
C     in a separate external package, for example, pkg/exf, and then | 
| 43 | 
  | 
  | 
C     modified for sea-ice effects by pkg/seaice. | 
| 44 | 
  | 
  | 
#define SEAICE_EXTERNAL_FLUXES | 
| 45 | 
  | 
  | 
 | 
| 46 | 
  | 
  | 
C--   By default, the sea-ice package uses 2-category thermodynamics. | 
| 47 | 
  | 
  | 
C     When this flag is set, an 8-category calculation of ice | 
| 48 | 
  | 
  | 
C     thermodynamics is carried out in groatb.F | 
| 49 | 
  | 
  | 
C     !!! Note the pickup_seaice.* generated by this option differ !!! | 
| 50 | 
  | 
  | 
C     !!! from those generated with the default 2-category model.  !!! | 
| 51 | 
  | 
  | 
C     !!! Therefore it is not possible to switch between the two   !!! | 
| 52 | 
  | 
  | 
C     !!! in the middle of an integration.                         !!! | 
| 53 | 
  | 
  | 
#undef SEAICE_MULTILEVEL | 
| 54 | 
  | 
  | 
 | 
| 55 | 
  | 
  | 
#endif /* ALLOW_SEAICE */ | 
| 56 | 
  | 
  | 
#endif /* SEAICE_OPTIONS_H */ |