if (status.MPI_TAG == 0)
MPI_Recv (&i, 1, MPI_INT, 0, 0, MPI_COMM_WORLD, &status);
else
MPI_Recv (&x, 1, MPI_DOUBLE, 0, 1, MPI_COMM_WORLD, &status);
}
}
if (status.MPI_TAG == 0)
MPI_Recv (&i, 1, MPI_INT, 0, 0, MPI_COMM_WORLD, &status);
else
MPI_Recv (&x, 1, MPI_DOUBLE, 0, 1, MPI_COMM_WORLD, &status);
}
}