MITgcm_contrib/cg2d_bench/MPI_INFO.h

C      Parameters used with MPI.

#ifdef ALLOW_MPI
       COMMON /MPI_INFO/
     &  mpi_pid,     mpi_np,
#ifdef DECOMP2D
     &  ewslice, nsslice,
     &  mpi_eastId, mpi_westId,
#endif
     &  mpi_northId, mpi_southId,
     &  comm_use

       INTEGER mpi_pid
       INTEGER mpi_np
       INTEGER mpi_northId
       INTEGER mpi_southId
#ifdef DECOMP2D
       INTEGER mpi_eastId
       INTEGER mpi_westId
       INTEGER ewslice
       INTEGER nsslice
#endif
       INTEGER comm_use

#ifndef USE_SINGLE_PRECISION
#define _MPI_TYPE_REAL MPI_REAL8
#else
#define _MPI_TYPE_REAL MPI_REAL
#endif
#endif
1	C Parameters used with MPI.
2
3	#ifdef ALLOW_MPI
4	COMMON /MPI_INFO/
5	& mpi_pid, mpi_np,
6	#ifdef DECOMP2D
7	& ewslice, nsslice,
8	& mpi_eastId, mpi_westId,
9	#endif
10	& mpi_northId, mpi_southId,
11	& comm_use
12
13	INTEGER mpi_pid
14	INTEGER mpi_np
15	INTEGER mpi_northId
16	INTEGER mpi_southId
17	#ifdef DECOMP2D
18	INTEGER mpi_eastId
19	INTEGER mpi_westId
20	INTEGER ewslice
21	INTEGER nsslice
22	#endif
23	INTEGER comm_use
24
25	#ifndef USE_SINGLE_PRECISION
26	#define _MPI_TYPE_REAL MPI_REAL8
27	#else
28	#define _MPI_TYPE_REAL MPI_REAL
29	#endif
30	#endif