MPI_Send (&flipbit, 1, MPI_INT, 1, i, MPI_COMM_WORLD);
flag = 0;
MPI_Send (&flipbit, 1, MPI_INT, 1, i, MPI_COMM_WORLD);
flag = 0;
while (!flag)
MPI_Testany (i, reqs, &done, &flag, &status);
while (!flag)
MPI_Testany (i, reqs, &done, &flag, &status);
for (i = 3; i > 0; i--) {
MPI_Recv (&flipbit, 1, MPI_INT, 0, i, MPI_COMM_WORLD, &status);
for (i = 3; i > 0; i--) {
MPI_Recv (&flipbit, 1, MPI_INT, 0, i, MPI_COMM_WORLD, &status);