---

Step * of Lemma bag-count-sqequal

∀[T:Type]. ∀[bs:bag(T)]. ∀[eq:EqDecider(T)]. ∀[x:T].  ((#x in bs) ~ #([y∈bs|eq x y]))
BY
{ (Auto
   THEN BagToList 2
   THEN Auto
   THEN RepUR ``bag-count bag-filter bag-size`` 0
   THEN RWO "count-length-filter" 0
   THEN Auto
   THEN RepeatFor 2 ((EqCD THEN Auto))
   THEN Ext
   THEN Reduce 0
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[bs:bag(T)].  \mforall{}[eq:EqDecider(T)].  \mforall{}[x:T].    ((\#x  in  bs)  \msim{}  \#([y\mmember{}bs|eq  x  y]))


By

---

Latex:
(Auto
  THEN  BagToList  2
  THEN  Auto
  THEN  RepUR  ``bag-count  bag-filter  bag-size``  0
  THEN  RWO  "count-length-filter"  0
  THEN  Auto
  THEN  RepeatFor  2  ((EqCD  THEN  Auto))
  THEN  Ext
  THEN  Reduce  0
  THEN  Auto)

---

Home Index