Parent Directory | Revision Log | Revision Graph
Added CVS Id tag
1 | C $Id$ |
2 | C Parameters used with MPI. |
3 | |
4 | #ifdef ALLOW_MPI |
5 | COMMON /MPI_INFO/ |
6 | & mpi_pid, mpi_np, |
7 | #ifdef DECOMP2D |
8 | & ewslice, nsslice, |
9 | & mpi_eastId, mpi_westId, |
10 | #endif |
11 | & mpi_northId, mpi_southId, |
12 | & comm_use |
13 | |
14 | INTEGER mpi_pid |
15 | INTEGER mpi_np |
16 | INTEGER mpi_northId |
17 | INTEGER mpi_southId |
18 | #ifdef DECOMP2D |
19 | INTEGER mpi_eastId |
20 | INTEGER mpi_westId |
21 | INTEGER ewslice |
22 | INTEGER nsslice |
23 | #endif |
24 | INTEGER comm_use |
25 | |
26 | #ifndef USE_SINGLE_PRECISION |
27 | #define _MPI_TYPE_REAL MPI_REAL8 |
28 | #else |
29 | #define _MPI_TYPE_REAL MPI_REAL |
30 | #endif |
31 | #endif |
ViewVC Help | |
Powered by ViewVC 1.1.22 |