• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • Proof-automation
      • Gl
      • Witness-cp
      • Ccg
      • Install-not-normalized
      • Rewrite$
      • Fgl
        • Fgl-rewrite-rules
          • Binder-functions
          • Fgl-syntactic-checker-binders
          • Fancy-ev
          • Backtraces
            • Interp-st-stack-backtrace-top
            • Backtrace
              • Backtrace-fix
              • Backtrace-frame
              • Backtrace-spec
              • Backtrace-equiv
                • Backtrace-p
                • Backtrace-frame-to-obj
                • Backtrace-speclist
              • Interp-st-stack-backtrace
              • Interp-st-stack-full-backtrace
              • Function-rules-to-backtrace-spec
              • Backtrace-to-obj
            • Binder
            • Annotate
            • Binder-rules
            • Def-fgl-program
            • Bind-var
            • Abort-current-rewrite
            • Add-fgl-brewrites
            • Def-fgl-rewrite
            • Narrow-equiv
            • Trigger-constraints
            • Def-fgl-branch-merge
            • Add-fgl-rewrites
            • Syntax-bind
            • Fgl-interp-obj
            • Fgl-hide
            • Collect-cmr-rewrites-for-formula-name
            • Fgl-time
            • Fgl-prog2
            • Assume
            • Add-fgl-binder-meta
            • Add-fgl-primitive
            • Add-fgl-meta
            • Add-fgl-branch-merges
            • Syntax-interp
            • Cmr::rewritelist->lhses
            • Remove-fgl-brewrites
            • Remove-fgl-branch-merges
            • Lhses->branch-function-syms
            • Enable-execution
            • Abort-rewrite
            • Remove-fgl-rewrites
            • Lhses->leading-function-syms
            • Remove-fgl-primitive
            • Remove-fgl-binder-meta
            • If!
            • Disable-execution
            • Remove-fgl-meta
            • Fgl-time-fn
            • Disable-definition
            • Def-fgl-brewrite
          • Fgl-function-mode
          • Fgl-object
          • Fgl-solving
          • Fgl-handling-if-then-elses
          • Fgl-counterexamples
          • Fgl-getting-bits-from-objects
          • Fgl-primitive-and-meta-rules
          • Fgl-interpreter-overview
          • Fgl-correctness-of-binding-free-variables
          • Fgl-debugging
          • Fgl-testbenches
          • Def-fgl-boolean-constraint
          • Fgl-stack
          • Def-fgl-param-thm
          • Fgl-rewrite-tracing
          • Def-fgl-thm
          • Fgl-fast-alist-support
          • Fgl-array-support
          • Advanced-equivalence-checking-with-fgl
          • Fgl-fty-support
          • Fgl-internals
        • Removable-runes
        • Efficiency
        • Rewrite-bounds
        • Bash
        • Def-dag-measure
        • Bdd
        • Remove-hyps
        • Contextual-rewriting
        • Simp
        • Rewrite$-hyps
        • Bash-term-to-dnf
        • Use-trivial-ancestors-check
        • Minimal-runes
        • Clause-processor-tools
        • Fn-is-body
        • Without-subsumption
        • Rewrite-equiv-hint
        • Def-bounds
        • Rewrite$-context
        • Try-gl-concls
        • Hint-utils
      • Macro-libraries
      • ACL2
      • Interfacing-tools
      • Hardware-verification
      • Software-verification
      • Math
      • Testing-utilities
    • Backtrace

    Backtrace-equiv

    Basic equivalence relation for backtrace structures.

    Definitions and Theorems

    Function: backtrace-equiv$inline

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

    Theorem: backtrace-equiv-is-an-equivalence

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

    Theorem: backtrace-equiv-implies-equal-backtrace-fix-1

    (defthm backtrace-equiv-implies-equal-backtrace-fix-1
      (implies (backtrace-equiv x x-equiv)
               (equal (backtrace-fix x)
                      (backtrace-fix x-equiv)))
      :rule-classes (:congruence))

    Theorem: backtrace-fix-under-backtrace-equiv

    (defthm backtrace-fix-under-backtrace-equiv
      (backtrace-equiv (backtrace-fix x) x)
      :rule-classes (:rewrite :rewrite-quoted-constant))

    Theorem: equal-of-backtrace-fix-1-forward-to-backtrace-equiv

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

    Theorem: equal-of-backtrace-fix-2-forward-to-backtrace-equiv

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

    Theorem: backtrace-equiv-of-backtrace-fix-1-forward

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

    Theorem: backtrace-equiv-of-backtrace-fix-2-forward

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