mp_environ Interface

public interface mp_environ

Module Procedures

private recursive subroutine mp_environ_l(numtask, taskid, groupid)

returns number of tasks and task id for a given mpi group simple and cartesian version.. recursive needed in case of failing mpi_comm_rank.

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out),	optional		::	numtask
integer,	intent(out),	optional		::	taskid
type(mp_comm_type),	intent(in)			::	groupid	mpi communicator

private subroutine mp_environ_c(numtask, dims, task_coor, groupid)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(out)			::	numtask
integer,	intent(out)			::	dims(2)
integer,	intent(out)			::	task_coor(2)
type(mp_comm_type),	intent(in)			::	groupid

private subroutine mp_environ_c2(comm, ndims, dims, task_coor, periods)

Arguments

Type	Intent	Optional	Attributes		Name
type(mp_comm_type),	intent(in)			::	comm
integer,	intent(in)			::	ndims
integer,	intent(out)			::	dims(ndims)
integer,	intent(out)			::	task_coor(ndims)
logical,	intent(out)			::	periods(ndims)