str_match Subroutine

public subroutine str_match(str, ipos, imatch)

This routine finds the delimiter in string str that matches the delimiter in position ipos of str. The argument imatch contains the position of the matching delimiter. Allowable delimiters are (), [], {}, <>.

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	str
integer,	intent(in)			::	ipos
integer,	intent(out)			::	imatch

Contents

None