Recognizer for jexpr structures.
(jexprp x) → *
Theorem: consp-when-jexprp
(defthm consp-when-jexprp (implies (jexprp x) (consp x)) :rule-classes :compound-recognizer)