function[\t ]+[a-zA-Z.]+[a-zA-Z]*[(a-zA-Z:;, \t]*[)]*[: \t]*[a-zA-Z]+;
procedure[\t ]+[a-zA-Z.]+[a-zA-Z]*[(a-zA-Z:;, \t]*[)]*;