Step
*
of Lemma
bag-remove-append
∀[T:Type]. ∀[eq:EqDecider(T)]. ∀[as,bs:bag(T)]. ∀[x:T].  (as + bs - x ~ as - x + bs - x)
BY
{ (Auto THEN RepUR ``bag-remove`` 0 THEN RWO "bag-filter-append" 0 THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[eq:EqDecider(T)].  \mforall{}[as,bs:bag(T)].  \mforall{}[x:T].    (as  +  bs  -  x  \msim{}  as  -  x  +  bs  -  x)
By
Latex:
(Auto  THEN  RepUR  ``bag-remove``  0  THEN  RWO  "bag-filter-append"  0  THEN  Auto)
Home
Index