---

Step * 2 2 1 1 of Lemma cons-sub-co-list-cons


1. [T] : Type
2. x1 : T
3. x2 : T
4. L1 : colist(T)
5. L2 : colist(T)
6. [x1 / L1] = [] ∈ colist(T)
⊢ sub-co-list(T;[x1 / L1];[x2 / L2])
BY
{ ((Unfold `nil` -1 THEN Fold `co-nil` (-1)) THEN RWO  "co-cons-not-co-nil" (-1) THEN Auto) }

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  x1  :  T
3.  x2  :  T
4.  L1  :  colist(T)
5.  L2  :  colist(T)
6.  [x1  /  L1]  =  []
\mvdash{}  sub-co-list(T;[x1  /  L1];[x2  /  L2])


By

---

Latex:
((Unfold  `nil`  -1  THEN  Fold  `co-nil`  (-1))  THEN  RWO    "co-cons-not-co-nil"  (-1)  THEN  Auto)

---

Home Index