Step
*
2
1
2
of Lemma
adjacent-reverse
1. [T] : Type
2. u : T
3. v : T List
4. x : T
5. y : T
6. adjacent(T;rev(v);x;y) 
⇐⇒ adjacent(T;v;y;x)
7. ¬0 < ||v||
⊢ adjacent(T;rev(v) @ [u];x;y) 
⇐⇒ adjacent(T;[u / v];y;x)
BY
{ ((DVar `v' THEN All Reduce) THEN Auto' THEN FLemma `adjacent-singleton` [-1] THEN Auto) }
Latex:
Latex:
1.  [T]  :  Type
2.  u  :  T
3.  v  :  T  List
4.  x  :  T
5.  y  :  T
6.  adjacent(T;rev(v);x;y)  \mLeftarrow{}{}\mRightarrow{}  adjacent(T;v;y;x)
7.  \mneg{}0  <  ||v||
\mvdash{}  adjacent(T;rev(v)  @  [u];x;y)  \mLeftarrow{}{}\mRightarrow{}  adjacent(T;[u  /  v];y;x)
By
Latex:
((DVar  `v'  THEN  All  Reduce)  THEN  Auto'  THEN  FLemma  `adjacent-singleton`  [-1]  THEN  Auto)
Home
Index