An irrelevant span.
(irr-span) → acl2::irr
This can be used as a dummy value of the type.
Function:
(defun irr-span nil (declare (xargs :guard t)) (let ((__function__ 'irr-span)) (declare (ignorable __function__)) (make-span :start (irr-position) :end (irr-position))))
Theorem:
(defthm spanp-of-irr-span (b* ((acl2::irr (irr-span))) (spanp acl2::irr)) :rule-classes :rewrite)