---

Step * 1 1 1 2 1 2 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))
6. (λA.(Unit ⋃ (T × A))^n Void) ⊆r (T List)
⊢ (λA.(Unit ⋃ (T × A))^n Void) ⊆r (T List)
BY
{ TACTIC:Trivial }

---

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))
6.  (\mlambda{}A.(Unit  \mcup{}  (T  \mtimes{}  A))\^{}n  Void)  \msubseteq{}r  (T  List)
\mvdash{}  (\mlambda{}A.(Unit  \mcup{}  (T  \mtimes{}  A))\^{}n  Void)  \msubseteq{}r  (T  List)


By

---

Latex:
TACTIC:Trivial

---

Home Index