PPT Slide
{ int rank, size, i, buf[1];
MPI_Init( &argc, &argv );
MPI_Comm_rank( MPI_COMM_WORLD, &rank );
MPI_Comm_size( MPI_COMM_WORLD, &size );
for (i=0; i*(size-1); i++) {
MPI_Recv( buf, 1, MPI_INT, MPI_ANY_SOURCE,
MPI_ANY_TAG, MPI_COMM_WORLD, &status );
printf( "Msg from %d with tag %d\n",
status.MPI_SOURCE, status.MPI_TAG );
MPI_Send( buf, 1, MPI_INT, 0, i, MPI_COMM_WORLD );