2
0
Fork 0
mirror of https://github.com/MartinThoma/LaTeX-examples.git synced 2025-04-26 06:48:04 +02:00
LaTeX-examples/documents/Programmierparadigmen/scripts/mpi/mpi-gather-example.c
2014-04-01 18:39:01 +02:00

19 lines
No EOL
407 B
C

#include "mpi.h"
#define ROOT 0
int numprocs, myid, bufsize;
int *sendbuf, *recvbuf;
...
MPI_Comm_size(MPI_COMM_WORLD, &numprocs);
MPI_Comm_rank(MPI_COMM_WORLD, &myid);
...
... sendbuf allocieren, belegen ...
... bufsize belegen ...
if (myid==ROOT) {
...
recvbuf=malloc(bufsize*sizeof(int));
}
MPI_Gather(sendbuf, bufsize, MPI_INT, recvbuf, bufsize,
MPI_INT, ROOT, MPI_COMM_WORLD);
...