		Search-engine friendly clone of the ACL2 documentation.

Lambda-binding

Lambda-binding->formals

Get the formals field from a lambda-binding.

Signature
(lambda-binding->formals x) → formals
Arguments: x — Guard (lambda-binding-p x).
Returns: formals — Type (symbol-listp formals).

This is an ordinary field accessor created by defprod.

Definitions and Theorems

Function: lambda-binding->formals$inline

(defun lambda-binding->formals$inline (x)
 (declare (xargs :guard (lambda-binding-p x)))
 (declare (xargs :guard t))
 (let ((acl2::__function__ 'lambda-binding->formals))
  (declare (ignorable acl2::__function__))
  (mbe
      :logic
      (b* ((x (and t x))
           (formals (symbol-list-fix (cdr (std::da-nth 0 x))))
           (actuals (pseudo-term-list-fix (cdr (std::da-nth 1 x)))))
        (lambda->formals-fix formals actuals))
      :exec (cdr (std::da-nth 0 x)))))

Theorem: symbol-listp-of-lambda-binding->formals

(defthm symbol-listp-of-lambda-binding->formals
  (b* ((formals (lambda-binding->formals$inline x)))
    (symbol-listp formals))
  :rule-classes :rewrite)

Theorem: lambda-binding->formals$inline-of-lambda-binding-fix-x

(defthm lambda-binding->formals$inline-of-lambda-binding-fix-x
  (equal (lambda-binding->formals$inline (lambda-binding-fix x))
         (lambda-binding->formals$inline x)))

Theorem: lambda-binding->formals$inline-lambda-binding-equiv-congruence-on-x

(defthm
 lambda-binding->formals$inline-lambda-binding-equiv-congruence-on-x
 (implies (lambda-binding-equiv x x-equiv)
          (equal (lambda-binding->formals$inline x)
                 (lambda-binding->formals$inline x-equiv)))
 :rule-classes :congruence)