---

Step * of Lemma disjoint-union-type_wf

∀[L:Type List]. (disjoint-union-type(L) ∈ Type)
BY
{ (Unfold `disjoint-union-type` 0
   THEN (D 0 THENA Auto)
   THEN ListInd (-1)
   THEN Reduce 0
   THEN Try (AutoSplit)
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[L:Type  List].  (disjoint-union-type(L)  \mmember{}  Type)


By

---

Latex:
(Unfold  `disjoint-union-type`  0
  THEN  (D  0  THENA  Auto)
  THEN  ListInd  (-1)
  THEN  Reduce  0
  THEN  Try  (AutoSplit)
  THEN  Auto)

---

Home Index