---

Step * 3 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.outr(x);λx.isr(x);L) ∈ T List
⊢ Inj({x:{x:S + T| ↑isr(x)} | (x ∈ filter(λx.isr(x);L))} ;T;λx.outr(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.outr(x);\mlambda{}x.isr(x);L)  \mmember{}  T  List
\mvdash{}  Inj(\{x:\{x:S  +  T|  \muparrow{}isr(x)\}  |  (x  \mmember{}  filter(\mlambda{}x.isr(x);L))\}  ;T;\mlambda{}x.outr(x))


By

---

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

---

Home Index