		Search-engine friendly clone of the ACL2 documentation.

Other-non-deterministic-computations

Hw_rnd_gen

Signature
(hw_rnd_gen size x86) → (mv * * x86)

Definitions and Theorems

Function: hw_rnd_gen$notinline

(defun hw_rnd_gen$notinline (size x86)
  (declare (xargs :stobjs (x86)))
  (declare (type (integer 2 8) size))
  (declare (xargs :guard (or (equal size 2)
                             (equal size 4)
                             (equal size 8))))
  (let ((__function__ 'hw_rnd_gen))
    (declare (ignorable __function__))
    (hw_rnd_gen-logic size x86)))

Theorem: x86p-of-mv-nth-2-hw_rnd_gen

(defthm x86p-of-mv-nth-2-hw_rnd_gen
  (implies (x86p x86)
           (x86p (mv-nth 2 (hw_rnd_gen size x86)))))