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


1. 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` THEN Fold `co-cons` THEN RWO  "co-cons_one_one" THEN Auto) }

1
1. 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