src/smpi/colls/allreduce-redbcast.c

   1 #include "colls.h"
   2
   3 int smpi_coll_tuned_allreduce_redbcast(void *buf, void *buf2, int count,
   4                                        MPI_Datatype datatype, MPI_Op op,
   5                                        MPI_Comm comm)
   6 {
   7   MPI_Reduce(buf, buf2, count, datatype, op, 0, comm);
   8   MPI_Bcast(buf2, count, datatype, 0, comm);
   9   return 0;
  10 }