Examples C and Fortran language using R and MPI with Rhpc

	Name	Last modified	Size	Description
	Parent Directory		-
	Makefile	2014-06-10 17:55	1.3K
	Rhpc_pic.c	2014-06-10 15:56	688
	Rhpc_pic.c.diff	2014-06-10 18:36	2.6K
	Rhpc_picall.c	2014-06-10 16:02	793
	Rhpc_picall.c.diff	2014-06-10 18:36	2.8K
	Rhpc_pif.f	2014-06-10 16:31	1.0K
	Rhpc_pif.f.diff	2014-06-10 18:36	3.3K
	mpipic.R	2014-06-10 18:35	240
	mpipicall.R	2014-06-10 18:36	263
	mpipif.R	2014-06-10 18:35	265
	pi.R	2014-06-10 18:37	491
	pi.Rout	2014-06-10 18:36	1.2K
	pic.c	2014-06-10 16:33	718
	pif.f	2014-06-10 16:30	1.2K

Calling foreign SPMD programs from R with Rhpc

C and/or Fortran programs using MPI adopt SPMD programming, in which Master(rank0) communicates with Workers(their ranks are more than using communicators. Therefore, when Rhpc, which uses MPI, call such programs, exchanging MPI communicators is required. Rhpc provides Rhpc_worker_noback function to support it.
Rhpc sets global variable _options_ (see options function):

Rhpc.mpi.f.comm

Comuunicator for Fortran (R type: integer)

Rhpc.mpi.c.comm

Communicator for C (R type: external pointer)

Rhpc.mpi.procs

Communication size in MPI

Rhpc.mpi.rank

Rank in MPI

Using `.Fortran', `.C' and `.Call' in R

Foreign programs (Fortran or C) using MPI are called in R

• call MPI fortran from R (use .Fortran function) mpipif.R
• call MPI C from R (use .C function)mpipic.R
• call MPI C from R (use .Call function)mpipicall.R

Changing MPI Fortran code for `.Fortran' in R

Changing MPI C code for `.C' in R.

Changing MPI C code for `.Call' in R.

Call foreign MPI program from R