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