1 |
C $Header: /u/gcmpack/MITgcm/pkg/mdsio/MDSIO_OPTIONS.h,v 1.5 2004/04/07 00:22:03 dimitri Exp $ |
2 |
C $Name: $ |
3 |
|
4 |
#ifndef MDSIO_OPTIONS_H |
5 |
#define MDSIO_OPTIONS_H |
6 |
#include "PACKAGES_CONFIG.h" |
7 |
#ifdef ALLOW_MDSIO |
8 |
|
9 |
#include "CPP_OPTIONS.h" |
10 |
|
11 |
C Defining SAFE_IO stops the model from overwriting its own files |
12 |
#undef SAFE_IO |
13 |
|
14 |
#ifdef SAFE_IO |
15 |
#define _NEW_STATUS 'new' |
16 |
#else |
17 |
#define _NEW_STATUS 'unknown' |
18 |
#endif |
19 |
|
20 |
#ifdef ALLOW_AUTODIFF_TAMC |
21 |
#define ALLOW_BROKEN_MDSIO_GL |
22 |
#define _OLD_STATUS 'unknown' |
23 |
#else |
24 |
#undef ALLOW_BROKEN_MDSIO_GL |
25 |
#define _OLD_STATUS 'old' |
26 |
#endif |
27 |
|
28 |
C o By default pkg/mdsio assumes that missing tiles are |
29 |
C present in the input and in the output files. When |
30 |
C MISSING_TILE_IO is defined, the input and output |
31 |
C files do not include the missing tiles. Therefore |
32 |
C the 2-D dimension of input and output files is: |
33 |
C #if defined(ALLOW_EXCH2) && !defined(MISSING_TILE_IO) |
34 |
C x_size = exch2_domain_nxt * sNx = exch2_domain_nxt*exch2_tnx |
35 |
C y_size = exch2_domain_nyt * sNy = exch2_domain_nyt*exch2_tny |
36 |
C #else |
37 |
C x_size = Nx = sNx * nSx * nPx |
38 |
C y_size = Ny = sNy * nSy * nPy |
39 |
C #endif- |
40 |
C Notes: |
41 |
C 1) Pickup files are not compatible between the two formats. |
42 |
C 2) Defining MISSING_TILE_IO with no missing tiles is |
43 |
C equivalent to the old, tile-dependent I/O format. |
44 |
#undef MISSING_TILE_IO |
45 |
|
46 |
#endif /* ALLOW_MDSIO */ |
47 |
#endif /* MDSIO_OPTIONS_H */ |