• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Std
    • Community
    • Proof-automation
    • ACL2
    • Macro-libraries
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
        • Warnings
          • Vl-warninglist->types
          • Vl-warning
          • Propagating-errors
          • Vl-reportcard
            • Vl-reportcard-p
            • Vl-apply-reportcard
            • Vl-reportcard-fix
            • Vl-extend-reportcard-list
            • Vl-design-origname-reportcard
            • Vl-design-reportcard
            • Vl-extend-reportcard
            • Vl-reportcard-revive-invalid-warnings
            • Vl-clean-reportcard
              • Vl-clean-reportcard-aux
              • Vl-reportcard-equiv
              • Vl-print-reportcard
              • Vl-reportcard-to-string
              • Vl-keep-from-reportcard
              • Vl-reportcard-types
              • Vl-reportcardkey-p
            • Vl-warning-sort
            • Lint-warning-suppression
            • Clean-warnings
            • Warn
            • Vl-print-warnings-with-header
            • Vl-some-warning-fatalp
            • Vl-print-warnings-with-named-header
            • Flat-warnings
            • Vl-remove-warnings
            • Vl-keep-warnings
            • Vl-print-warnings
            • Vl-some-warning-of-type-p
            • Vl-clean-warnings
            • Vl-warnings-to-string
            • Vl-warninglist
            • Vl-print-warning
            • Ok
            • Vl-trace-warnings
            • Fatal
          • Primitives
          • Use-set
          • Syntax
          • Getting-started
          • Utilities
          • Loader
          • Transforms
          • Lint
          • Mlib
          • Server
          • Kit
          • Printer
          • Esim-vl
          • Well-formedness
        • Sv
        • Fgl
        • Vwsim
        • Vl
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Vl-clean-reportcard

    Vl-clean-reportcard-aux

    Assumes X has already been shrunk, so we may safely recur down it.

    Signature
    (vl-clean-reportcard-aux x acc) → acc
    Arguments
    x — Guard (vl-reportcard-p x).
    acc — Guard (vl-reportcard-p acc).
    Returns
    acc — Type (vl-reportcard-p acc).

    Definitions and Theorems

    Function: vl-clean-reportcard-aux

    (defun vl-clean-reportcard-aux (x acc)
      (declare (xargs :guard (and (vl-reportcard-p x)
                                  (vl-reportcard-p acc))))
      (let ((__function__ 'vl-clean-reportcard-aux))
        (declare (ignorable __function__))
        (b* ((x (vl-reportcard-fix x))
             ((when (atom x))
              (vl-reportcard-fix acc))
             ((cons name warnings) (car x))
             (warnings (vl-clean-warnings warnings))
             (acc (if (atom warnings)
                      acc
                    (hons-acons name warnings acc))))
          (vl-clean-reportcard-aux (cdr x) acc))))

    Theorem: vl-reportcard-p-of-vl-clean-reportcard-aux

    (defthm vl-reportcard-p-of-vl-clean-reportcard-aux
      (b* ((acc (vl-clean-reportcard-aux x acc)))
        (vl-reportcard-p acc))
      :rule-classes :rewrite)

    Theorem: vl-clean-reportcard-aux-of-vl-reportcard-fix-x

    (defthm vl-clean-reportcard-aux-of-vl-reportcard-fix-x
      (equal (vl-clean-reportcard-aux (vl-reportcard-fix x)
                                      acc)
             (vl-clean-reportcard-aux x acc)))

    Theorem: vl-clean-reportcard-aux-vl-reportcard-equiv-congruence-on-x

    (defthm vl-clean-reportcard-aux-vl-reportcard-equiv-congruence-on-x
      (implies (vl-reportcard-equiv x x-equiv)
               (equal (vl-clean-reportcard-aux x acc)
                      (vl-clean-reportcard-aux x-equiv acc)))
      :rule-classes :congruence)

    Theorem: vl-clean-reportcard-aux-of-vl-reportcard-fix-acc

    (defthm vl-clean-reportcard-aux-of-vl-reportcard-fix-acc
      (equal (vl-clean-reportcard-aux x (vl-reportcard-fix acc))
             (vl-clean-reportcard-aux x acc)))

    Theorem: vl-clean-reportcard-aux-vl-reportcard-equiv-congruence-on-acc

    (defthm
          vl-clean-reportcard-aux-vl-reportcard-equiv-congruence-on-acc
      (implies (vl-reportcard-equiv acc acc-equiv)
               (equal (vl-clean-reportcard-aux x acc)
                      (vl-clean-reportcard-aux x acc-equiv)))
      :rule-classes :congruence)