find_any_available_font Function

public function find_any_available_font(font_path) result(found)

Find any available font using same priority order as system initialization

Arguments

Type	Intent	Optional	Attributes		Name
character(len=256),	intent(out)			::	font_path

Return Value logical