• Top
    • Documentation
    • Books
    • Boolean-reasoning
    • Projects
    • Debugging
    • 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
        • Mlib
          • Scopestack
          • Hid-tools
          • Filtering-by-name
          • Vl-interface-mocktype
          • Stripping-functions
          • Genblob
            • Vl-genblob
              • Vl-genblob-p
              • Vl-genblob-count
                • Vl-genblob-generate-count
                • Vl-genblob-gencaselist-count
                • Vl-genblob-generates-count
                • Vl-genblob-genblocklist-count
                • Vl-genblob-genblock-count
                • Vl-genblob-elementlist-count
              • Vl-genblob-fix
              • Make-vl-genblob
              • Change-vl-genblob
              • Vl-genblob-equiv
              • Vl-genblob->defaultdisables
              • Vl-genblob->fwdtypedefs
              • Vl-genblob->dpiimports
              • Vl-genblob->dpiexports
              • Vl-genblob->covergroups
              • Vl-genblob->cassertions
              • Vl-genblob->vardecls
              • Vl-genblob->typedefs
              • Vl-genblob->taskdecls
              • Vl-genblob->sequences
              • Vl-genblob->scopetype
              • Vl-genblob->properties
              • Vl-genblob->portdecls
              • Vl-genblob->paramdecls
              • Vl-genblob->modports
              • Vl-genblob->modinsts
              • Vl-genblob->letdecls
              • Vl-genblob->initials
              • Vl-genblob->genvars
              • Vl-genblob->generates
              • Vl-genblob->gclkdecls
              • Vl-genblob->gateinsts
              • Vl-genblob->fundecls
              • Vl-genblob->elabtasks
              • Vl-genblob->clkdecls
              • Vl-genblob->assertions
              • Vl-genblob->alwayses
              • Vl-genblob->ports
              • Vl-genblob->imports
              • Vl-genblob->ifports
              • Vl-genblob->id
              • Vl-genblob->finals
              • Vl-genblob->classes
              • Vl-genblob->binds
              • Vl-genblob->assigns
              • Vl-genblob->aliases
            • Vl-sort-genelements
            • Vl-genblob->interface
            • Vl-genblob->module
            • Vl-genblob->elems
            • Vl-interface->genblob
            • Vl-genblob->package
            • Vl-module->genblob
            • Vl-genblob->class
            • Vl-package->genblob
            • Vl-class->genblob
            • Vl-genelementlist->defaultdisables
            • Vl-genelementlist->properties
            • Vl-genelementlist->paramdecls
            • Vl-genelementlist->fwdtypedefs
            • Vl-genelementlist->dpiimports
            • Vl-genelementlist->dpiexports
            • Vl-genelementlist->covergroups
            • Vl-genelementlist->cassertions
            • Vl-genelementlist->assertions
            • Vl-genelementlist->vardecls
            • Vl-genelementlist->typedefs
            • Vl-genelementlist->taskdecls
            • Vl-genelementlist->sequences
            • Vl-genelementlist->portdecls
            • Vl-genelementlist->modports
            • Vl-genelementlist->modinsts
            • Vl-genelementlist->letdecls
            • Vl-genelementlist->initials
            • Vl-genelementlist->imports
            • Vl-genelementlist->genvars
            • Vl-genelementlist->generates
            • Vl-genelementlist->gclkdecls
            • Vl-genelementlist->gateinsts
            • Vl-genelementlist->fundecls
            • Vl-genelementlist->elabtasks
            • Vl-genelementlist->clkdecls
            • Vl-genelementlist->assigns
            • Vl-genelementlist->alwayses
            • Vl-genelementlist->finals
            • Vl-genelementlist->classes
            • Vl-genelementlist->binds
            • Vl-genelementlist->aliases
            • Vl-genblock->genblob
            • Vl-scopetype-p
          • Expr-tools
          • Extract-vl-types
          • Hierarchy
          • Range-tools
          • Finding-by-name
          • Stmt-tools
          • Modnamespace
          • Flat-warnings
          • Reordering-by-name
          • Datatype-tools
          • Syscalls
          • Allexprs
          • Lvalues
          • Port-tools
        • Transforms
      • X86isa
      • Svl
      • Rtl
    • Software-verification
    • Math
    • Testing-utilities
  • Vl-genblob

Vl-genblob-count

Signature
(vl-genblob-count x) → count
Arguments
x — Guard (vl-genblob-p x).
Returns
count — Type (posp count).

Definitions and Theorems

Theorem: vl-genblob-count-greater-than-generates

(defthm vl-genblob-count-greater-than-generates
  (b* ((common-lisp::?count (vl-genblob-count x)))
    (< (vl-genblob-generates-count (vl-genblob->generates x))
       count))
  :rule-classes :linear)

Theorem: vl-genblob-count-of-sort-genelements-normalize

(defthm vl-genblob-count-of-sort-genelements-normalize
 (implies
  (syntaxp (or (not (equal name ''nil))
               (not (equal scopetype '':vl-anonymous-scope))))
  (equal
       (vl-genblob-count (vl-sort-genelements x
                                              :id name
                                              :scopetype scopetype))
       (vl-genblob-count (vl-sort-genelements x)))))

Theorem: return-type-of-vl-genblob-count.count

(defthm return-type-of-vl-genblob-count.count
  (b* ((common-lisp::?count (vl-genblob-count x)))
    (posp count))
  :rule-classes :type-prescription)

Theorem: return-type-of-vl-genblob-generates-count.count

(defthm return-type-of-vl-genblob-generates-count.count
  (b* ((common-lisp::?count (vl-genblob-generates-count x)))
    (posp count))
  :rule-classes :type-prescription)

Theorem: return-type-of-vl-genblob-genblock-count.count

(defthm return-type-of-vl-genblob-genblock-count.count
  (b* ((common-lisp::?count (vl-genblob-genblock-count x)))
    (posp count))
  :rule-classes :type-prescription)

Theorem: return-type-of-vl-genblob-generate-count.count

(defthm return-type-of-vl-genblob-generate-count.count
  (b* ((common-lisp::?count (vl-genblob-generate-count x)))
    (posp count))
  :rule-classes :type-prescription)

Theorem: return-type-of-vl-genblob-gencaselist-count.count

(defthm return-type-of-vl-genblob-gencaselist-count.count
  (b* ((common-lisp::?count (vl-genblob-gencaselist-count x)))
    (posp count))
  :rule-classes :type-prescription)

Theorem: return-type-of-vl-genblob-elementlist-count.count

(defthm return-type-of-vl-genblob-elementlist-count.count
  (b* ((common-lisp::?count (vl-genblob-elementlist-count x)))
    (posp count))
  :rule-classes :type-prescription)

Theorem: return-type-of-vl-genblob-genblocklist-count.count

(defthm return-type-of-vl-genblob-genblocklist-count.count
  (b* ((common-lisp::?count (vl-genblob-genblocklist-count x)))
    (posp count))
  :rule-classes :type-prescription)

Theorem: vl-genblob-count-greater-than-generates

(defthm vl-genblob-count-greater-than-generates
  (b* ((common-lisp::?count (vl-genblob-count x)))
    (< (vl-genblob-generates-count (vl-genblob->generates x))
       count))
  :rule-classes :linear)

Theorem: vl-genblob-count-of-sort-genelements-normalize

(defthm vl-genblob-count-of-sort-genelements-normalize
 (implies
  (syntaxp (or (not (equal name ''nil))
               (not (equal scopetype '':vl-anonymous-scope))))
  (equal
       (vl-genblob-count (vl-sort-genelements x
                                              :id name
                                              :scopetype scopetype))
       (vl-genblob-count (vl-sort-genelements x)))))

Theorem: vl-genblob-generates-count-greater-than-first

(defthm vl-genblob-generates-count-greater-than-first
  (b* ((common-lisp::?count (vl-genblob-generates-count x)))
    (implies (consp x)
             (< (vl-genblob-generate-count (car x))
                count)))
  :rule-classes :linear)

Theorem: vl-genblob-generates-count-gte-rest

(defthm vl-genblob-generates-count-gte-rest
  (b* ((common-lisp::?count (vl-genblob-generates-count x)))
    (<= (vl-genblob-generates-count (cdr x))
        count))
  :rule-classes :linear)

Theorem: vl-genblob-generates-count-greater-than-rest

(defthm vl-genblob-generates-count-greater-than-rest
  (b* ((common-lisp::?count (vl-genblob-generates-count x)))
    (implies (consp x)
             (< (vl-genblob-generates-count (cdr x))
                count)))
  :rule-classes :linear)

Theorem: vl-genblob-genblock-count-greater-than-sorted

(defthm vl-genblob-genblock-count-greater-than-sorted
  (b* nil
    (< (vl-genblob-count (vl-sort-genelements (vl-genblock->elems x)
                                              :id name
                                              :scopetype type))
       (vl-genblob-genblock-count x)))
  :rule-classes :linear)

Theorem: vl-genblob-generate-count-greater-than-genbegin-block

(defthm vl-genblob-generate-count-greater-than-genbegin-block
  (b* ((common-lisp::?count (vl-genblob-generate-count x)))
    (implies (vl-genelement-case x :vl-genbegin)
             (< (vl-genblob-genblock-count (vl-genbegin->block x))
                count)))
  :rule-classes :linear)

Theorem: vl-genblob-generate-count-greater-than-genblockarray-blocks

(defthm vl-genblob-generate-count-greater-than-genblockarray-blocks
  (b* ((common-lisp::?count (vl-genblob-generate-count x)))
    (implies
         (vl-genelement-case x :vl-genarray)
         (< (vl-genblob-genblocklist-count (vl-genarray->blocks x))
            count)))
  :rule-classes :linear)

Theorem: vl-genblob-generate-count-greater-than-genif-blocks

(defthm vl-genblob-generate-count-greater-than-genif-blocks
  (b* ((common-lisp::?count (vl-genblob-generate-count x)))
    (implies (vl-genelement-case x :vl-genif)
             (< (+ (vl-genblob-genblock-count (vl-genif->then x))
                   (vl-genblob-genblock-count (vl-genif->else x)))
                count)))
  :rule-classes :linear)

Theorem: vl-genblob-generate-count-greater-than-gencase-blocks

(defthm vl-genblob-generate-count-greater-than-gencase-blocks
  (b* ((common-lisp::?count (vl-genblob-generate-count x)))
    (implies
         (vl-genelement-case x :vl-gencase)
         (< (+ (vl-genblob-genblock-count (vl-gencase->default x))
               (vl-genblob-gencaselist-count (vl-gencase->cases x)))
            count)))
  :rule-classes :linear)

Theorem: vl-genblob-generate-count-greater-than-genloop-blocks

(defthm vl-genblob-generate-count-greater-than-genloop-blocks
  (b* ((common-lisp::?count (vl-genblob-generate-count x)))
    (implies (vl-genelement-case x :vl-genloop)
             (< (vl-genblob-genblock-count (vl-genloop->body x))
                count)))
  :rule-classes :linear)

Theorem: vl-genblob-generate-count-greater-than-genbase-item

(defthm vl-genblob-generate-count-greater-than-genbase-item
  (b* ((common-lisp::?count (vl-genblob-generate-count x)))
    (implies (vl-genelement-case x :vl-genbase)
             (< (vl-genblob-elementlist-count (list x))
                count)))
  :rule-classes :linear)

Theorem: vl-genblob-gencaselist-count-greater-than-first

(defthm vl-genblob-gencaselist-count-greater-than-first
 (b* ((common-lisp::?count (vl-genblob-gencaselist-count x)))
   (implies
        (consp (vl-gencaselist-fix x))
        (< (vl-genblob-genblock-count (cdar (vl-gencaselist-fix x)))
           count)))
 :rule-classes :linear)

Theorem: vl-genblob-gencaselist-count-gte-rest

(defthm vl-genblob-gencaselist-count-gte-rest
  (b* ((common-lisp::?count (vl-genblob-gencaselist-count x)))
    (<= (vl-genblob-gencaselist-count (cdr (vl-gencaselist-fix x)))
        count))
  :rule-classes :linear)

Theorem: vl-genblob-gencaselist-count-greater-than-rest

(defthm vl-genblob-gencaselist-count-greater-than-rest
 (b* ((common-lisp::?count (vl-genblob-gencaselist-count x)))
  (implies
      (consp (vl-gencaselist-fix x))
      (< (vl-genblob-gencaselist-count (cdr (vl-gencaselist-fix x)))
         count)))
 :rule-classes :linear)

Theorem: vl-genblob-elementlist-count-greater-than-genblob-count

(defthm vl-genblob-elementlist-count-greater-than-genblob-count
  (b* ((common-lisp::?count (vl-genblob-elementlist-count x)))
    (< (vl-genblob-count (vl-sort-genelements x))
       count))
  :rule-classes :linear)

Theorem: vl-genblob-genblocklist-count-greater-than-first

(defthm vl-genblob-genblocklist-count-greater-than-first
  (b* ((common-lisp::?count (vl-genblob-genblocklist-count x)))
    (implies (consp x)
             (< (vl-genblob-genblock-count (car x))
                count)))
  :rule-classes :linear)

Theorem: vl-genblob-genblocklist-count-gte-rest

(defthm vl-genblob-genblocklist-count-gte-rest
  (b* ((common-lisp::?count (vl-genblob-genblocklist-count x)))
    (<= (vl-genblob-genblocklist-count (cdr x))
        count))
  :rule-classes :linear)

Theorem: vl-genblob-genblocklist-count-greater-than-rest

(defthm vl-genblob-genblocklist-count-greater-than-rest
  (b* ((common-lisp::?count (vl-genblob-genblocklist-count x)))
    (implies (consp x)
             (< (vl-genblob-genblocklist-count (cdr x))
                count)))
  :rule-classes :linear)

Theorem: vl-genblob-count-of-vl-genblob-fix-x

(defthm vl-genblob-count-of-vl-genblob-fix-x
  (equal (vl-genblob-count (vl-genblob-fix x))
         (vl-genblob-count x)))

Theorem: vl-genblob-generates-count-of-vl-genelementlist-fix-x

(defthm vl-genblob-generates-count-of-vl-genelementlist-fix-x
  (equal (vl-genblob-generates-count (vl-genelementlist-fix x))
         (vl-genblob-generates-count x)))

Theorem: vl-genblob-genblock-count-of-vl-genblock-fix-x

(defthm vl-genblob-genblock-count-of-vl-genblock-fix-x
  (equal (vl-genblob-genblock-count (vl-genblock-fix x))
         (vl-genblob-genblock-count x)))

Theorem: vl-genblob-generate-count-of-vl-genelement-fix-x

(defthm vl-genblob-generate-count-of-vl-genelement-fix-x
  (equal (vl-genblob-generate-count (vl-genelement-fix x))
         (vl-genblob-generate-count x)))

Theorem: vl-genblob-gencaselist-count-of-vl-gencaselist-fix-x

(defthm vl-genblob-gencaselist-count-of-vl-gencaselist-fix-x
  (equal (vl-genblob-gencaselist-count (vl-gencaselist-fix x))
         (vl-genblob-gencaselist-count x)))

Theorem: vl-genblob-elementlist-count-of-vl-genelementlist-fix-x

(defthm vl-genblob-elementlist-count-of-vl-genelementlist-fix-x
  (equal (vl-genblob-elementlist-count (vl-genelementlist-fix x))
         (vl-genblob-elementlist-count x)))

Theorem: vl-genblob-genblocklist-count-of-vl-genblocklist-fix-x

(defthm vl-genblob-genblocklist-count-of-vl-genblocklist-fix-x
  (equal (vl-genblob-genblocklist-count (vl-genblocklist-fix x))
         (vl-genblob-genblocklist-count x)))

Theorem: vl-genblob-count-vl-genblob-equiv-congruence-on-x

(defthm vl-genblob-count-vl-genblob-equiv-congruence-on-x
  (implies (vl-genblob-equiv x x-equiv)
           (equal (vl-genblob-count x)
                  (vl-genblob-count x-equiv)))
  :rule-classes :congruence)

Theorem: vl-genblob-generates-count-vl-genelementlist-equiv-congruence-on-x

(defthm
 vl-genblob-generates-count-vl-genelementlist-equiv-congruence-on-x
 (implies (vl-genelementlist-equiv x x-equiv)
          (equal (vl-genblob-generates-count x)
                 (vl-genblob-generates-count x-equiv)))
 :rule-classes :congruence)

Theorem: vl-genblob-genblock-count-vl-genblock-equiv-congruence-on-x

(defthm vl-genblob-genblock-count-vl-genblock-equiv-congruence-on-x
  (implies (vl-genblock-equiv x x-equiv)
           (equal (vl-genblob-genblock-count x)
                  (vl-genblob-genblock-count x-equiv)))
  :rule-classes :congruence)

Theorem: vl-genblob-generate-count-vl-genelement-equiv-congruence-on-x

(defthm
      vl-genblob-generate-count-vl-genelement-equiv-congruence-on-x
  (implies (vl-genelement-equiv x x-equiv)
           (equal (vl-genblob-generate-count x)
                  (vl-genblob-generate-count x-equiv)))
  :rule-classes :congruence)

Theorem: vl-genblob-gencaselist-count-vl-gencaselist-equiv-congruence-on-x

(defthm
  vl-genblob-gencaselist-count-vl-gencaselist-equiv-congruence-on-x
  (implies (vl-gencaselist-equiv x x-equiv)
           (equal (vl-genblob-gencaselist-count x)
                  (vl-genblob-gencaselist-count x-equiv)))
  :rule-classes :congruence)

Theorem: vl-genblob-elementlist-count-vl-genelementlist-equiv-congruence-on-x

(defthm
 vl-genblob-elementlist-count-vl-genelementlist-equiv-congruence-on-x
 (implies (vl-genelementlist-equiv x x-equiv)
          (equal (vl-genblob-elementlist-count x)
                 (vl-genblob-elementlist-count x-equiv)))
 :rule-classes :congruence)

Theorem: vl-genblob-genblocklist-count-vl-genblocklist-equiv-congruence-on-x

(defthm
 vl-genblob-genblocklist-count-vl-genblocklist-equiv-congruence-on-x
 (implies (vl-genblocklist-equiv x x-equiv)
          (equal (vl-genblob-genblocklist-count x)
                 (vl-genblob-genblocklist-count x-equiv)))
 :rule-classes :congruence)

Subtopics

Vl-genblob-generate-count
Vl-genblob-gencaselist-count
Vl-genblob-generates-count
Vl-genblob-genblocklist-count
Vl-genblob-genblock-count
Vl-genblob-elementlist-count