Exemplo n.º 1
0
/*
 * Broadcasts a message from the process with rank "root" to
 *      all other processes of the group.
 * Note: Collective communication means all processes within a communicator call the same routine.
 *       To be able to use a regular MPI_Recv to recv the messages, one should use mpi_bcast2
 *
 * mpi_bcast(+Root,+Data,+Tag).
 */
static YAP_Bool 
mpi_bcast3(term_t YAP_ARG1,...) {
  return my_bcast(YAP_ARG1,YAP_ARG2,YAP_ARG3);
}
Exemplo n.º 2
0
/*
 * Broadcasts a message from the process with rank "root" to
 *      all other processes of the group.
 * Note: Collective communication means all processes within a communicator call the same routine.
 *       To be able to use a regular MPI_Recv to recv the messages, one should use mpi_bcast2
 *
 * mpi_bcast(+Root,+Data,+Tag).
 */
static YAP_Bool 
mpi_bcast3(void) {
  return my_bcast(YAP_ARG1,YAP_ARG2,YAP_ARG3);
}
Exemplo n.º 3
0
/*
 * mpi_bcast(+Root,+Data).
 */
static YAP_Bool 
mpi_bcast2(term_t YAP_ARG1,...) {
  return my_bcast(YAP_ARG1,YAP_ARG2,YAP_MkIntTerm(0));
}
Exemplo n.º 4
0
/*
 * mpi_bcast(+Root,+Data).
 */
static YAP_Bool 
mpi_bcast2(void) {
  return my_bcast(YAP_ARG1,YAP_ARG2,YAP_MkIntTerm(0));
}