• Top
    • Documentation
    • Books
    • Recursion-and-induction
    • Boolean-reasoning
    • Debugging
    • Projects
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
        • Primitives
        • Use-set
          • Typo-detection
          • Vl-wireinfo-alistp
          • Vl-annotate-vardecllist-with-wireinfo
          • Vl-useset-report-entry-p
          • Vl-print-useset-report-entry
          • Vl-mark-wires-for-module
          • Vl-split-useset-report
          • Vl-annotate-vardecl-with-wireinfo
          • Vl-mark-wires-for-modinstlist
          • Vl-mark-wires-for-modinst
          • Vl-mark-wires-for-gateinstlist
          • Vl-mark-wires-for-gateinst
          • Vl-mark-wires-for-plainarg
          • Vl-wireinfo-p
          • Vl-mark-wires-for-modulelist
          • Vl-vardecllist-impexp-names
          • Vl-report-totals
          • Vl-mark-wires-for-plainarglist
            • Vl-collect-unused-or-unset-wires
            • Vl-clean-up-warning-wires
            • Vl-print-useset-report-top
            • Vl-mark-wires-for-arguments
            • Vl-useset-report-p
            • Vl-star-names-of-warning-wires
            • Vl-design-use-set-report
            • Vl-module-impexp-names
            • Vl-make-initial-wireinfo-alist
            • Vl-mark-wire-used
            • Vl-mark-wire-set
            • Vl-mark-wires-used
            • Vl-mark-wires-for-assignment
            • Vl-mark-wires-for-assignlist
            • Vl-mark-wires-set
            • Vl-print-useset-report-full-aux
            • Vl-print-typo-alist
            • Vl-print-typo-possibilities
          • Syntax
          • Getting-started
          • Utilities
          • Loader
          • Transforms
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Vwsim
        • Fgl
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Testing-utilities
      • Math
    • Use-set

    Vl-mark-wires-for-plainarglist

    Signature
    (vl-mark-wires-for-plainarglist x alist warning-wires) 
      → 
    (mv new-alist warning-wires)
    Arguments
    x — Guard (vl-plainarglist-p x).
    alist — Guard (vl-wireinfo-alistp alist).
    warning-wires — Guard (string-listp warning-wires).
    Returns
    new-alist — Type (vl-wireinfo-alistp new-alist), given the guard.
    warning-wires — Type (string-listp warning-wires), given the guard.

    Definitions and Theorems

    Function: vl-mark-wires-for-plainarglist

    (defun vl-mark-wires-for-plainarglist (x alist warning-wires)
      (declare (xargs :guard (and (vl-plainarglist-p x)
                                  (vl-wireinfo-alistp alist)
                                  (string-listp warning-wires))))
      (let ((__function__ 'vl-mark-wires-for-plainarglist))
        (declare (ignorable __function__))
        (b* (((when (atom x))
              (mv alist warning-wires))
             ((mv alist warning-wires)
              (vl-mark-wires-for-plainarg (car x)
                                          alist warning-wires)))
          (vl-mark-wires-for-plainarglist (cdr x)
                                          alist warning-wires))))

    Theorem: vl-wireinfo-alistp-of-vl-mark-wires-for-plainarglist.new-alist

    (defthm
         vl-wireinfo-alistp-of-vl-mark-wires-for-plainarglist.new-alist
     (implies
          (and (force (vl-plainarglist-p x))
               (force (vl-wireinfo-alistp alist))
               (force (string-listp warning-wires)))
          (b* (((mv ?new-alist ?warning-wires)
                (vl-mark-wires-for-plainarglist x alist warning-wires)))
            (vl-wireinfo-alistp new-alist)))
     :rule-classes :rewrite)

    Theorem: string-listp-of-vl-mark-wires-for-plainarglist.warning-wires

    (defthm string-listp-of-vl-mark-wires-for-plainarglist.warning-wires
     (implies
          (and (force (vl-plainarglist-p x))
               (force (vl-wireinfo-alistp alist))
               (force (string-listp warning-wires)))
          (b* (((mv ?new-alist ?warning-wires)
                (vl-mark-wires-for-plainarglist x alist warning-wires)))
            (string-listp warning-wires)))
     :rule-classes :rewrite)