if (myRank == 2*j)
                {
                    MPI_Send(rbuf, 100, MPI_INT, 2*j+1, 100, MPI_COMM_WORLD);
                    MPI_Recv(r2buf, 100, MPI_INT, 2*j+1, 101, MPI_COMM_WORLD, &myStatus);
                }
                if (myRank == 2*j+1)
                {
                    MPI_Recv(r2buf, 2*j, MPI_INT, 0, 100, MPI_COMM_WORLD, &myStatus);
                    MPI_Send(rbuf, 2*j, MPI_INT, 0, 101, MPI_COMM_WORLD);
                }
                int tmp[200];
                memcpy(tmp, rbuf, 100*sizeof(int));
                memcpy(tmp+100, r2buf, 100*sizeof(int));
                qsort(tmp, 200, sizeof(int), compare);
                if (myRank == 2 * j)
                {
                    memcpy(rbuf, tmp, 100 * sizeof(int));
                }
                if (myRank == 2 * j + 1)
                {
                    memcpy(rbuf, tmp + 100, 100 * sizeof(int));
                }