Page MenuHomec4science

exchange.c
No OneTemporary

File Metadata

Created
Mon, Sep 30, 22:50

exchange.c

#include <stdio.h>
#include <mpi.h>
int main(int argc, char *argv[]) {
int rank;
int buf1[100];
int buf2[100];
MPI_Request request;
MPI_Status status;
MPI_Init(&argc, &argv);
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
if (rank == 0) {
MPI_Isend(buf1, 10, MPI_INT, 1, 0, MPI_COMM_WORLD, &request);
MPI_Recv(buf2, 10, MPI_INT, 1, 0, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
}else if (rank == 1){
MPI_Isend(buf1, 10, MPI_INT, 0, 0, MPI_COMM_WORLD, &request);
MPI_Recv(buf2, 10, MPI_INT, 0, 0,MPI_COMM_WORLD, MPI_STATUS_IGNORE);
}
MPI_Wait(&request, &status);
memcpy(buf1, buf2, 10*sizeof(int));
MPI_Finalize();
}

Event Timeline