• 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
        • Mlib
          • Scopestack
          • Hid-tools
            • Vl-follow-hidexpr
            • Vl-index-expr-typetrace
            • Vl-follow-scopeexpr
            • Vl-follow-hidexpr-dimscheck
            • Vl-datatype-resolve-selects
            • Vl-datatype-remove-dim
            • Vl-operandinfo
            • Vl-follow-hidexpr-dimcheck
            • Vl-follow-data-selects
            • Vl-follow-hidexpr-error
            • Vl-hidstep
            • Vl-scopestack-find-item/ss/path
            • Vl-follow-array-indices
            • Vl-scopecontext
            • Vl-datatype-set-unsigned
            • Vl-selstep
            • Vl-scopestack-find-elabpath
              • Vl-hid-prefix-for-subhid
              • Vl-find-structmember
              • Vl-select
              • Vl-scopeexpr-replace-hid
              • Vl-genblocklist-find-block
              • Vl-partselect-width
              • Vl-seltrace->indices
              • Vl-datatype->structmembers
              • Vl-hidexpr-resolved-p
              • Vl-operandinfo->indices
              • Vl-flatten-hidindex
              • Vl-subhid-p
              • Vl-seltrace-usertypes-ok
              • Vl-flatten-hidexpr
              • Vl-scopeexpr->hid
              • Vl-seltrace-index-count
              • Vl-operandinfo-usertypes-ok
              • Vl-operandinfo-index-count
              • Vl-datatype-dims-count
              • Vl-scopeexpr-index-count
              • Vl-hidexpr-index-count
              • Vl-usertype-lookup
              • Vl-hidindex-resolved-p
              • Vl-scopeexpr-resolved-p
              • Vl-selstep-usertypes-ok
              • Vl-hidtrace
              • Vl-seltrace
              • Vl-scopedef-interface-p
            • Filtering-by-name
            • Vl-interface-mocktype
            • Stripping-functions
            • Genblob
            • Expr-tools
            • Extract-vl-types
            • Hierarchy
            • Range-tools
            • Finding-by-name
            • Stmt-tools
            • Modnamespace
            • Flat-warnings
            • Reordering-by-name
            • Datatype-tools
            • Syscalls
            • Allexprs
            • Lvalues
            • Port-tools
          • Transforms
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Hid-tools

    Vl-scopestack-find-elabpath

    Signature
    (vl-scopestack-find-elabpath ss context-ss pkg-name) 
      → 
    elabpath
    Arguments
    ss — Guard (vl-scopestack-p ss).
    context-ss — Guard (vl-scopestack-p context-ss).
    pkg-name — Guard (maybe-stringp pkg-name).
    Returns
    elabpath — Type (vl-elabtraversal-p elabpath).

    Definitions and Theorems

    Function: vl-scopestack-find-elabpath

    (defun vl-scopestack-find-elabpath (ss context-ss pkg-name)
     (declare (xargs :guard (and (vl-scopestack-p ss)
                                 (vl-scopestack-p context-ss)
                                 (maybe-stringp pkg-name))))
     (declare (xargs :guard (<= (vl-scopestack-nesting-level context-ss)
                                (vl-scopestack-nesting-level ss))))
     (let ((__function__ 'vl-scopestack-find-elabpath))
      (declare (ignorable __function__))
      (if pkg-name
       (list
           (vl-elabinstruction-push-named (vl-elabkey-package pkg-name))
           (vl-elabinstruction-root))
       (b* ((levels-up (- (vl-scopestack-nesting-level ss)
                          (vl-scopestack-nesting-level context-ss))))
         (list (vl-elabinstruction-pop levels-up))))))

    Theorem: vl-elabtraversal-p-of-vl-scopestack-find-elabpath

    (defthm vl-elabtraversal-p-of-vl-scopestack-find-elabpath
      (b*
       ((elabpath (vl-scopestack-find-elabpath ss context-ss pkg-name)))
       (vl-elabtraversal-p elabpath))
      :rule-classes :rewrite)

    Theorem: vl-scopestack-find-elabpath-of-vl-scopestack-fix-ss

    (defthm vl-scopestack-find-elabpath-of-vl-scopestack-fix-ss
      (equal (vl-scopestack-find-elabpath (vl-scopestack-fix ss)
                                          context-ss pkg-name)
             (vl-scopestack-find-elabpath ss context-ss pkg-name)))

    Theorem: vl-scopestack-find-elabpath-vl-scopestack-equiv-congruence-on-ss

    (defthm
       vl-scopestack-find-elabpath-vl-scopestack-equiv-congruence-on-ss
     (implies
       (vl-scopestack-equiv ss ss-equiv)
       (equal
            (vl-scopestack-find-elabpath ss context-ss pkg-name)
            (vl-scopestack-find-elabpath ss-equiv context-ss pkg-name)))
     :rule-classes :congruence)

    Theorem: vl-scopestack-find-elabpath-of-vl-scopestack-fix-context-ss

    (defthm vl-scopestack-find-elabpath-of-vl-scopestack-fix-context-ss
     (equal
          (vl-scopestack-find-elabpath ss (vl-scopestack-fix context-ss)
                                       pkg-name)
          (vl-scopestack-find-elabpath ss context-ss pkg-name)))

    Theorem: vl-scopestack-find-elabpath-vl-scopestack-equiv-congruence-on-context-ss

    (defthm
     vl-scopestack-find-elabpath-vl-scopestack-equiv-congruence-on-context-ss
     (implies
       (vl-scopestack-equiv context-ss context-ss-equiv)
       (equal
            (vl-scopestack-find-elabpath ss context-ss pkg-name)
            (vl-scopestack-find-elabpath ss context-ss-equiv pkg-name)))
     :rule-classes :congruence)

    Theorem: vl-scopestack-find-elabpath-of-maybe-string-fix-pkg-name

    (defthm vl-scopestack-find-elabpath-of-maybe-string-fix-pkg-name
      (equal (vl-scopestack-find-elabpath
                  ss
                  context-ss (maybe-string-fix pkg-name))
             (vl-scopestack-find-elabpath ss context-ss pkg-name)))

    Theorem: vl-scopestack-find-elabpath-maybe-string-equiv-congruence-on-pkg-name

    (defthm
     vl-scopestack-find-elabpath-maybe-string-equiv-congruence-on-pkg-name
     (implies
       (maybe-string-equiv pkg-name pkg-name-equiv)
       (equal
            (vl-scopestack-find-elabpath ss context-ss pkg-name)
            (vl-scopestack-find-elabpath ss context-ss pkg-name-equiv)))
     :rule-classes :congruence)