Step
*
of Lemma
bag-combine-unit-left-top
∀[f,a:Top].  (⋃x∈[a].f[x] ~ f[a] + {})
BY
{ (Auto THEN RepUR ``bag-combine bag-map bag-union concat bag-append empty-bag`` 0 THEN Auto) }
Latex:
Latex:
\mforall{}[f,a:Top].    (\mcup{}x\mmember{}[a].f[x]  \msim{}  f[a]  +  \{\})
By
Latex:
(Auto  THEN  RepUR  ``bag-combine  bag-map  bag-union  concat  bag-append  empty-bag``  0  THEN  Auto)
Home
Index