Step 
*
1
 of Lemma 
co-cons_wf
1. T : Type
2. x : T
3. L : colist(T)
4. <x, L> = <x, L> ∈ (T × colist(T))
⊢ (T × colist(T)) ⊆r colist(T)
BY
 
{ (BLemma `product_subtype_colist` THEN Auto) }
 
Latex: 
Latex:
1.  T  :  Type
2.  x  :  T
3.  L  :  colist(T)
4.  <x,  L>  =  <x,  L>
\mvdash{}  (T  \mtimes{}  colist(T))  \msubseteq{}r  colist(T)
 By 
Latex:
(BLemma  `product\_subtype\_colist`  THEN  Auto)
Home
Index