• 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
          • Expression-sizing
          • Occform
          • Oprewrite
          • Expand-functions
          • Delayredux
          • Unparameterization
          • Caseelim
          • Split
          • Selresolve
          • Weirdint-elim
          • Vl-delta
          • Replicate-insts
          • Rangeresolve
          • Propagate
          • Clean-selects
          • Clean-params
          • Blankargs
            • Vl-modinst-plainarglist-blankargs
            • Vl-modulelist-blankargs
            • Vl-modinst-blankargs
            • Vl-gateinst-plainarglist-blankargs
            • Vl-modinstlist-blankargs
              • Vl-gateinstlist-blankargs
              • Vl-gateinst-blankargs
              • Vl-module-blankargs
              • Vl-design-blankargs
            • Inline-mods
            • Expr-simp
            • Trunc
            • Always-top
            • Gatesplit
            • Gate-elim
            • Expression-optimization
            • Elim-supplies
            • Wildelim
            • Drop-blankports
            • Clean-warnings
            • Addinstnames
            • Custom-transform-hooks
            • Annotate
            • Latchcode
            • Elim-unused-vars
            • Problem-modules
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Blankargs

    Vl-modinstlist-blankargs

    Extends vl-modinst-blankargs across a vl-modinstlist-p.

    Signature
    (vl-modinstlist-blankargs x ss nf warnings) 
      → 
    (mv warnings new-x vardecls nf)
    Arguments
    x — Guard (vl-modinstlist-p x).
    ss — Guard (vl-scopestack-p ss).
    nf — Guard (vl-namefactory-p nf).
    warnings — Guard (vl-warninglist-p warnings).
    Returns
    warnings — Type (vl-warninglist-p warnings).
    new-x — Type (vl-modinstlist-p new-x).
    vardecls — Type (vl-vardecllist-p vardecls).
    nf — Type (vl-namefactory-p nf).

    Definitions and Theorems

    Function: vl-modinstlist-blankargs

    (defun vl-modinstlist-blankargs (x ss nf warnings)
      (declare (xargs :guard (and (vl-modinstlist-p x)
                                  (vl-scopestack-p ss)
                                  (vl-namefactory-p nf)
                                  (vl-warninglist-p warnings))))
      (let ((__function__ 'vl-modinstlist-blankargs))
        (declare (ignorable __function__))
        (b* (((when (atom x))
              (mv (ok)
                  nil nil (vl-namefactory-fix nf)))
             ((mv warnings car-prime car-vardecls nf)
              (vl-modinst-blankargs (car x)
                                    ss nf warnings))
             ((mv warnings cdr-prime cdr-vardecls nf)
              (vl-modinstlist-blankargs (cdr x)
                                        ss nf warnings))
             (x-prime (cons car-prime cdr-prime))
             (vardecls (append car-vardecls cdr-vardecls)))
          (mv warnings x-prime vardecls nf))))

    Theorem: vl-warninglist-p-of-vl-modinstlist-blankargs.warnings

    (defthm vl-warninglist-p-of-vl-modinstlist-blankargs.warnings
      (b* (((mv ?warnings ?new-x ?vardecls ?nf)
            (vl-modinstlist-blankargs x ss nf warnings)))
        (vl-warninglist-p warnings))
      :rule-classes :rewrite)

    Theorem: vl-modinstlist-p-of-vl-modinstlist-blankargs.new-x

    (defthm vl-modinstlist-p-of-vl-modinstlist-blankargs.new-x
      (b* (((mv ?warnings ?new-x ?vardecls ?nf)
            (vl-modinstlist-blankargs x ss nf warnings)))
        (vl-modinstlist-p new-x))
      :rule-classes :rewrite)

    Theorem: vl-vardecllist-p-of-vl-modinstlist-blankargs.vardecls

    (defthm vl-vardecllist-p-of-vl-modinstlist-blankargs.vardecls
      (b* (((mv ?warnings ?new-x ?vardecls ?nf)
            (vl-modinstlist-blankargs x ss nf warnings)))
        (vl-vardecllist-p vardecls))
      :rule-classes :rewrite)

    Theorem: vl-namefactory-p-of-vl-modinstlist-blankargs.nf

    (defthm vl-namefactory-p-of-vl-modinstlist-blankargs.nf
      (b* (((mv ?warnings ?new-x ?vardecls ?nf)
            (vl-modinstlist-blankargs x ss nf warnings)))
        (vl-namefactory-p nf))
      :rule-classes :rewrite)

    Theorem: vl-modinstlist-blankargs-mvtypes-1

    (defthm vl-modinstlist-blankargs-mvtypes-1
      (true-listp (mv-nth 1
                          (vl-modinstlist-blankargs x ss nf warnings)))
      :rule-classes :type-prescription)

    Theorem: vl-modinstlist-blankargs-mvtypes-2

    (defthm vl-modinstlist-blankargs-mvtypes-2
      (true-listp (mv-nth 2
                          (vl-modinstlist-blankargs x ss nf warnings)))
      :rule-classes :type-prescription)

    Theorem: vl-modinstlist-blankargs-of-vl-modinstlist-fix-x

    (defthm vl-modinstlist-blankargs-of-vl-modinstlist-fix-x
      (equal (vl-modinstlist-blankargs (vl-modinstlist-fix x)
                                       ss nf warnings)
             (vl-modinstlist-blankargs x ss nf warnings)))

    Theorem: vl-modinstlist-blankargs-vl-modinstlist-equiv-congruence-on-x

    (defthm
          vl-modinstlist-blankargs-vl-modinstlist-equiv-congruence-on-x
     (implies (vl-modinstlist-equiv x x-equiv)
              (equal (vl-modinstlist-blankargs x ss nf warnings)
                     (vl-modinstlist-blankargs x-equiv ss nf warnings)))
     :rule-classes :congruence)

    Theorem: vl-modinstlist-blankargs-of-vl-scopestack-fix-ss

    (defthm vl-modinstlist-blankargs-of-vl-scopestack-fix-ss
      (equal (vl-modinstlist-blankargs x (vl-scopestack-fix ss)
                                       nf warnings)
             (vl-modinstlist-blankargs x ss nf warnings)))

    Theorem: vl-modinstlist-blankargs-vl-scopestack-equiv-congruence-on-ss

    (defthm
          vl-modinstlist-blankargs-vl-scopestack-equiv-congruence-on-ss
     (implies (vl-scopestack-equiv ss ss-equiv)
              (equal (vl-modinstlist-blankargs x ss nf warnings)
                     (vl-modinstlist-blankargs x ss-equiv nf warnings)))
     :rule-classes :congruence)

    Theorem: vl-modinstlist-blankargs-of-vl-namefactory-fix-nf

    (defthm vl-modinstlist-blankargs-of-vl-namefactory-fix-nf
      (equal (vl-modinstlist-blankargs x ss (vl-namefactory-fix nf)
                                       warnings)
             (vl-modinstlist-blankargs x ss nf warnings)))

    Theorem: vl-modinstlist-blankargs-vl-namefactory-equiv-congruence-on-nf

    (defthm
         vl-modinstlist-blankargs-vl-namefactory-equiv-congruence-on-nf
     (implies (vl-namefactory-equiv nf nf-equiv)
              (equal (vl-modinstlist-blankargs x ss nf warnings)
                     (vl-modinstlist-blankargs x ss nf-equiv warnings)))
     :rule-classes :congruence)

    Theorem: vl-modinstlist-blankargs-of-vl-warninglist-fix-warnings

    (defthm vl-modinstlist-blankargs-of-vl-warninglist-fix-warnings
     (equal
        (vl-modinstlist-blankargs x ss nf (vl-warninglist-fix warnings))
        (vl-modinstlist-blankargs x ss nf warnings)))

    Theorem: vl-modinstlist-blankargs-vl-warninglist-equiv-congruence-on-warnings

    (defthm
     vl-modinstlist-blankargs-vl-warninglist-equiv-congruence-on-warnings
     (implies (vl-warninglist-equiv warnings warnings-equiv)
              (equal (vl-modinstlist-blankargs x ss nf warnings)
                     (vl-modinstlist-blankargs x ss nf warnings-equiv)))
     :rule-classes :congruence)