• 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-follow-hidexpr-dimscheck-aux
              • 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
    • Vl-follow-hidexpr-dimscheck

    Vl-follow-hidexpr-dimscheck-aux

    Main loop to check each index/dimension pair.

    Signature
    (vl-follow-hidexpr-dimscheck-aux name indices dims &key strictp) 
      → 
    err
    Arguments
    name — Guard (stringp name).
    indices — Guard (vl-exprlist-p indices).
    dims — Guard (vl-dimensionlist-p dims).
    strictp — Guard (booleanp strictp).
    Returns
    err — Type (iff (vl-msg-p err) err).

    Definitions and Theorems

    Function: vl-follow-hidexpr-dimscheck-aux-fn

    (defun vl-follow-hidexpr-dimscheck-aux-fn
           (name indices dims strictp)
      (declare (xargs :guard (and (stringp name)
                                  (vl-exprlist-p indices)
                                  (vl-dimensionlist-p dims)
                                  (booleanp strictp))))
      (declare (xargs :guard (same-lengthp indices dims)))
      (let ((__function__ 'vl-follow-hidexpr-dimscheck-aux))
        (declare (ignorable __function__))
        (if (atom indices)
            nil
          (or (vl-follow-hidexpr-dimcheck name (car indices)
                                          (car dims)
                                          :strictp strictp)
              (vl-follow-hidexpr-dimscheck-aux name (cdr indices)
                                               (cdr dims)
                                               :strictp strictp)))))

    Theorem: return-type-of-vl-follow-hidexpr-dimscheck-aux

    (defthm return-type-of-vl-follow-hidexpr-dimscheck-aux
     (b*
      ((err
        (vl-follow-hidexpr-dimscheck-aux-fn name indices dims strictp)))
      (iff (vl-msg-p err) err))
     :rule-classes :rewrite)

    Theorem: vl-follow-hidexpr-dimscheck-aux-fn-of-str-fix-name

    (defthm vl-follow-hidexpr-dimscheck-aux-fn-of-str-fix-name
     (equal
        (vl-follow-hidexpr-dimscheck-aux-fn (str-fix name)
                                            indices dims strictp)
        (vl-follow-hidexpr-dimscheck-aux-fn name indices dims strictp)))

    Theorem: vl-follow-hidexpr-dimscheck-aux-fn-streqv-congruence-on-name

    (defthm vl-follow-hidexpr-dimscheck-aux-fn-streqv-congruence-on-name
     (implies
      (streqv name name-equiv)
      (equal
          (vl-follow-hidexpr-dimscheck-aux-fn name indices dims strictp)
          (vl-follow-hidexpr-dimscheck-aux-fn
               name-equiv indices dims strictp)))
     :rule-classes :congruence)

    Theorem: vl-follow-hidexpr-dimscheck-aux-fn-of-vl-exprlist-fix-indices

    (defthm
          vl-follow-hidexpr-dimscheck-aux-fn-of-vl-exprlist-fix-indices
     (equal
      (vl-follow-hidexpr-dimscheck-aux-fn name (vl-exprlist-fix indices)
                                          dims strictp)
      (vl-follow-hidexpr-dimscheck-aux-fn name indices dims strictp)))

    Theorem: vl-follow-hidexpr-dimscheck-aux-fn-vl-exprlist-equiv-congruence-on-indices

    (defthm
     vl-follow-hidexpr-dimscheck-aux-fn-vl-exprlist-equiv-congruence-on-indices
     (implies
      (vl-exprlist-equiv indices indices-equiv)
      (equal
          (vl-follow-hidexpr-dimscheck-aux-fn name indices dims strictp)
          (vl-follow-hidexpr-dimscheck-aux-fn
               name indices-equiv dims strictp)))
     :rule-classes :congruence)

    Theorem: vl-follow-hidexpr-dimscheck-aux-fn-of-vl-dimensionlist-fix-dims

    (defthm
        vl-follow-hidexpr-dimscheck-aux-fn-of-vl-dimensionlist-fix-dims
     (equal
        (vl-follow-hidexpr-dimscheck-aux-fn
             name indices (vl-dimensionlist-fix dims)
             strictp)
        (vl-follow-hidexpr-dimscheck-aux-fn name indices dims strictp)))

    Theorem: vl-follow-hidexpr-dimscheck-aux-fn-vl-dimensionlist-equiv-congruence-on-dims

    (defthm
     vl-follow-hidexpr-dimscheck-aux-fn-vl-dimensionlist-equiv-congruence-on-dims
     (implies
      (vl-dimensionlist-equiv dims dims-equiv)
      (equal
          (vl-follow-hidexpr-dimscheck-aux-fn name indices dims strictp)
          (vl-follow-hidexpr-dimscheck-aux-fn
               name indices dims-equiv strictp)))
     :rule-classes :congruence)

    Theorem: vl-follow-hidexpr-dimscheck-aux-fn-of-bool-fix-strictp

    (defthm vl-follow-hidexpr-dimscheck-aux-fn-of-bool-fix-strictp
     (equal
        (vl-follow-hidexpr-dimscheck-aux-fn
             name
             indices dims (acl2::bool-fix strictp))
        (vl-follow-hidexpr-dimscheck-aux-fn name indices dims strictp)))

    Theorem: vl-follow-hidexpr-dimscheck-aux-fn-iff-congruence-on-strictp

    (defthm vl-follow-hidexpr-dimscheck-aux-fn-iff-congruence-on-strictp
     (implies
      (iff strictp strictp-equiv)
      (equal
          (vl-follow-hidexpr-dimscheck-aux-fn name indices dims strictp)
          (vl-follow-hidexpr-dimscheck-aux-fn
               name indices dims strictp-equiv)))
     :rule-classes :congruence)