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