		Search-engine friendly clone of the ACL2 documentation.

Ctxexprs

Vl-portdecl-ctxexprs

Signature
(vl-portdecl-ctxexprs mod x) → alist
Arguments: mod — Guard (stringp mod).; x — Guard (vl-portdecl-p x).
Returns: alist — Type (vl-exprctxalist-p alist).

Definitions and Theorems

Function: vl-portdecl-ctxexprs

(defun vl-portdecl-ctxexprs (mod x)
  (declare (xargs :guard (and (stringp mod) (vl-portdecl-p x))))
  (let ((__function__ 'vl-portdecl-ctxexprs))
    (declare (ignorable __function__))
    (let ((x (vl-portdecl-fix x)))
      (vl-make-exprctxalist (vl-portdecl-allexprs x)
                            (make-vl-context1 :mod mod :elem x)))))

Theorem: vl-exprctxalist-p-of-vl-portdecl-ctxexprs

(defthm vl-exprctxalist-p-of-vl-portdecl-ctxexprs
  (b* ((alist (vl-portdecl-ctxexprs mod x)))
    (vl-exprctxalist-p alist))
  :rule-classes :rewrite)

Theorem: vl-portdecl-ctxexprs-of-str-fix-mod

(defthm vl-portdecl-ctxexprs-of-str-fix-mod
  (equal (vl-portdecl-ctxexprs (str-fix mod) x)
         (vl-portdecl-ctxexprs mod x)))

Theorem: vl-portdecl-ctxexprs-streqv-congruence-on-mod

(defthm vl-portdecl-ctxexprs-streqv-congruence-on-mod
  (implies (streqv mod mod-equiv)
           (equal (vl-portdecl-ctxexprs mod x)
                  (vl-portdecl-ctxexprs mod-equiv x)))
  :rule-classes :congruence)

Theorem: vl-portdecl-ctxexprs-of-vl-portdecl-fix-x

(defthm vl-portdecl-ctxexprs-of-vl-portdecl-fix-x
  (equal (vl-portdecl-ctxexprs mod (vl-portdecl-fix x))
         (vl-portdecl-ctxexprs mod x)))

Theorem: vl-portdecl-ctxexprs-vl-portdecl-equiv-congruence-on-x

(defthm vl-portdecl-ctxexprs-vl-portdecl-equiv-congruence-on-x
  (implies (vl-portdecl-equiv x x-equiv)
           (equal (vl-portdecl-ctxexprs mod x)
                  (vl-portdecl-ctxexprs mod x-equiv)))
  :rule-classes :congruence)

Subtopics

Vl-portdecl-ctxexprs-nrev