receive_character Subroutine

private subroutine receive_character(s, src, tag)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(out)			::	s
integer,	intent(in)			::	src
integer,	intent(in),	optional		::	tag