group = xbt_new(s_smpi_mpi_group_t, 1);
group->size = size;
group->rank_to_index_map = xbt_new(int, size);
group = xbt_new(s_smpi_mpi_group_t, 1);
group->size = size;
group->rank_to_index_map = xbt_new(int, size);
if(group!= smpi_comm_group(MPI_COMM_WORLD)
&& group != MPI_GROUP_NULL
&& group != smpi_comm_group(MPI_COMM_SELF)
if(group!= smpi_comm_group(MPI_COMM_WORLD)
&& group != MPI_GROUP_NULL
&& group != smpi_comm_group(MPI_COMM_SELF)
group->rank_to_index_map[rank] = index;
if(index!=MPI_UNDEFINED)group->index_to_rank_map[index] = rank;
}
group->rank_to_index_map[rank] = index;
if(index!=MPI_UNDEFINED)group->index_to_rank_map[index] = rank;
}
int smpi_group_rank(MPI_Group group, int index)
{
int rank = MPI_UNDEFINED;
int smpi_group_rank(MPI_Group group, int index)
{
int rank = MPI_UNDEFINED;