Step
*
of Lemma
bag-append-assoc
∀[as,bs,cs:Top].  ((as + bs) + cs ~ as + bs + cs)
BY
{ ((UnivCD THENA Auto) THEN Unfold `bag-append` 0 THEN BLemma `append_assoc_sq` THEN Auto) }
Latex:
Latex:
\mforall{}[as,bs,cs:Top].    ((as  +  bs)  +  cs  \msim{}  as  +  bs  +  cs)
By
Latex:
((UnivCD  THENA  Auto)  THEN  Unfold  `bag-append`  0  THEN  BLemma  `append\_assoc\_sq`  THEN  Auto)
Home
Index