Step
*
of Lemma
bag-null-append
∀[T:Type]. ∀[as,bs:bag(T)].  bag-null(as + bs) = bag-null(as) ∧b bag-null(bs)
BY
{ (Auto
   THEN (BagToList (-2) THENA Auto)
   THEN (BagToList (-1) THENA Auto)
   THEN RepUR ``bag-null bag-append`` 0
   THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[as,bs:bag(T)].    bag-null(as  +  bs)  =  bag-null(as)  \mwedge{}\msubb{}  bag-null(bs)
By
Latex:
(Auto
  THEN  (BagToList  (-2)  THENA  Auto)
  THEN  (BagToList  (-1)  THENA  Auto)
  THEN  RepUR  ``bag-null  bag-append``  0
  THEN  Auto)
Home
Index