init Interface

public interface init

Module Procedures

private subroutine initd_(GSMap, start, length, root, my_comm, comp_id, pe_loc, gsize, numel)

Arguments

Type	Intent	Optional	Attributes		Name
type(GlobalSegMap),	intent(out)			::	GSMap
integer,	intent(in),		dimension(:)	::	start
integer,	intent(in),		dimension(:)	::	length
integer,	intent(in)			::	root
integer,	intent(in)			::	my_comm
integer,	intent(in)			::	comp_id
integer,		optional,	dimension(:), pointer	::	pe_loc
integer,	intent(in),	optional		::	gsize
integer,	intent(in),	optional		::	numel

private subroutine initr_(GSMap, ngseg, start, length, pe_loc, root, my_comm, comp_id, gsize)

Arguments

Type	Intent	Optional	Attributes		Name
type(GlobalSegMap),	intent(out)			::	GSMap
integer,	intent(in)			::	ngseg
integer,	intent(in),		dimension(:)	::	start
integer,	intent(in),		dimension(:)	::	length
integer,	intent(in),		dimension(:)	::	pe_loc
integer,	intent(in)			::	root
integer,	intent(in)			::	my_comm
integer,	intent(in)			::	comp_id
integer,	intent(in),	optional		::	gsize

private subroutine initp_(GSMap, comp_id, ngseg, gsize, start, length, pe_loc)

Arguments

Type	Intent	Optional	Attributes		Name
type(GlobalSegMap),	intent(out)			::	GSMap
integer,	intent(in)			::	comp_id
integer,	intent(in)			::	ngseg
integer,	intent(in)			::	gsize
integer,	intent(in),		dimension(:)	::	start
integer,	intent(in),		dimension(:)	::	length
integer,	intent(in),		dimension(:)	::	pe_loc

private subroutine initp1_(GSMap, comp_id, ngseg, gsize, all_arrays)

Arguments

Type	Intent	Optional	Attributes		Name
type(GlobalSegMap),	intent(out)			::	GSMap
integer,	intent(in)			::	comp_id
integer,	intent(in)			::	ngseg
integer,	intent(in)			::	gsize
integer,	intent(in),		dimension(:)	::	all_arrays

private subroutine initp0_(GSMap, comp_id, ngseg, gsize)

Arguments

Type	Intent	Optional	Attributes		Name
type(GlobalSegMap),	intent(out)			::	GSMap
integer,	intent(in)			::	comp_id
integer,	intent(in)			::	ngseg
integer,	intent(in)			::	gsize

private subroutine init_index_(GSMap, lindx, my_comm, comp_id, lsize, gsize)

Special case if this processor doesn't have any data indices

Arguments

Type	Intent	Optional	Attributes		Name
type(GlobalSegMap),	intent(out)			::	GSMap
integer,	intent(in),		dimension(:)	::	lindx
integer,	intent(in)			::	my_comm
integer,	intent(in)			::	comp_id
integer,	intent(in),	optional		::	lsize
integer,	intent(in),	optional		::	gsize