Step
*
of Lemma
copath-cons-hd-tl
∀[p:ℕ × Top × Top]. (copath-cons(copath-hd(p);copath-tl(p)) ~ p)
BY
{ (Auto THEN RepeatFor 2 (D -1) THEN RepUR ``copath-tl copath-hd copath-cons`` 0 THEN Auto) }
Latex:
Latex:
\mforall{}[p:\mBbbN{}  \mtimes{}  Top  \mtimes{}  Top].  (copath-cons(copath-hd(p);copath-tl(p))  \msim{}  p)
By
Latex:
(Auto  THEN  RepeatFor  2  (D  -1)  THEN  RepUR  ``copath-tl  copath-hd  copath-cons``  0  THEN  Auto)
Home
Index