---

Step * 1 1 1 2 1 of Lemma ulist-ext


1. T : Type
2. n : ℤ
3. 0 < n
4. (λA.(Unit ⋃ (T × A))^n - 1 Void) ⊆r (T List)
5. T List ≡ Unit ⋃ (T × (T List))
⊢ (λA.(Unit ⋃ (T × A))^n Void) ⊆r (T List)
BY
{ (UseTrans ⌜Unit ⋃ (T × (T List))⌝⋅ THENA Auto) }

1
.....antecedent..... 
1. T : Type
2. n : ℤ
3. 0 < n
4. (λA.(Unit ⋃ (T × A))^n - 1 Void) ⊆r (T List)
5. T List ≡ Unit ⋃ (T × (T List))
⊢ (λA.(Unit ⋃ (T × A))^n Void) ⊆r (Unit ⋃ (T × (T List)))

2
1. T : Type
2. n : ℤ
3. 0 < n
4. (λA.(Unit ⋃ (T × A))^n - 1 Void) ⊆r (T List)
5. T List ≡ Unit ⋃ (T × (T List))
6. (λA.(Unit ⋃ (T × A))^n Void) ⊆r (T List)
⊢ (λA.(Unit ⋃ (T × A))^n Void) ⊆r (T List)

---

Latex:

---

Latex:

1.  T  :  Type
2.  n  :  \mBbbZ{}
3.  0  <  n
4.  (\mlambda{}A.(Unit  \mcup{}  (T  \mtimes{}  A))\^{}n  -  1  Void)  \msubseteq{}r  (T  List)
5.  T  List  \mequiv{}  Unit  \mcup{}  (T  \mtimes{}  (T  List))
\mvdash{}  (\mlambda{}A.(Unit  \mcup{}  (T  \mtimes{}  A))\^{}n  Void)  \msubseteq{}r  (T  List)


By

---

Latex:
(UseTrans  \mkleeneopen{}Unit  \mcup{}  (T  \mtimes{}  (T  List))\mkleeneclose{}\mcdot{}  THENA  Auto)

---

Home Index