---

Step * 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)
⊢ ((x1 = x2 ∈ T) ∧ sub-co-list(T;L1;L2)) ∨ sub-co-list(T;[x1 / L1];L2)
BY
{ (Unfolds ``cons nil`` -1 THEN Folds ``co-cons 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{}  ((x1  =  x2)  \mwedge{}  sub-co-list(T;L1;L2))  \mvee{}  sub-co-list(T;[x1  /  L1];L2)


By

---

Latex:
(Unfolds  ``cons  nil``  -1
  THEN  Folds  ``co-cons  co-nil``  (-1)
  THEN  RWO  "co-cons-not-co-nil"  (-1)
  THEN  Auto)

---

Home Index