The
(schar-format-8tcnt) → format
This is the simplest and most common format for
Function:
(defun schar-format-8tcnt nil (declare (xargs :guard t)) (let ((__function__ 'schar-format-8tcnt)) (declare (ignorable __function__)) (make-schar-format :signed (signed-format-twos-complement) :trap nil)))
Theorem:
(defthm schar-formatp-of-schar-format-8tcnt (b* ((format (schar-format-8tcnt))) (schar-formatp format)) :rule-classes :rewrite)
Theorem:
(defthm schar-format->max-of-schar-format-8tcnt (equal (schar-format->max (schar-format-8tcnt) (uchar-format-8)) 127))
Theorem:
(defthm schar-format->min-of-schar-format-8tcnt (equal (schar-format->min (schar-format-8tcnt) (uchar-format-8)) -128))