MPH_Single_Exec_Overlap Module

Uses

- comm_data123
- comm_sub123

Variables

Type	Visibility	Attributes		Name		Initial
integer,	public		::	local_world(max_num_comps)
integer,	public		::	local_proc_id(max_num_comps)
integer,	public		::	local_totProcs(max_num_comps)
integer,	public		::	low_proc_limit(max_num_comps)
integer,	public		::	up_proc_limit(max_num_comps)

Functions

public function PE_in_component(name, comm)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	name
integer				::	comm

Return Value logical

public function MPH_read_list_SE_overlap(filename, filetag, namelist, low, up, num, local_num)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	filename
character(len=*)				::	filetag
character(len=16)				::	namelist(num)
integer				::	low(num)
integer				::	up(num)
integer				::	num
integer				::	local_num(num)

Return Value integer

public function MPH_local_proc_id_SE_overlap(id)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	id

Return Value integer

public function MPH_local_world_SE_overlap(id)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	id

Return Value integer

public function MPH_low_proc_limit(id)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	id

Return Value integer

public function MPH_up_proc_limit(id)

Arguments

Type	Intent	Optional	Attributes		Name
integer				::	id

Return Value integer

Subroutines

public subroutine MPH_setup_SE_overlap(model1, model2, model3, model4, model5, model6, model7, model8, model9, model10)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),			optional	::	model1
character(len=*),			optional	::	model2
character(len=*),			optional	::	model3
character(len=*),			optional	::	model4
character(len=*),			optional	::	model5
character(len=*),			optional	::	model6
character(len=*),			optional	::	model7
character(len=*),			optional	::	model8
character(len=*),			optional	::	model9
character(len=*),			optional	::	model10

public subroutine MPH_local_SE_overlap()

Arguments

None

public subroutine MPH_global_SE_overlap()

Arguments

None

public subroutine MPH_comm_join_SE_overlap(name1, name2, comm_joined)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*)				::	name1
character(len=*)				::	name2
integer				::	comm_joined