Step
*
2
1
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 = x2 ∈ T
7. ns : colist(ℕ)
8. L1 = L2@ns ∈ colist(T)
⊢ [x1 / L1] = [x2 / L2@ns] ∈ colist(T)
BY
{ (Unfold `cons` 0 THEN Fold `co-cons` 0 THEN RWO  "co-cons_one_one" 0 THEN Auto) }
1
1. T : Type
2. x1 : T
3. x2 : T
4. L1 : colist(T)
5. L2 : colist(T)
6. x1 = x2 ∈ T
7. ns : colist(ℕ)
8. L1 = L2@ns ∈ colist(T)
⊢ {(x1 = x2 ∈ T) ∧ (L1 = L2@ns ∈ colist(T))}
Latex:
Latex:
1.  T  :  Type
2.  x1  :  T
3.  x2  :  T
4.  L1  :  colist(T)
5.  L2  :  colist(T)
6.  x1  =  x2
7.  ns  :  colist(\mBbbN{})
8.  L1  =  L2@ns
\mvdash{}  [x1  /  L1]  =  [x2  /  L2@ns]
By
Latex:
(Unfold  `cons`  0  THEN  Fold  `co-cons`  0  THEN  RWO    "co-cons\_one\_one"  0  THEN  Auto)
Home
Index