		Search-engine friendly clone of the ACL2 documentation.

Bed-op-andc1

Function: bed-op-andc1$inline

(defun bed-op-andc1$inline nil
  (declare (xargs :guard t))
  (let ((__function__ 'bed-op-andc1))
    (declare (ignorable __function__))
    2))

Theorem: bed-op-p-of-bed-op-andc1

(defthm bed-op-p-of-bed-op-andc1
  (b* ((op (bed-op-andc1$inline)))
    (bed-op-p op))
  :rule-classes :rewrite)

Theorem: bed-op-eval-of-andc1

(defthm bed-op-eval-of-andc1
  (equal (bed-op-eval (bed-op-andc1) x y)
         (b-andc1 x y)))