---

Step * of Lemma awf-subtype

∀[T:Type]. ∀[s:awf(T)].  (s ∈ T + (awf(T) List))
BY
{ (Auto THEN All (Unfold `awf`) THEN InstLemma `corec-ext` [⌜λ2S.T + (S List)⌝]⋅ THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[T:Type].  \mforall{}[s:awf(T)].    (s  \mmember{}  T  +  (awf(T)  List))


By

---

Latex:
(Auto  THEN  All  (Unfold  `awf`)  THEN  InstLemma  `corec-ext`  [\mkleeneopen{}\mlambda{}\msubtwo{}S.T  +  (S  List)\mkleeneclose{}]\mcdot{}  THEN  Auto)

---

Home Index