MPI Send( &solution count, I eight queens slave( my rank); MPI INTO NUM SOLUTIONS TAG MPI COMM WORLD) MPI Finalize(; return 0. MPI Send(solutions i/main*/ QUEENS MPI INT MPI COMM WORLD) else /request= TERMINATE */ finished =true. 1 /* whlie*/ int main( int argc, char*argv) MPI In MPI Comm size(MPI COMM WORLD MPI Comm rank(MPI COMM WORLD (nodes== 1) if (! my rank) else16 MPI_Send(&solution_count, 1, MPI_INT,0, NUM_SOLUTIONS_TAG, MPI_COMM_WORLD); if (solution_count > 0) { MPI_Send(*solutions, QUEENS * solution_count, MPI_INT, 0, SOLUTIONS_TAG, MPI_COMM_WORLD) ; } } else /* request == TERMINATE */ { finished = true; } } /* whlie */ } /* eight_queens_slave */ /***** main *****/ int main(int argc, char* argv[]) { int nodes, my_rank; MPI_Init(&argc, &argv); MPI_Comm_size(MPI_COMM_WORLD, &nodes); MPI_Comm_rank(MPI_COMM_WORLD, &my_rank); if (nodes == 1) { sequential_eight_queens(); } if (! my_rank) { eight_queens_master(nodes); } else { eight_queens_slave(my_rank); } MPI_Finalize(); return 0; } /* main */