Maximum mathematical integer value of type
This depends on the implementation environment.
Note that the minimum
Function:
(defun ullong-max (ienv) (declare (xargs :guard (ienvp ienv))) (let ((__function__ 'ullong-max)) (declare (ignorable __function__)) (1- (expt 2 (* 8 (ienv->llong-bytes ienv))))))
Theorem:
(defthm natp-of-ullong-max (b* ((val (ullong-max ienv))) (natp val)) :rule-classes (:rewrite :type-prescription))
Theorem:
(defthm ullong-max-of-ienv-fix-ienv (equal (ullong-max (ienv-fix ienv)) (ullong-max ienv)))
Theorem:
(defthm ullong-max-ienv-equiv-congruence-on-ienv (implies (ienv-equiv ienv ienv-equiv) (equal (ullong-max ienv) (ullong-max ienv-equiv))) :rule-classes :congruence)