• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • 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
            • Vl-casezx-stmt-elim
            • Vl-casezx-matchexpr
            • Vl-modulelist-caseelim
            • Vl-casezx-match-any-expr
            • Vl-casestmt-elim
            • Vl-casestmt-size-warnings
            • Vl-casezx-elim-aux
            • Vl-stmt-caseelim
            • Case-statement-problems
            • Vl-casestmt-compare-expr
            • Vl-initiallist-caseelim
            • Vl-alwayslist-caseelim
            • Vl-casestmt-elim-aux
            • Vl-initial-caseelim
            • Vl-always-caseelim
              • Vl-casestmt-sizes-agreep
              • Vl-module-caseelim
              • Vl-design-caseelim
            • Split
            • Selresolve
            • Weirdint-elim
            • 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
    • Caseelim

    Vl-always-caseelim

    Signature
    (vl-always-caseelim x warnings ss) → (mv warnings new-x)
    Arguments
    x — Guard (vl-always-p x).
    warnings — Guard (vl-warninglist-p warnings).
    ss — Guard (vl-scopestack-p ss).
    Returns
    warnings — Type (vl-warninglist-p warnings).
    new-x — Type (vl-always-p new-x).

    Definitions and Theorems

    Function: vl-always-caseelim

    (defun vl-always-caseelim (x warnings ss)
      (declare (xargs :guard (and (vl-always-p x)
                                  (vl-warninglist-p warnings)
                                  (vl-scopestack-p ss))))
      (let ((__function__ 'vl-always-caseelim))
        (declare (ignorable __function__))
        (b* ((x (vl-always-fix x))
             ((mv warnings stmt)
              (vl-stmt-caseelim (vl-always->stmt x)
                                x warnings ss))
             (x-prime (change-vl-always x :stmt stmt)))
          (mv warnings x-prime))))

    Theorem: vl-warninglist-p-of-vl-always-caseelim.warnings

    (defthm vl-warninglist-p-of-vl-always-caseelim.warnings
      (b* (((mv ?warnings ?new-x)
            (vl-always-caseelim x warnings ss)))
        (vl-warninglist-p warnings))
      :rule-classes :rewrite)

    Theorem: vl-always-p-of-vl-always-caseelim.new-x

    (defthm vl-always-p-of-vl-always-caseelim.new-x
      (b* (((mv ?warnings ?new-x)
            (vl-always-caseelim x warnings ss)))
        (vl-always-p new-x))
      :rule-classes :rewrite)

    Theorem: vl-always-caseelim-of-vl-always-fix-x

    (defthm vl-always-caseelim-of-vl-always-fix-x
      (equal (vl-always-caseelim (vl-always-fix x)
                                 warnings ss)
             (vl-always-caseelim x warnings ss)))

    Theorem: vl-always-caseelim-vl-always-equiv-congruence-on-x

    (defthm vl-always-caseelim-vl-always-equiv-congruence-on-x
      (implies (vl-always-equiv x x-equiv)
               (equal (vl-always-caseelim x warnings ss)
                      (vl-always-caseelim x-equiv warnings ss)))
      :rule-classes :congruence)

    Theorem: vl-always-caseelim-of-vl-warninglist-fix-warnings

    (defthm vl-always-caseelim-of-vl-warninglist-fix-warnings
      (equal (vl-always-caseelim x (vl-warninglist-fix warnings)
                                 ss)
             (vl-always-caseelim x warnings ss)))

    Theorem: vl-always-caseelim-vl-warninglist-equiv-congruence-on-warnings

    (defthm
         vl-always-caseelim-vl-warninglist-equiv-congruence-on-warnings
      (implies (vl-warninglist-equiv warnings warnings-equiv)
               (equal (vl-always-caseelim x warnings ss)
                      (vl-always-caseelim x warnings-equiv ss)))
      :rule-classes :congruence)

    Theorem: vl-always-caseelim-of-vl-scopestack-fix-ss

    (defthm vl-always-caseelim-of-vl-scopestack-fix-ss
      (equal (vl-always-caseelim x warnings (vl-scopestack-fix ss))
             (vl-always-caseelim x warnings ss)))

    Theorem: vl-always-caseelim-vl-scopestack-equiv-congruence-on-ss

    (defthm vl-always-caseelim-vl-scopestack-equiv-congruence-on-ss
      (implies (vl-scopestack-equiv ss ss-equiv)
               (equal (vl-always-caseelim x warnings ss)
                      (vl-always-caseelim x warnings ss-equiv)))
      :rule-classes :congruence)