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