Step
*
of Lemma
bag-equality
∀[A,B:Type]. ∀[f,g:bag(A) ⟶ bag(B)].  ∀[b:bag(A)]. (f[b] = g[b] ∈ bag(B)) supposing ∀[b:A List]. (f[b] = g[b] ∈ bag(B))
BY
{ (Auto THEN (BagD (-1) THEN Auto) THEN Subst' as = bs ∈ bag(A) 0 THEN Auto THEN Auto) }
Latex:
Latex:
\mforall{}[A,B:Type].  \mforall{}[f,g:bag(A)  {}\mrightarrow{}  bag(B)].
    \mforall{}[b:bag(A)].  (f[b]  =  g[b])  supposing  \mforall{}[b:A  List].  (f[b]  =  g[b])
By
Latex:
(Auto  THEN  (BagD  (-1)  THEN  Auto)  THEN  Subst'  as  =  bs  0  THEN  Auto  THEN  Auto)
Home
Index