Step
*
of Lemma
longest-prefix-singleton
∀[x,P:Top].  (longest-prefix(P;[x]) ~ [])
BY
{ ((UnivCD THENA Auto) THEN RepeatFor 2 ((RecUnfold `longest-prefix` 0 THEN RepUR ``let`` 0)) THEN Auto) }
Latex:
Latex:
\mforall{}[x,P:Top].    (longest-prefix(P;[x])  \msim{}  [])
By
Latex:
((UnivCD  THENA  Auto)
  THEN  RepeatFor  2  ((RecUnfold  `longest-prefix`  0  THEN  RepUR  ``let``  0))
  THEN  Auto)
Home
Index