1 |
C $Header$ |
C $Header$ |
2 |
|
C $Name$ |
3 |
|
CBOP |
4 |
|
C !ROUTINE: EESUPPORT.h |
5 |
|
C !INTERFACE: |
6 |
|
C include "EESUPPORT.h" |
7 |
C |
C |
8 |
C /==========================================================\ |
C !DESCRIPTION: |
9 |
|
C *==========================================================* |
10 |
C | EESUPPORT.h | |
C | EESUPPORT.h | |
11 |
C |==========================================================| |
C *==========================================================* |
12 |
C | Support data structures for the MITgcm UV "execution | |
C | Support data structures for the MITgcm UV "execution | |
13 |
C | environment" code. This data should be private to the | |
C | environment" code. This data should be private to the | |
14 |
C | execution environment routines. Data which needs to be | |
C | execution environment routines. Data which needs to be | |
15 |
C | accessed directly by the numerical model goes in | |
C | accessed directly by a numerical model goes in | |
16 |
C | EEPARAMS.h. | |
C | EEPARAMS.h. | |
17 |
C \==========================================================/ |
C *==========================================================* |
18 |
|
CEOP |
19 |
|
|
20 |
C ERROR_HEADER - String which prefixes error messages |
C ERROR_HEADER - String which prefixes error messages |
21 |
CHARACTER*(*) ERROR_HEADER |
CHARACTER*(*) ERROR_HEADER |
284 |
INTEGER mpiTagE |
INTEGER mpiTagE |
285 |
INTEGER mpiTagN |
INTEGER mpiTagN |
286 |
INTEGER mpiTagS |
INTEGER mpiTagS |
|
#endif /* ALLOW_USE_MPI */ |
|
287 |
|
|
288 |
|
C MPI communicator describing this model realization |
289 |
|
COMMON /MPI_COMMS/ |
290 |
|
& MPI_COMM_MODEL |
291 |
|
INTEGER MPI_COMM_MODEL |
292 |
|
#endif /* ALLOW_USE_MPI */ |