An irrelevant preprocessing number.
(irr-pnumber) → acl2::irr
This can be used as a dummy value of the type.
Function:
(defun irr-pnumber nil (declare (xargs :guard t)) (pnumber-digit #\0))
Theorem:
(defthm pnumberp-of-irr-pnumber (b* ((acl2::irr (irr-pnumber))) (pnumberp acl2::irr)) :rule-classes :rewrite)