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

    Path-kind

    Get the kind (tag) of a path structure.

    Signature
    (path-kind x) → kind
    Arguments
    x — Guard (path-p x).

    Definitions and Theorems

    Function: path-kind$inline

    (defun path-kind$inline (x)
      (declare (xargs :guard (path-p x)))
      (let ((__function__ 'path-kind))
        (declare (ignorable __function__))
        (cond ((or (atom x) (name-p x)) :wire)
              (t :scope))))

    Theorem: path-kind-possibilities

    (defthm path-kind-possibilities
     (or (equal (path-kind x) :wire)
         (equal (path-kind x) :scope))
     :rule-classes ((:forward-chaining :trigger-terms ((path-kind x)))))