mirror of
https://github.com/MartinThoma/LaTeX-examples.git
synced 2025-04-25 14:28:05 +02:00
18 lines
No EOL
381 B
C
18 lines
No EOL
381 B
C
#include "mpi.h"
|
|
...
|
|
int signal, i, numprogs, me;
|
|
MPI_Status stat;
|
|
MPI_Comm_rank(MPI_COMM_WORLD, &me);
|
|
MPI_Comm_size(MPI_COMM_WORLD,
|
|
&numprocs);
|
|
if (me==ROOT) {
|
|
...
|
|
for (i=1; i<numprocs; i++) {
|
|
MPI_Send(&signal, 1, MPI_INT, i, 0, MPI_COMM_WORLD);
|
|
}
|
|
...
|
|
else {
|
|
MPI_Recv(&sig, 1, MPI_INT, ROOT, MPI_ANY_TAG,
|
|
MPI_COMM_WORLD, &stat);
|
|
...
|
|
} |