Proof of contextual-keywordp from grammar-contextual-keywordp.
This is proved via a lemma asserting that
a terminated tree rooted at
Theorem:
(defthm contextual-keywordp-when-grammar-contextual-keywordp (implies (grammar-contextual-keywordp x) (contextual-keywordp x)))