Size of signed and unsigned
(short-bits) → short-bits
Function:
(defun short-bits nil (declare (xargs :guard t)) (let ((__function__ 'short-bits)) (declare (ignorable __function__)) 16))
Theorem:
(defthm posp-of-short-bits (b* ((short-bits (short-bits))) (posp short-bits)) :rule-classes :type-prescription)
Theorem:
(defthm short-bits-multiple-of-char-bits (integerp (/ (short-bits) (char-bits))) :rule-classes :type-prescription)
Theorem:
(defthm short-bits-bound (b* ((?short-bits (short-bits))) (>= short-bits 16)) :rule-classes :linear)