The
(bool-format-lsb) → format
Function:
(defun bool-format-lsb nil (declare (xargs :guard t)) (make-bool-format :byte-size 1 :value-index 0 :trap nil))
Theorem:
(defthm bool-formatp-of-bool-format-lsb (b* ((format (bool-format-lsb))) (bool-formatp format)) :rule-classes :rewrite)
Theorem:
(defthm bool-format-wfp-of-bool-format-lsb (bool-format-wfp (bool-format-lsb) uchar-format))