MPI_Comm_rank(MPI_COMM_WORLD, &rank); /*Process#*/ MPI_Comm_size(MPI_COMM_WORLD, &size); /*Total processes#*/ MPI_Bcast_a(rank,size,tag); MPI_Alltoall_a(rank,size,tag); MPI_Gather_a(rank,size,tag); MPI_Scatter_a