count_char_char Function

public recursive function count_char_char(sentence, key, initialized) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	sentence
character(len=*),	intent(in)			::	key
logical,	intent(in),	optional		::	initialized

Return Value integer(kind=int32)