Step
*
of Lemma
stream-ext
∀[A:Type]. stream(A) ≡ A × stream(A)
BY
{ (Auto THEN Unfold `stream` 0 THEN BLemma `corec-ext` THEN Auto) }
Latex:
Latex:
\mforall{}[A:Type].  stream(A)  \mequiv{}  A  \mtimes{}  stream(A)
By
Latex:
(Auto  THEN  Unfold  `stream`  0  THEN  BLemma  `corec-ext`  THEN  Auto)
Home
Index