• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Community
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
        • Primitives
        • Use-set
        • Syntax
        • Getting-started
        • Utilities
        • Loader
        • Transforms
        • Lint
        • Mlib
          • Scopestack
          • Filtering-by-name
          • Vl-namefactory
          • Substitution
          • Allexprs
          • Hid-tools
            • Following-hids
            • Vl-hidexpr-traverse-datatype
            • Abstract-hids
              • Vl-hidexpr-p
              • Vl-hidindex-p
              • Vl-hidexpr-collect-indices
              • Vl-hidindex->indices
              • Vl-hidexpr->rest
              • Vl-indexexpr->indices
              • Vl-hidexpr->first
                • Vl-indexexpr->scopeexpr
                • Vl-scopeexpr->scopes
                • Vl-hidname-p
                • Vl-hidexpr->endp
                • Vl-scopeexpr->hid
                • Vl-hidname->name
                • Vl-hidindex->name
                • Vl-hidindex-count-indices
                • Vl-scopeexpr-p
                • Vl-scopeatom->name
                • Vl-scopename-p
                • Vl-scopename-fix
                • Vl-indexexpr-p
                • Vl-fast-keyguts-p
                • Vl-scopeatom-p
                • Vl-scopenamelist
              • Vl-hidexpr-find-type
            • Vl-consteval
            • Range-tools
            • Lvalexprs
            • Hierarchy
            • Finding-by-name
            • Expr-tools
            • Expr-slicing
            • Stripping-functions
            • Stmt-tools
            • Modnamespace
            • Vl-parse-expr-from-str
            • Welltyped
            • Reordering-by-name
            • Flat-warnings
            • Genblob
            • Expr-building
            • Datatype-tools
            • Syscalls
            • Relocate
            • Expr-cleaning
            • Namemangle
            • Caremask
            • Port-tools
            • Lvalues
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Abstract-hids

    Vl-hidexpr->first

    Get the leftmost vl-hidindex-p in a hid expression.

    Signature
    (vl-hidexpr->first x) → first
    Arguments
    x — Guard (vl-expr-p x).
    Returns
    first — Type (and (vl-expr-p first) (implies (vl-hidexpr-p x) (vl-hidindex-p first))) .

    Examples:

    foo           --> foo
    foo.bar       --> foo
    foo[3].bar    --> foo[3]
    foo[3][4].bar --> foo[3][4]

    Definitions and Theorems

    Function: vl-hidexpr->first

    (defun vl-hidexpr->first (x)
      (declare (xargs :guard (vl-expr-p x)))
      (declare (xargs :guard (vl-hidexpr-p x)))
      (let ((__function__ 'vl-hidexpr->first))
        (declare (ignorable __function__))
        (if (and (not (vl-atom-p x))
                 (eq (vl-nonatom->op x) :vl-hid-dot))
            (first (vl-nonatom->args x))
          (vl-expr-fix x))))

    Theorem: return-type-of-vl-hidexpr->first

    (defthm return-type-of-vl-hidexpr->first
      (b* ((first (vl-hidexpr->first x)))
        (and (vl-expr-p first)
             (implies (vl-hidexpr-p x)
                      (vl-hidindex-p first))))
      :rule-classes :rewrite)

    Theorem: vl-hidexpr->first-of-vl-expr-fix-x

    (defthm vl-hidexpr->first-of-vl-expr-fix-x
      (equal (vl-hidexpr->first (vl-expr-fix x))
             (vl-hidexpr->first x)))

    Theorem: vl-hidexpr->first-vl-expr-equiv-congruence-on-x

    (defthm vl-hidexpr->first-vl-expr-equiv-congruence-on-x
      (implies (vl-expr-equiv x x-equiv)
               (equal (vl-hidexpr->first x)
                      (vl-hidexpr->first x-equiv)))
      :rule-classes :congruence)