• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • 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-repeateventcontrol-weirdint-elim
            • Vl-maybe-delayoreventcontrol-weirdint-elim
            • Vl-module-add-x/z-wire
            • Vl-delayoreventcontrol-weirdint-elim
            • Vl-plainarglist-weirdint-elim
            • Vl-namedarglist-weirdint-elim
            • Vl-modinstlist-weirdint-elim
            • Vl-initiallist-weirdint-elim
            • Vl-gateinstlist-weirdint-elim
            • Vl-eventcontrol-weirdint-elim
            • Vl-delaycontrol-weirdint-elim
            • Vl-arguments-weirdint-elim
            • Vl-evatomlist-weirdint-elim
            • Vl-assignlist-weirdint-elim
            • Vl-alwayslist-weirdint-elim
            • Vl-plainarg-weirdint-elim
            • Vl-namedarg-weirdint-elim
            • Vl-module-weirdint-elim
            • Vl-gateinst-weirdint-elim
            • Vl-assign-weirdint-elim
            • Vl-modinst-weirdint-elim
              • Vl-maybe-expr-weirdint-elim
              • Vl-initial-weirdint-elim
              • Vl-evatom-weirdint-elim
              • Vl-always-weirdint-elim
              • Vl-weirdint-to-concat
              • Vl-weirdint-bits-to-exprs
              • Vl-modulelist-weirdint-elim-aux
              • Vl-modulelist-weirdint-elim
              • Vl-design-weirdint-elim
              • *vl-z-wire-expr*
              • *vl-x-wire-expr*
            • Vl-delta
            • Replicate-insts
            • Rangeresolve
            • Propagate
            • Clean-selects
            • Clean-params
            • 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
    • Weirdint-elim

    Vl-modinst-weirdint-elim

    Signature
    (vl-modinst-weirdint-elim x warnings) 
      → 
    (mv warnings changedp x-prime)
    Arguments
    x — Guard (vl-modinst-p x).
    warnings — Guard (vl-warninglist-p warnings).
    Returns
    warnings — Type (vl-warninglist-p warnings).
    changedp — Type (booleanp changedp).
    x-prime — Type (vl-modinst-p x-prime).

    Definitions and Theorems

    Function: vl-modinst-weirdint-elim

    (defun vl-modinst-weirdint-elim (x warnings)
     (declare (xargs :guard (and (vl-modinst-p x)
                                 (vl-warninglist-p warnings))))
     (let ((__function__ 'vl-modinst-weirdint-elim))
      (declare (ignorable __function__))
      (b* ((x (vl-modinst-fix x)))
        (b*
         (((mv warnings args-changedp args-prime)
           (vl-arguments-weirdint-elim (vl-modinst->portargs x)
                                       warnings))
          (changedp args-changedp)
          (x-prime (if changedp (change-vl-modinst x
                                                   :portargs args-prime)
                     x)))
         (mv warnings changedp x-prime)))))

    Theorem: vl-warninglist-p-of-vl-modinst-weirdint-elim.warnings

    (defthm vl-warninglist-p-of-vl-modinst-weirdint-elim.warnings
      (b* (((mv ?warnings ?changedp ?x-prime)
            (vl-modinst-weirdint-elim x warnings)))
        (vl-warninglist-p warnings))
      :rule-classes :rewrite)

    Theorem: booleanp-of-vl-modinst-weirdint-elim.changedp

    (defthm booleanp-of-vl-modinst-weirdint-elim.changedp
      (b* (((mv ?warnings ?changedp ?x-prime)
            (vl-modinst-weirdint-elim x warnings)))
        (booleanp changedp))
      :rule-classes :type-prescription)

    Theorem: vl-modinst-p-of-vl-modinst-weirdint-elim.x-prime

    (defthm vl-modinst-p-of-vl-modinst-weirdint-elim.x-prime
      (b* (((mv ?warnings ?changedp ?x-prime)
            (vl-modinst-weirdint-elim x warnings)))
        (vl-modinst-p x-prime))
      :rule-classes :rewrite)

    Theorem: vl-modinst-weirdint-elim-of-vl-modinst-fix-x

    (defthm vl-modinst-weirdint-elim-of-vl-modinst-fix-x
      (equal (vl-modinst-weirdint-elim (vl-modinst-fix x)
                                       warnings)
             (vl-modinst-weirdint-elim x warnings)))

    Theorem: vl-modinst-weirdint-elim-vl-modinst-equiv-congruence-on-x

    (defthm vl-modinst-weirdint-elim-vl-modinst-equiv-congruence-on-x
      (implies (vl-modinst-equiv x x-equiv)
               (equal (vl-modinst-weirdint-elim x warnings)
                      (vl-modinst-weirdint-elim x-equiv warnings)))
      :rule-classes :congruence)

    Theorem: vl-modinst-weirdint-elim-of-vl-warninglist-fix-warnings

    (defthm vl-modinst-weirdint-elim-of-vl-warninglist-fix-warnings
      (equal (vl-modinst-weirdint-elim x (vl-warninglist-fix warnings))
             (vl-modinst-weirdint-elim x warnings)))

    Theorem: vl-modinst-weirdint-elim-vl-warninglist-equiv-congruence-on-warnings

    (defthm
     vl-modinst-weirdint-elim-vl-warninglist-equiv-congruence-on-warnings
     (implies (vl-warninglist-equiv warnings warnings-equiv)
              (equal (vl-modinst-weirdint-elim x warnings)
                     (vl-modinst-weirdint-elim x warnings-equiv)))
     :rule-classes :congruence)