An irrelevant unique identifier.
(irr-uid) → acl2::irr
This can be used as a dummy value of the type.
Function:
(defun irr-uid nil (declare (xargs :guard t)) (uid 0))
Theorem:
(defthm uidp-of-irr-uid (b* ((acl2::irr (irr-uid))) (uidp acl2::irr)) :rule-classes :rewrite)