An irrelevant initializer with optional designation.
(irr-desiniter) → acl2::irr
This can be used as a dummy value of the type.
Function:
(defun irr-desiniter nil (declare (xargs :guard t)) (make-desiniter :designors nil :initer (irr-initer)))
Theorem:
(defthm desiniterp-of-irr-desiniter (b* ((acl2::irr (irr-desiniter))) (desiniterp acl2::irr)) :rule-classes :rewrite)