The symbol value for
(value-nil) → value
Function:
(defun value-nil nil (declare (xargs :guard t)) (let ((__function__ 'value-nil)) (declare (ignorable __function__)) (value-symbol (lift-symbol nil))))
Theorem:
(defthm valuep-of-value-nil (b* ((value (value-nil))) (valuep value)) :rule-classes :rewrite)