search for: mpi_comm

...t;test.so") erg <- .Call("test", ....) .... mpi.close.Rslaves() mpi.quit() And my C function looks something like this: #include <mpi.h> #include <R.h> #include <Rdefines.h> #include <Rinternals.h> SEXP test (SEXP a, ..){ int rank; comm ?????? MPI_Comm_rank (comm, &rank); ...... } For all MPI functions I need the right communicator (MPI_Comm *comm;) to communicate with the existing slaves. This variable will be generated by spawning the Rslaves (mpi.spawn.Rslaves). But how to get to this variable in my C function? Is the communicator...

...i.comm.free() out } ************************************************************************* rand.c ************************************************************************* #include <mpi.h> #include <sprng.h> int main(int argc, char **argv) { double rand; double* randarray; MPI_Comm slavecomm, all_processes; /*Initialize MPI*/ MPI_Init(&argc, &argv); MPI_Comm_get_parent(&slavecomm); MPI_Intercomm_merge(slavecomm, 1, &all_processes); /*How many processes are there?*/ MPI_Comm_size(all_processes, &size); /*Which one am I?*/ MPI_Comm_rank(a...

...pi.c: In function 'mpi_initialize': Rmpi.c:57: warning: implicit declaration of function 'MPI_Initialized' Rmpi.c:76: warning: implicit declaration of function 'MPI_Init' Rmpi.c:81: warning: implicit declaration of function 'MPI_Errhandler_set' Rmpi.c:81: error: 'MPI_COMM_WORLD' undeclared (first use in this function) Rmpi.c:81: error: (Each undeclared identifier is reported only once Rmpi.c:81: error: for each function it appears in.) Rmpi.c:81: error: 'MPI_ERRORS_RETURN' undeclared (first use in this function) Rmpi.c:82: error: 'MPI_COMM_SELF'...