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