Tree matching theorem for parse-*-alpha/digit/dash.
Theorem:
(defthm tree-list-match-of-parse-*-alpha/digit/dash (b* (((mv & trees &) (parse-*-alpha/digit/dash input))) (implies (equal repetition (*_ (!_ (/_ *alpha*) (/_ *digit*) (/_ "-")))) (tree-list-match-repetition-p trees repetition *grammar*))))