Extract the lesser of the
(vl-range-low-idx x) → lowidx
Function:
(defun vl-range-low-idx (x) (declare (xargs :guard (and (vl-range-p x) (vl-range-resolved-p x)))) (let ((__function__ 'vl-range-low-idx)) (declare (ignorable __function__)) (min (vl-range-msbidx x) (vl-range-lsbidx x))))
Theorem:
(defthm integerp-of-vl-range-low-idx (b* ((lowidx (vl-range-low-idx x))) (integerp lowidx)) :rule-classes :type-prescription)