Step
*
of Lemma
append-tuple-simplify2
∀[p:Top × Top]. (fst(let x,y = p in <x, y, ⋅>) ~ fst(p))
BY
{ ((D 0 THENA Auto) THEN D -1 THEN Reduce 0 THEN Auto) }
Latex:
Latex:
\mforall{}[p:Top  \mtimes{}  Top].  (fst(let  x,y  =  p  in  <x,  y,  \mcdot{}>)  \msim{}  fst(p))
By
Latex:
((D  0  THENA  Auto)  THEN  D  -1  THEN  Reduce  0  THEN  Auto)
Home
Index