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