(pop-x86-oracle x86) → (mv * x86)
Function:
(defun pop-x86-oracle$notinline (x86) (declare (xargs :stobjs (x86))) (declare (xargs :guard t)) (let ((__function__ 'pop-x86-oracle)) (declare (ignorable __function__)) (pop-x86-oracle-logic x86)))
Theorem:
(defthm x86p-mv-nth-1-pop-x86-oracle (implies (x86p x86) (x86p (mv-nth 1 (pop-x86-oracle x86)))))