Step
*
of Lemma
adjacent-nil
∀[T:Type]. ∀[x,y:T].  False supposing adjacent(T;[];x;y)
BY
{ ((Unfold `adjacent` 0 THEN Auto) THEN Reduce (-1) THEN ExRepD THEN Auto) }
Latex:
Latex:
\mforall{}[T:Type].  \mforall{}[x,y:T].    False  supposing  adjacent(T;[];x;y)
By
Latex:
((Unfold  `adjacent`  0  THEN  Auto)  THEN  Reduce  (-1)  THEN  ExRepD  THEN  Auto)
Home
Index