• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
        • Primitives
        • Use-set
        • Syntax
        • Getting-started
        • Utilities
        • Loader
        • Transforms
          • Expression-sizing
          • Occform
          • Oprewrite
          • Expand-functions
          • Delayredux
          • Unparameterization
            • Scopesubst
            • Vl-scopeinfo-resolve-params
            • Vl-make-paramdecloverrides
              • Vl-namedparamvaluelist->names
              • Vl-make-paramdecloverrides-indexed
              • Vl-find-namedparamvalue
              • Vl-paramdecloverride
                • Vl-paramdecloverride-fix
                • Vl-paramdecloverride-equiv
                  • Make-vl-paramdecloverride
                  • Vl-paramdecloverride->override
                  • Vl-paramdecloverride->decl
                  • Change-vl-paramdecloverride
                  • Vl-paramdecloverride-p
                • Vl-nonlocal-paramdecls
                • Vl-paramdecloverridelist
              • Vl-unparam-inst
              • Vl-scope-finalize-params
              • Vl-override-parameter-value
              • Vl-unparam-instlist
              • Vl-create-unparameterized-module
              • Vl-module-default-signature
              • Vl-modulelist-default-signatures
              • Vl-gencase-some-match
              • Vl-gencase-match
              • Vl-make-paramdecloverrides-named
              • Vl-unparam-newname
              • Vl-paramdecl-set-default
              • Vl-unparam-signature
              • Vl-genblob-collect-modinst-paramsigs
              • Vl-design-unparameterize
              • Vl-paramdecllist-remove-defaults
              • Vl-unparam-newname-exprstring
              • Vl-paramdecl-remove-default
              • Vl-unparam-sigalist
              • Vl-unparam-signaturelist
            • Caseelim
            • Split
            • Selresolve
            • Weirdint-elim
            • Vl-delta
            • Replicate-insts
            • Rangeresolve
            • Propagate
            • Clean-selects
            • Clean-params
            • Blankargs
            • Inline-mods
            • Expr-simp
            • Trunc
            • Always-top
            • Gatesplit
            • Gate-elim
            • Expression-optimization
            • Elim-supplies
            • Wildelim
            • Drop-blankports
            • Clean-warnings
            • Addinstnames
            • Custom-transform-hooks
            • Annotate
            • Latchcode
            • Elim-unused-vars
            • Problem-modules
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Vl-paramdecloverride

    Vl-paramdecloverride-equiv

    Basic equivalence relation for vl-paramdecloverride structures.

    Definitions and Theorems

    Function: vl-paramdecloverride-equiv$inline

    (defun vl-paramdecloverride-equiv$inline (acl2::x acl2::y)
      (declare (xargs :guard (and (vl-paramdecloverride-p acl2::x)
                                  (vl-paramdecloverride-p acl2::y))))
      (equal (vl-paramdecloverride-fix acl2::x)
             (vl-paramdecloverride-fix acl2::y)))

    Theorem: vl-paramdecloverride-equiv-is-an-equivalence

    (defthm vl-paramdecloverride-equiv-is-an-equivalence
      (and (booleanp (vl-paramdecloverride-equiv x y))
           (vl-paramdecloverride-equiv x x)
           (implies (vl-paramdecloverride-equiv x y)
                    (vl-paramdecloverride-equiv y x))
           (implies (and (vl-paramdecloverride-equiv x y)
                         (vl-paramdecloverride-equiv y z))
                    (vl-paramdecloverride-equiv x z)))
      :rule-classes (:equivalence))

    Theorem: vl-paramdecloverride-equiv-implies-equal-vl-paramdecloverride-fix-1

    (defthm
     vl-paramdecloverride-equiv-implies-equal-vl-paramdecloverride-fix-1
     (implies (vl-paramdecloverride-equiv acl2::x x-equiv)
              (equal (vl-paramdecloverride-fix acl2::x)
                     (vl-paramdecloverride-fix x-equiv)))
     :rule-classes (:congruence))

    Theorem: vl-paramdecloverride-fix-under-vl-paramdecloverride-equiv

    (defthm vl-paramdecloverride-fix-under-vl-paramdecloverride-equiv
      (vl-paramdecloverride-equiv (vl-paramdecloverride-fix acl2::x)
                                  acl2::x)
      :rule-classes (:rewrite :rewrite-quoted-constant))

    Theorem: equal-of-vl-paramdecloverride-fix-1-forward-to-vl-paramdecloverride-equiv

    (defthm
     equal-of-vl-paramdecloverride-fix-1-forward-to-vl-paramdecloverride-equiv
     (implies (equal (vl-paramdecloverride-fix acl2::x)
                     acl2::y)
              (vl-paramdecloverride-equiv acl2::x acl2::y))
     :rule-classes :forward-chaining)

    Theorem: equal-of-vl-paramdecloverride-fix-2-forward-to-vl-paramdecloverride-equiv

    (defthm
     equal-of-vl-paramdecloverride-fix-2-forward-to-vl-paramdecloverride-equiv
     (implies (equal acl2::x
                     (vl-paramdecloverride-fix acl2::y))
              (vl-paramdecloverride-equiv acl2::x acl2::y))
     :rule-classes :forward-chaining)

    Theorem: vl-paramdecloverride-equiv-of-vl-paramdecloverride-fix-1-forward

    (defthm
       vl-paramdecloverride-equiv-of-vl-paramdecloverride-fix-1-forward
     (implies
          (vl-paramdecloverride-equiv (vl-paramdecloverride-fix acl2::x)
                                      acl2::y)
          (vl-paramdecloverride-equiv acl2::x acl2::y))
     :rule-classes :forward-chaining)

    Theorem: vl-paramdecloverride-equiv-of-vl-paramdecloverride-fix-2-forward

    (defthm
       vl-paramdecloverride-equiv-of-vl-paramdecloverride-fix-2-forward
     (implies
         (vl-paramdecloverride-equiv acl2::x
                                     (vl-paramdecloverride-fix acl2::y))
         (vl-paramdecloverride-equiv acl2::x acl2::y))
     :rule-classes :forward-chaining)