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