MPI_Aint extent;
extent = smpi_datatype_get_extent(datatype);
- rank = smpi_comm_rank(MPI_COMM_WORLD);
- size = smpi_comm_size(MPI_COMM_WORLD);
+ rank = smpi_comm_rank(comm);
+ size = smpi_comm_size(comm);
/* source node and destination nodes (same through out the functions) */
int from = (rank - 1) / 2;