---

Step * 2 1 1 2 of Lemma finite-union

.....antecedent..... 
1. S : Type
2. T : Type
3. n : ℕ
4. L : (S + T) List
5. no_repeats(S + T;L)
6. ||L|| = n ∈ ℤ
7. ∀x:S + T. (x ∈ L)
8. mapfilter(λx.outl(x);λx.isl(x);L) ∈ S List
⊢ Inj({x:{x:S + T| ↑isl(x)} | (x ∈ filter(λx.isl(x);L))} ;S;λx.outl(x))
BY
{ ((D 0 THEN Auto) THEN RepeatFor 2 (DSetVars) THEN DVar `a1' THEN DVar `a2' THEN All Reduce THEN Auto) }

---

Latex:

---

Latex:
.....antecedent..... 
1.  S  :  Type
2.  T  :  Type
3.  n  :  \mBbbN{}
4.  L  :  (S  +  T)  List
5.  no\_repeats(S  +  T;L)
6.  ||L||  =  n
7.  \mforall{}x:S  +  T.  (x  \mmember{}  L)
8.  mapfilter(\mlambda{}x.outl(x);\mlambda{}x.isl(x);L)  \mmember{}  S  List
\mvdash{}  Inj(\{x:\{x:S  +  T|  \muparrow{}isl(x)\}  |  (x  \mmember{}  filter(\mlambda{}x.isl(x);L))\}  ;S;\mlambda{}x.outl(x))


By

---

Latex:
((D  0  THEN  Auto)
  THEN  RepeatFor  2  (DSetVars)
  THEN  DVar  `a1'
  THEN  DVar  `a2'
  THEN  All  Reduce
  THEN  Auto)

---

Home Index