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