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	ce107	1.1	C Parameters used with MPI.
2
3			#ifdef ALLOW_MPI
4			COMMON /MPI_INFO/
5			& mpi_pid, mpi_np,
6	ce107	1.2	#ifdef DECOMP2D
7			& ewslice, nsslice,
8			& mpi_eastId, mpi_westId,
9			#endif
10			& mpi_northId, mpi_southId,
11			& comm_use
12
13	ce107	1.1	INTEGER mpi_pid
14			INTEGER mpi_np
15			INTEGER mpi_northId
16			INTEGER mpi_southId
17	ce107	1.2	#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	ce107	1.1	#endif