An irrelevant decimal exponent.
(irr-dec-expo) → acl2::irr
This can be used as a dummy value of the type.
Function:
(defun irr-dec-expo nil (declare (xargs :guard t)) (let ((__function__ 'irr-dec-expo)) (declare (ignorable __function__)) (make-dec-expo :prefix (irr-dec-expo-prefix) :sign? nil :digits nil)))
Theorem:
(defthm dec-expop-of-irr-dec-expo (b* ((acl2::irr (irr-dec-expo))) (dec-expop acl2::irr)) :rule-classes :rewrite)