---

Step * of Lemma co-w-ext

∀[A:Type]. co-w(A) ≡ Unit + (A ⟶ co-w(A))
BY
{ (Auto THEN Unfold `co-w` 0 THEN BLemma `corec-ext` THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[A:Type].  co-w(A)  \mequiv{}  Unit  +  (A  {}\mrightarrow{}  co-w(A))


By

---

Latex:
(Auto  THEN  Unfold  `co-w`  0  THEN  BLemma  `corec-ext`  THEN  Auto)

---

Home Index