An irrelevant designator.
(irr-designor) → acl2::irr
This can be used as a dummy value of the type.
Function:
(defun irr-designor nil (declare (xargs :guard t)) (let ((__function__ 'irr-designor)) (declare (ignorable __function__)) (designor-dot (irr-ident))))
Theorem:
(defthm designorp-of-irr-designor (b* ((acl2::irr (irr-designor))) (designorp acl2::irr)) :rule-classes :rewrite)