find_subsequence Function

public function find_subsequence(arr, n, pat, start_idx) result(pos)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	arr(n)
integer(kind=int64),	intent(in)			::	n
character(len=*),	intent(in)			::	pat
integer,	intent(in)			::	start_idx

Return Value integer