MPI_Datatype datatype, MPI_Op op,
MPI_Comm comm)
{
- MPI_Reduce(buf, buf2, count, datatype, op, 0, comm);
- MPI_Bcast(buf2, count, datatype, 0, comm);
+ smpi_mpi_reduce(buf, buf2, count, datatype, op, 0, comm);
+ smpi_mpi_bcast(buf2, count, datatype, 0, comm);
return 0;
}