srcinit Subroutine

public subroutine srcinit(GSMap, IMPORT, EXPORT, comm, compid)

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

Arguments

Type	Intent	Optional	Attributes		Name
type(GlobalSegMap),	intent(inout)			::	GSMap
type(AttrVect),	intent(inout)			::	IMPORT
type(AttrVect),	intent(inout)			::	EXPORT
integer,	intent(in)			::	comm
integer,	intent(in)			::	compid