Step
*
of Lemma
bag-size-restrict
∀[T:Type]. ∀[b:bag(T)]. ∀[eq:EqDecider(T)]. ∀[x:T].  (#((b|x)) ~ (#x in b))
BY
{ (Auto THEN ((RWO "bag-count-sqequal" 0 THENA Auto) THEN Fold `bag-restrict` 0 THEN Auto)) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[b:bag(T)].  \mforall{}[eq:EqDecider(T)].  \mforall{}[x:T].    (\#((b|x))  \msim{}  (\#x  in  b))
By
Latex:
(Auto  THEN  ((RWO  "bag-count-sqequal"  0  THENA  Auto)  THEN  Fold  `bag-restrict`  0  THEN  Auto))
Home
Index