Get the
(evex->v-prime evex-prefixes) → v-prime
Function:
(defun evex->v-prime$inline (evex-prefixes) (declare (xargs :guard (evex-prefixes-p evex-prefixes))) (evex-byte3->v-prime (evex-prefixes->byte3 evex-prefixes)))
Theorem:
(defthm return-type-of-evex->v-prime (implies (and (evex-prefixes-p$inline evex-prefixes)) (b* ((v-prime (evex->v-prime$inline evex-prefixes))) (unsigned-byte-p 1 v-prime))) :rule-classes :rewrite)