Generic typed list keytype recognizer.
Theorem: non-keytype-p-def
(defthm non-keytype-p-def (iff (non-keytype-p x) (not (keytype-p x))))