Extract the LSB (right) index from a resolved vl-range.
(vl-range-lsbidx x) → lsb
Function:
(defun vl-range-lsbidx (x) (declare (xargs :guard (and (vl-range-p x) (vl-range-resolved-p x)))) (let ((__function__ 'vl-range-lsbidx)) (declare (ignorable __function__)) (b* (((vl-range x) x)) (vl-resolved->val x.lsb))))
Theorem:
(defthm integerp-of-vl-range-lsbidx (b* ((lsb (vl-range-lsbidx x))) (integerp lsb)) :rule-classes :type-prescription)