An irrelevant unary operator.
(irr-unop) → acl2::irr
This can be used as a dummy value of the type.
Function:
(defun irr-unop nil (declare (xargs :guard t)) (let ((__function__ 'irr-unop)) (declare (ignorable __function__)) (unop-address)))
Theorem:
(defthm unopp-of-irr-unop (b* ((acl2::irr (irr-unop))) (unopp acl2::irr)) :rule-classes :rewrite)