• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • Community
    • Std
    • Proof-automation
    • Macro-libraries
    • ACL2
    • Interfacing-tools
    • Hardware-verification
      • Gl
      • Esim
      • Vl2014
      • Sv
      • Fgl
      • Vwsim
      • Vl
        • Syntax
        • Loader
        • Warnings
        • Getting-started
        • Utilities
        • Printer
        • Kit
          • Vl-lint
            • Vl-lintconfig-p
            • Condcheck
            • Lint-warning-suppression
            • Lucid
            • Lvaluecheck
            • Vl-interfacelist-alwaysstyle
            • Truncation-warnings
            • Vl-modulelist-alwaysstyle
            • Skip-detection
            • Vl-lint-report
            • Vl-lintresult
            • Vl::vl-design-sv-use-set
            • Oddexpr-check
            • Leftright-check
            • Duplicate-detect
            • Selfassigns
            • *vl-lint-help*
            • Arith-compare-check
            • Dupeinst-check
            • Qmarksize-check
            • Lint-whole-file-suppression
              • Vl-udplist-suppress-file-warnings
              • Vl-programlist-suppress-file-warnings
              • Vl-packagelist-suppress-file-warnings
              • Vl-modulelist-suppress-file-warnings
                • Vl-interfacelist-suppress-file-warnings
                • Vl-configlist-suppress-file-warnings
                • Vl-classlist-suppress-file-warnings
                • Vl-interface-suppress-file-warnings
                • Vl-program-suppress-file-warnings
                • Vl-package-suppress-file-warnings
                • Vl-filename-to-suppress-p-aux
                • Vl-module-suppress-file-warnings
                • Vl-config-suppress-file-warnings
                • Vl-class-suppress-file-warnings
                • Vl-udp-suppress-file-warnings
                • Vl-design-suppress-file-warnings
                • Vl-filename-to-suppress-p
              • Run-vl-lint-main
              • Logicassign
              • Run-vl-lint
              • Vl-print-certain-warnings
              • Duperhs-check
              • Vl-lint-top
              • Sd-filter-problems
              • Vl-modulelist-add-svbad-warnings
              • Vl-module-add-svbad-warnings
              • Check-case
              • Vl-lint-extra-actions
              • Drop-lint-stubs
              • Vl-lint-print-warnings
              • Drop-user-submodules
              • Check-namespace
              • Vl-lintconfig-loadconfig
              • Vl-lint-design->svex-modalist-wrapper
              • Vl-delete-sd-problems-for-modnames-aux
              • Vl-collect-new-names-from-orignames
              • Vl-lint-print-all-warnings
              • Vl-design-remove-unnecessary-modules
              • Vl-delete-sd-problems-for-modnames
              • Vl-always-check-style
              • Vl-vardecllist-svbad-warnings
              • Vl-vardecl-svbad-warnings
              • Vl-reportcard-remove-suppressed
              • Vl-reportcard-keep-suppressed
              • Vl-alwayslist-check-style
              • Vl-remove-nameless-descriptions
              • Vl-lint-apply-quiet
              • Vl-warninglist-remove-suppressed
              • Vl-warninglist-keep-suppressed
              • Vl-print-eliminated-descs
              • Vl-module-alwaysstyle
              • Vl-jp-reportcard-aux
              • Vl-interface-alwaysstyle
              • Vl-design-alwaysstyle
              • Vl-jp-description-locations
              • Vl-jp-reportcard
              • Vl-pp-stringlist-lines
              • Vl-jp-design-locations
              • Vl-datatype-svbad-p
              • Unpacked-range-check
              • Sd-problem-major-p
              • Vl-alwaysstyle
            • Vl-server
            • Vl-gather
            • Vl-zip
            • Vl-main
            • Split-plusargs
            • Vl-shell
            • Vl-json
          • Mlib
          • Transforms
        • X86isa
        • Svl
        • Rtl
      • Software-verification
      • Math
      • Testing-utilities
    • Lint-whole-file-suppression

    Vl-modulelist-suppress-file-warnings

    (vl-modulelist-suppress-file-warnings x suppress-files) maps vl-module-suppress-file-warnings across a list.

    Signature
    (vl-modulelist-suppress-file-warnings x suppress-files) 
      → 
    new-x
    Arguments
    x — Guard (vl-modulelist-p x).
    suppress-files — Guard (string-listp suppress-files).
    Returns
    new-x — Type (vl-modulelist-p new-x).

    This is an ordinary defprojection.

    Definitions and Theorems

    Function: vl-modulelist-suppress-file-warnings-exec

    (defun vl-modulelist-suppress-file-warnings-exec
           (x suppress-files acc)
      (declare (xargs :guard (and (vl-modulelist-p x)
                                  (string-listp suppress-files))))
      (declare (xargs :guard t))
      (let ((__function__ 'vl-modulelist-suppress-file-warnings-exec))
        (declare (ignorable __function__))
        (if (consp x)
            (vl-modulelist-suppress-file-warnings-exec
                 (cdr x)
                 suppress-files
                 (cons (vl-module-suppress-file-warnings (car x)
                                                         suppress-files)
                       acc))
          acc)))

    Function: vl-modulelist-suppress-file-warnings-nrev

    (defun vl-modulelist-suppress-file-warnings-nrev
           (x suppress-files nrev)
     (declare (xargs :stobjs (nrev)))
     (declare (xargs :guard (and (vl-modulelist-p x)
                                 (string-listp suppress-files))))
     (declare (xargs :guard t))
     (let ((__function__ 'vl-modulelist-suppress-file-warnings-nrev))
      (declare (ignorable __function__))
      (if (atom x)
          (nrev-fix nrev)
       (let
        ((nrev
            (nrev-push (vl-module-suppress-file-warnings (car x)
                                                         suppress-files)
                       nrev)))
        (vl-modulelist-suppress-file-warnings-nrev
             (cdr x)
             suppress-files nrev)))))

    Function: vl-modulelist-suppress-file-warnings

    (defun vl-modulelist-suppress-file-warnings (x suppress-files)
     (declare (xargs :guard (and (vl-modulelist-p x)
                                 (string-listp suppress-files))))
     (declare (xargs :guard t))
     (let ((__function__ 'vl-modulelist-suppress-file-warnings))
      (declare (ignorable __function__))
      (mbe
        :logic
        (if (consp x)
            (cons (vl-module-suppress-file-warnings (car x)
                                                    suppress-files)
                  (vl-modulelist-suppress-file-warnings (cdr x)
                                                        suppress-files))
          nil)
        :exec
        (if (atom x)
            nil
          (with-local-nrev (vl-modulelist-suppress-file-warnings-nrev
                                x suppress-files nrev))))))

    Theorem: vl-modulelist-p-of-vl-modulelist-suppress-file-warnings

    (defthm vl-modulelist-p-of-vl-modulelist-suppress-file-warnings
      (b*
       ((new-x (vl-modulelist-suppress-file-warnings x suppress-files)))
       (vl-modulelist-p new-x))
      :rule-classes :rewrite)

    Theorem: vl-modulelist-suppress-file-warnings-of-vl-modulelist-fix-x

    (defthm vl-modulelist-suppress-file-warnings-of-vl-modulelist-fix-x
      (equal (vl-modulelist-suppress-file-warnings (vl-modulelist-fix x)
                                                   suppress-files)
             (vl-modulelist-suppress-file-warnings x suppress-files)))

    Theorem: vl-modulelist-suppress-file-warnings-vl-modulelist-equiv-congruence-on-x

    (defthm
     vl-modulelist-suppress-file-warnings-vl-modulelist-equiv-congruence-on-x
     (implies
      (vl-modulelist-equiv x x-equiv)
      (equal
         (vl-modulelist-suppress-file-warnings x suppress-files)
         (vl-modulelist-suppress-file-warnings x-equiv suppress-files)))
     :rule-classes :congruence)

    Theorem: vl-modulelist-suppress-file-warnings-of-string-list-fix-suppress-files

    (defthm
     vl-modulelist-suppress-file-warnings-of-string-list-fix-suppress-files
     (equal (vl-modulelist-suppress-file-warnings
                 x (string-list-fix suppress-files))
            (vl-modulelist-suppress-file-warnings x suppress-files)))

    Theorem: vl-modulelist-suppress-file-warnings-string-list-equiv-congruence-on-suppress-files

    (defthm
     vl-modulelist-suppress-file-warnings-string-list-equiv-congruence-on-suppress-files
     (implies
      (str::string-list-equiv suppress-files suppress-files-equiv)
      (equal
         (vl-modulelist-suppress-file-warnings x suppress-files)
         (vl-modulelist-suppress-file-warnings x suppress-files-equiv)))
     :rule-classes :congruence)

    Theorem: vl-modulelist-suppress-file-warnings-of-update-nth

    (defthm vl-modulelist-suppress-file-warnings-of-update-nth
     (implies
      (<= (nfix acl2::n) (len acl2::x))
      (equal
       (vl-modulelist-suppress-file-warnings
            (update-nth acl2::n acl2::v acl2::x)
            suppress-files)
       (update-nth
        acl2::n
        (vl-module-suppress-file-warnings acl2::v suppress-files)
        (vl-modulelist-suppress-file-warnings acl2::x suppress-files))))
     :rule-classes ((:rewrite)))

    Theorem: vl-modulelist-suppress-file-warnings-of-revappend

    (defthm vl-modulelist-suppress-file-warnings-of-revappend
     (equal
      (vl-modulelist-suppress-file-warnings (revappend acl2::x acl2::y)
                                            suppress-files)
      (revappend
         (vl-modulelist-suppress-file-warnings acl2::x suppress-files)
         (vl-modulelist-suppress-file-warnings acl2::y suppress-files)))
     :rule-classes ((:rewrite)))

    Theorem: nthcdr-of-vl-modulelist-suppress-file-warnings

    (defthm nthcdr-of-vl-modulelist-suppress-file-warnings
     (equal
      (nthcdr
          acl2::n
          (vl-modulelist-suppress-file-warnings acl2::x suppress-files))
      (vl-modulelist-suppress-file-warnings (nthcdr acl2::n acl2::x)
                                            suppress-files))
     :rule-classes ((:rewrite)))

    Theorem: nth-of-vl-modulelist-suppress-file-warnings

    (defthm nth-of-vl-modulelist-suppress-file-warnings
     (equal
      (nth
          acl2::n
          (vl-modulelist-suppress-file-warnings acl2::x suppress-files))
      (and (< (nfix acl2::n) (len acl2::x))
           (vl-module-suppress-file-warnings (nth acl2::n acl2::x)
                                             suppress-files)))
     :rule-classes ((:rewrite)))

    Theorem: vl-modulelist-suppress-file-warnings-of-take

    (defthm vl-modulelist-suppress-file-warnings-of-take
     (implies
      (<= (nfix acl2::n) (len acl2::x))
      (equal
       (vl-modulelist-suppress-file-warnings (take acl2::n acl2::x)
                                             suppress-files)
       (take
        acl2::n
        (vl-modulelist-suppress-file-warnings acl2::x suppress-files))))
     :rule-classes ((:rewrite)))

    Theorem: set-equiv-congruence-over-vl-modulelist-suppress-file-warnings

    (defthm
         set-equiv-congruence-over-vl-modulelist-suppress-file-warnings
     (implies
      (set-equiv acl2::x acl2::y)
      (set-equiv
         (vl-modulelist-suppress-file-warnings acl2::x suppress-files)
         (vl-modulelist-suppress-file-warnings acl2::y suppress-files)))
     :rule-classes ((:congruence)))

    Theorem: subsetp-of-vl-modulelist-suppress-file-warnings-when-subsetp

    (defthm subsetp-of-vl-modulelist-suppress-file-warnings-when-subsetp
     (implies
      (subsetp acl2::x acl2::y)
      (subsetp
         (vl-modulelist-suppress-file-warnings acl2::x suppress-files)
         (vl-modulelist-suppress-file-warnings acl2::y suppress-files)))
     :rule-classes ((:rewrite)))

    Theorem: member-of-vl-module-suppress-file-warnings-in-vl-modulelist-suppress-file-warnings

    (defthm
     member-of-vl-module-suppress-file-warnings-in-vl-modulelist-suppress-file-warnings
     (implies
      (member acl2::k acl2::x)
      (member
         (vl-module-suppress-file-warnings acl2::k suppress-files)
         (vl-modulelist-suppress-file-warnings acl2::x suppress-files)))
     :rule-classes ((:rewrite)))

    Theorem: vl-modulelist-suppress-file-warnings-nrev-removal

    (defthm vl-modulelist-suppress-file-warnings-nrev-removal
     (equal
      (vl-modulelist-suppress-file-warnings-nrev
           acl2::x suppress-files nrev)
      (append
         nrev
         (vl-modulelist-suppress-file-warnings acl2::x suppress-files)))
     :rule-classes ((:rewrite)))

    Theorem: vl-modulelist-suppress-file-warnings-exec-removal

    (defthm vl-modulelist-suppress-file-warnings-exec-removal
     (equal
      (vl-modulelist-suppress-file-warnings-exec
           acl2::x suppress-files acl2::acc)
      (revappend
           (vl-modulelist-suppress-file-warnings acl2::x suppress-files)
           acl2::acc))
     :rule-classes ((:rewrite)))

    Theorem: vl-modulelist-suppress-file-warnings-of-rev

    (defthm vl-modulelist-suppress-file-warnings-of-rev
     (equal
      (vl-modulelist-suppress-file-warnings (rev acl2::x)
                                            suppress-files)
      (rev
         (vl-modulelist-suppress-file-warnings acl2::x suppress-files)))
     :rule-classes ((:rewrite)))

    Theorem: vl-modulelist-suppress-file-warnings-of-list-fix

    (defthm vl-modulelist-suppress-file-warnings-of-list-fix
     (equal
          (vl-modulelist-suppress-file-warnings (list-fix acl2::x)
                                                suppress-files)
          (vl-modulelist-suppress-file-warnings acl2::x suppress-files))
     :rule-classes ((:rewrite)))

    Theorem: vl-modulelist-suppress-file-warnings-of-append

    (defthm vl-modulelist-suppress-file-warnings-of-append
     (equal
      (vl-modulelist-suppress-file-warnings (append acl2::a acl2::b)
                                            suppress-files)
      (append
         (vl-modulelist-suppress-file-warnings acl2::a suppress-files)
         (vl-modulelist-suppress-file-warnings acl2::b suppress-files)))
     :rule-classes ((:rewrite)))

    Theorem: cdr-of-vl-modulelist-suppress-file-warnings

    (defthm cdr-of-vl-modulelist-suppress-file-warnings
     (equal
      (cdr
          (vl-modulelist-suppress-file-warnings acl2::x suppress-files))
      (vl-modulelist-suppress-file-warnings (cdr acl2::x)
                                            suppress-files))
     :rule-classes ((:rewrite)))

    Theorem: car-of-vl-modulelist-suppress-file-warnings

    (defthm car-of-vl-modulelist-suppress-file-warnings
     (equal
      (car
          (vl-modulelist-suppress-file-warnings acl2::x suppress-files))
      (and (consp acl2::x)
           (vl-module-suppress-file-warnings (car acl2::x)
                                             suppress-files)))
     :rule-classes ((:rewrite)))

    Theorem: vl-modulelist-suppress-file-warnings-under-iff

    (defthm vl-modulelist-suppress-file-warnings-under-iff
      (iff (vl-modulelist-suppress-file-warnings acl2::x suppress-files)
           (consp acl2::x))
      :rule-classes ((:rewrite)))

    Theorem: consp-of-vl-modulelist-suppress-file-warnings

    (defthm consp-of-vl-modulelist-suppress-file-warnings
     (equal
      (consp
          (vl-modulelist-suppress-file-warnings acl2::x suppress-files))
      (consp acl2::x))
     :rule-classes ((:rewrite)))

    Theorem: len-of-vl-modulelist-suppress-file-warnings

    (defthm len-of-vl-modulelist-suppress-file-warnings
     (equal
      (len
          (vl-modulelist-suppress-file-warnings acl2::x suppress-files))
      (len acl2::x))
     :rule-classes ((:rewrite)))

    Theorem: true-listp-of-vl-modulelist-suppress-file-warnings

    (defthm true-listp-of-vl-modulelist-suppress-file-warnings
     (true-listp
          (vl-modulelist-suppress-file-warnings acl2::x suppress-files))
     :rule-classes :type-prescription)

    Theorem: vl-modulelist-suppress-file-warnings-when-not-consp

    (defthm vl-modulelist-suppress-file-warnings-when-not-consp
     (implies
      (not (consp acl2::x))
      (equal
           (vl-modulelist-suppress-file-warnings acl2::x suppress-files)
           nil))
     :rule-classes ((:rewrite)))

    Theorem: vl-modulelist-suppress-file-warnings-of-cons

    (defthm vl-modulelist-suppress-file-warnings-of-cons
     (equal
      (vl-modulelist-suppress-file-warnings (cons acl2::a acl2::b)
                                            suppress-files)
      (cons
         (vl-module-suppress-file-warnings acl2::a suppress-files)
         (vl-modulelist-suppress-file-warnings acl2::b suppress-files)))
     :rule-classes ((:rewrite)))