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