---

Step * of Lemma product_subtype_list

∀[T:Type]. ((T × (T List)) ⊆r (T List))
BY
{ (Auto THEN InstLemma `list-ext` [⌜T⌝]⋅ THEN Auto) }

1
1. T : Type
2. T List ≡ Unit ⋃ (T × (T List))
⊢ (T × (T List)) ⊆r (T List)

---

Latex:

---

Latex:
\mforall{}[T:Type].  ((T  \mtimes{}  (T  List))  \msubseteq{}r  (T  List))


By

---

Latex:
(Auto  THEN  InstLemma  `list-ext`  [\mkleeneopen{}T\mkleeneclose{}]\mcdot{}  THEN  Auto)

---

Home Index