src/missing/mpi.c
int MPI_Allreduce(void * sendbuf, void * recvbuf, int count, MPI_Datatype type,
		  MPI_Op op, MPI_Comm comm) {
  int rc;

  err_err_rcif(sendbuf == NULL, MPI_ERR_BUFFER);
  err_err_rcif(recvbuf == NULL, MPI_ERR_BUFFER);
  err_err_rcif(count < 0, MPI_ERR_COUNT);

  mpi_copy(sendbuf, recvbuf, count, type);

  return MPI_SUCCESS;

 err:
  mpi_errhandler_(&comm, &rc);

  return rc;
}
/*****************************************************************************
 *
 *  \breif Replacement MPI_Allreduce works for basic datatypes
 *
 *  This is just a copy of the source to the result buffer.
 *
 *  \param  sendbuf      pointer to data to be sent
 *  \param  recvbuf      pointer to the data result buffer
 *  \param  count        number of data items in result
 *  \param  type         MPI_Datatype of the result
 *  \param  op           MPI operation
 *  \param  comm         expected to be MPI_COMM_WORLD
 *
 *  \retval MPI_SUCCESS  a success
 *  \retval MPI_ERR_...  a failure
 *
 *****************************************************************************/
\breif Replacement MPI_Allreduce works for basic datatypes
This is just a copy of the source to the result buffer.




\ breif Replacement MPI_Allreduce works for basic datatypes This is just a copy of the source to the result buffer .
int MPI_Allreduce(void * sendbuf, void * recvbuf, int count, MPI_Datatype type,
		  MPI_Op op, MPI_Comm comm) {
  int rc;
  err_err_rcif(sendbuf == NULL, MPI_ERR_BUFFER);
  err_err_rcif(recvbuf == NULL, MPI_ERR_BUFFER);
  err_err_rcif(count < 0, MPI_ERR_COUNT);
  mpi_copy(sendbuf, recvbuf, count, type);
  return MPI_SUCCESS;
 err:
  mpi_errhandler_(&comm, &rc);
  return rc;
}
int MPI_Allreduce ( void * sendbuf , void * recvbuf , int count , MPI_Datatype type , MPI_Op op , MPI_Comm comm ) { int rc ; err_err_rcif ( sendbuf == NULL , MPI_ERR_BUFFER ) ; err_err_rcif ( recvbuf == NULL , MPI_ERR_BUFFER ) ; err_err_rcif ( count < 0 , MPI_ERR_COUNT ) ; mpi_copy ( sendbuf , recvbuf , count , type ) ; return MPI_SUCCESS ; err : mpi_errhandler_ ( & comm , & rc ) ; return rc ; }
\breif Replacement MPI_Allreduce works for basic datatypes
  This is just a copy of the source to the result buffer.
\ breif Replacement MPI_Allreduce works for basic datatypes This is just a copy of the source to the result buffer .