Minimum ACL2 integer value of type
(sshort-min) → sshort-min
Function:
(defun sshort-min nil (declare (xargs :guard t)) (let ((__function__ 'sshort-min)) (declare (ignorable __function__)) (- (expt 2 (1- (short-bits))))))
Theorem:
(defthm integerp-of-sshort-min (b* ((sshort-min (sshort-min))) (integerp sshort-min)) :rule-classes :type-prescription)
Theorem:
(defthm sshort-min-bound (<= (sshort-min) -32768) :rule-classes :linear)