• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
      • Vwsim
      • Vl
        • Syntax
        • Loader
        • Warnings
        • Getting-started
        • Utilities
        • Printer
        • Kit
          • Vl-lint
            • Vl-lintconfig-p
            • Condcheck
            • Lint-warning-suppression
            • Lucid
            • Lvaluecheck
            • Vl-interfacelist-alwaysstyle
            • Truncation-warnings
            • Vl-modulelist-alwaysstyle
            • Skip-detection
            • Vl-lint-report
            • Vl-lintresult
            • Vl::vl-design-sv-use-set
            • Oddexpr-check
            • Leftright-check
            • Duplicate-detect
            • Selfassigns
            • *vl-lint-help*
            • Arith-compare-check
            • Dupeinst-check
            • Qmarksize-check
            • Lint-whole-file-suppression
            • Run-vl-lint-main
            • Logicassign
            • Run-vl-lint
            • Vl-print-certain-warnings
            • Duperhs-check
              • Vl-modulelist-duperhs-check
              • Vl-maybe-warn-duperhs
              • Vl-duperhs-too-trivial-p
              • Vl-warnings-for-duperhs-alist
              • Vl-make-duperhs-alist-aux
              • Vl-module-duperhs-check
              • Vl-make-duperhs-alist
              • Vl-design-duperhs-check
              • Vl-duperhs-alist
                • Vl-duperhs-alist-p
                • Vl-duperhs-alist-fix
                • Vl-duperhs-alist-equiv
              • Vl-lint-top
              • Sd-filter-problems
              • Vl-modulelist-add-svbad-warnings
              • Vl-module-add-svbad-warnings
              • Check-case
              • Vl-lint-extra-actions
              • Drop-lint-stubs
              • Vl-lint-print-warnings
              • Drop-user-submodules
              • Check-namespace
              • Vl-lintconfig-loadconfig
              • Vl-lint-design->svex-modalist-wrapper
              • Vl-delete-sd-problems-for-modnames-aux
              • Vl-collect-new-names-from-orignames
              • Vl-lint-print-all-warnings
              • Vl-design-remove-unnecessary-modules
              • Vl-delete-sd-problems-for-modnames
              • Vl-always-check-style
              • Vl-vardecllist-svbad-warnings
              • Vl-vardecl-svbad-warnings
              • Vl-reportcard-remove-suppressed
              • Vl-reportcard-keep-suppressed
              • Vl-alwayslist-check-style
              • Vl-remove-nameless-descriptions
              • Vl-lint-apply-quiet
              • Vl-warninglist-remove-suppressed
              • Vl-warninglist-keep-suppressed
              • Vl-print-eliminated-descs
              • Vl-module-alwaysstyle
              • Vl-jp-reportcard-aux
              • Vl-interface-alwaysstyle
              • Vl-design-alwaysstyle
              • Vl-jp-description-locations
              • Vl-jp-reportcard
              • Vl-pp-stringlist-lines
              • Vl-jp-design-locations
              • Vl-datatype-svbad-p
              • Unpacked-range-check
              • Sd-problem-major-p
              • Vl-alwaysstyle
            • Vl-server
            • Vl-gather
            • Vl-zip
            • Vl-main
            • Split-plusargs
            • Vl-shell
            • Vl-json
          • Mlib
          • Transforms
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Vl-duperhs-alist

    Vl-duperhs-alist-equiv

    Basic equivalence relation for vl-duperhs-alist structures.

    Definitions and Theorems

    Function: vl-duperhs-alist-equiv$inline

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

    Theorem: vl-duperhs-alist-equiv-is-an-equivalence

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

    Theorem: vl-duperhs-alist-equiv-implies-equal-vl-duperhs-alist-fix-1

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

    Theorem: vl-duperhs-alist-fix-under-vl-duperhs-alist-equiv

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

    Theorem: equal-of-vl-duperhs-alist-fix-1-forward-to-vl-duperhs-alist-equiv

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

    Theorem: equal-of-vl-duperhs-alist-fix-2-forward-to-vl-duperhs-alist-equiv

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

    Theorem: vl-duperhs-alist-equiv-of-vl-duperhs-alist-fix-1-forward

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

    Theorem: vl-duperhs-alist-equiv-of-vl-duperhs-alist-fix-2-forward

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