Advertisement
Bernard0x01

Untitled

Apr 18th, 2019
115
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 0.29 KB | None | 0 0
  1. int number;
  2. MPI_Status status;
  3. MPI_Request in_request = MPI_REQUEST_NULL;
  4. if (world_rank == 0) {
  5.     number = -1;
  6.     MPI_IBcast(&number, 1, MPI_INT, 0, MPI_COMM_WORLD);
  7. } else {
  8.     MPI_IRecv(&number, 1, MPI_INT, 0, 0, MPI_COMM_WORLD,MPI_STATUS_IGNORE);
  9. }
  10. MPI_Wait(&request, &status);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement