• Top
  • Documentation
  • Books
  • Boolean-reasoning
  • Projects
  • Debugging
  • Std
  • Community
  • Proof-automation
  • Macro-libraries
  • ACL2
  • Interfacing-tools
  • Hardware-verification
    • Gl
    • Esim
    • Vl2014
    • Sv
    • Fgl
    • Vwsim
    • Vl
      • Syntax
      • Loader
      • Warnings
        • Lint-warning-suppression
        • Warning-basics
        • Vl-warning
        • Vl-warninglist-add-ctx
        • Vl-warninglist->types
        • Propagating-errors
        • Vl-reportcard
          • Vl-reportcard-p
          • Vl-apply-reportcard
          • Vl-reportcard-fix
          • Vl-extend-reportcard-list
          • Vl-design-reportcard
          • Vl-design-origname-reportcard
          • Vl-extend-reportcard
          • Vl-reportcard-revive-invalid-warnings
          • Vl-clean-reportcard
          • Vl-remove-from-reportcard
          • Vl-reportcard-equiv
          • Vl-print-reportcard
            • Vl-elide-warnings
            • Vl-print-reportcard-aux
          • Vl-keep-from-reportcard
          • Vl-reportcard-to-string
          • Vl-reportcard-types
          • Vl-reportcardkey-p
        • Vl-some-warning-fatalp
        • Clean-warnings
        • Lint-whole-file-suppression
        • Warn
        • Vl-warninglist
        • Vl-remove-warnings
        • Vl-keep-warnings
        • Flat-warnings
        • Vl-some-warning-of-type-p
        • Vl-msg
        • Vl-warning-add-ctx
        • Vl-print-warning
        • Vmsg-binary-concat
        • Ok
        • Vl-trace-warnings
        • Fatal
        • Vmsg
      • Getting-started
      • Utilities
      • Printer
      • Kit
      • Mlib
      • Transforms
    • X86isa
    • Svl
    • Rtl
  • Software-verification
  • Math
  • Testing-utilities

• Vl-print-reportcard

Vl-print-reportcard-aux

Signature

(vl-print-reportcard-aux x elide &key (ps 'ps)) → ps

Arguments

x — Guard (vl-reportcard-p x).

elide — Guard (maybe-natp elide).

Definitions and Theorems

Function: vl-print-reportcard-aux-fn

(defun vl-print-reportcard-aux-fn (x elide ps)
  (declare (xargs :stobjs (ps)))
  (declare (xargs :guard (and (vl-reportcard-p x)
                              (maybe-natp elide))))
  (let ((__function__ 'vl-print-reportcard-aux))
    (declare (ignorable __function__))
    (b* ((x (vl-reportcard-fix x))
         (elide (maybe-natp-fix elide))
         ((when (atom x)) ps)
         ((cons name warnings) (car x))
         ((unless warnings)
          (vl-print-reportcard-aux (cdr x)
                                   elide)))
      (vl-ps-seq (vl-print-warnings-with-named-header
                      (if (equal name :design)
                          "Design Root"
                        name)
                      (vl-elide-warnings warnings elide))
                 (vl-println "")
                 (vl-print-reportcard-aux (cdr x)
                                          elide)))))

Theorem: vl-print-reportcard-aux-fn-of-vl-reportcard-fix-x

(defthm vl-print-reportcard-aux-fn-of-vl-reportcard-fix-x
  (equal (vl-print-reportcard-aux-fn (vl-reportcard-fix x)
                                     elide ps)
         (vl-print-reportcard-aux-fn x elide ps)))

Theorem: vl-print-reportcard-aux-fn-vl-reportcard-equiv-congruence-on-x

(defthm
     vl-print-reportcard-aux-fn-vl-reportcard-equiv-congruence-on-x
  (implies (vl-reportcard-equiv x x-equiv)
           (equal (vl-print-reportcard-aux-fn x elide ps)
                  (vl-print-reportcard-aux-fn x-equiv elide ps)))
  :rule-classes :congruence)

Theorem: vl-print-reportcard-aux-fn-of-maybe-natp-fix-elide

(defthm vl-print-reportcard-aux-fn-of-maybe-natp-fix-elide
  (equal (vl-print-reportcard-aux-fn x (maybe-natp-fix elide)
                                     ps)
         (vl-print-reportcard-aux-fn x elide ps)))

Theorem: vl-print-reportcard-aux-fn-maybe-nat-equiv-congruence-on-elide

(defthm
     vl-print-reportcard-aux-fn-maybe-nat-equiv-congruence-on-elide
  (implies (acl2::maybe-nat-equiv elide elide-equiv)
           (equal (vl-print-reportcard-aux-fn x elide ps)
                  (vl-print-reportcard-aux-fn x elide-equiv ps)))
  :rule-classes :congruence)