Maximum ACL2 integer value of type
(uchar-max) → uchar-max
Function:
(defun uchar-max nil (declare (xargs :guard t)) (let ((__function__ 'uchar-max)) (declare (ignorable __function__)) (1- (expt 2 (char-bits)))))
Theorem:
(defthm integerp-of-uchar-max (b* ((uchar-max (uchar-max))) (integerp uchar-max)) :rule-classes :type-prescription)
Theorem:
(defthm uchar-max-bound (>= (uchar-max) 255) :rule-classes :linear)