(vl-genblob-genblock-count x) → count
Theorem:
(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)