• Top
    • Documentation
    • Books
    • Recursion-and-induction
    • Boolean-reasoning
    • Debugging
    • Projects
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
        • Svex-stvs
        • Svex-fixpoint-decomposition-methodology
        • Sv-versus-esim
        • Svex-decomp
        • Svex-compose-dfs
        • Moddb
        • Svex-compilation
        • Svmods
          • Address
          • Wire
          • Module
          • Lhs
          • Svar-add-namespace
          • Path
          • Design
          • Modinst
          • Lhs-add-namespace
          • Modalist
          • Path-add-namespace
            • Modname->submodnames
            • Name
            • Svex-alist-addr-p
            • Constraintlist-addr-p
            • Svar-map-addr-p
            • Lhspairs-addr-p
            • Assigns-addr-p
            • Modname
            • Lhs-addr-p
            • Lhatom-addr-p
            • Modhier-measure
            • Modhier-list-measure
            • Attributes
            • Modhier-list-measure-aux
            • Modhier-loopfreelist-p
            • Modhier-loopfree-p
          • Svstmt
          • Sv-tutorial
          • Expressions
          • Symbolic-test-vector
          • Vl-to-svex
        • Fgl
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Testing-utilities
      • Math
    • Svmods

    Path-add-namespace

    Signature
    (path-add-namespace namespace x) → *
    Arguments
    namespace — Guard (name-p namespace).
    x — Guard (path-p x).

    Definitions and Theorems

    Function: path-add-namespace$inline

    (defun path-add-namespace$inline (namespace x)
           (declare (xargs :guard (and (name-p namespace) (path-p x))))
           (let ((__function__ 'path-add-namespace))
                (declare (ignorable __function__))
                (make-path-scope :namespace namespace
                                 :subpath x)))

    Theorem: path-add-namespace$inline-of-name-fix-namespace

    (defthm path-add-namespace$inline-of-name-fix-namespace
            (equal (path-add-namespace$inline (name-fix namespace)
                                              x)
                   (path-add-namespace$inline namespace x)))

    Theorem: path-add-namespace$inline-name-equiv-congruence-on-namespace

    (defthm
         path-add-namespace$inline-name-equiv-congruence-on-namespace
         (implies (name-equiv namespace namespace-equiv)
                  (equal (path-add-namespace$inline namespace x)
                         (path-add-namespace$inline namespace-equiv x)))
         :rule-classes :congruence)

    Theorem: path-add-namespace$inline-of-path-fix-x

    (defthm path-add-namespace$inline-of-path-fix-x
            (equal (path-add-namespace$inline namespace (path-fix x))
                   (path-add-namespace$inline namespace x)))

    Theorem: path-add-namespace$inline-path-equiv-congruence-on-x

    (defthm
         path-add-namespace$inline-path-equiv-congruence-on-x
         (implies (path-equiv x x-equiv)
                  (equal (path-add-namespace$inline namespace x)
                         (path-add-namespace$inline namespace x-equiv)))
         :rule-classes :congruence)