Step * of Lemma select-reverse

[T:Type]. ∀[L:T List]. ∀[i:ℕ||rev(L)||].  (rev(L)[i] L[||L|| i] ∈ T)
BY
(Auto
   THEN Unfold `reverse` 0
   THEN (RWO "length-reverse" (-1) THENA Auto)
   THEN (RWO "select-rev-append" THENA Auto)
   THEN AutoSplit) }


Latex:


Latex:
\mforall{}[T:Type].  \mforall{}[L:T  List].  \mforall{}[i:\mBbbN{}||rev(L)||].    (rev(L)[i]  =  L[||L||  -  1  -  i])


By


Latex:
(Auto
  THEN  Unfold  `reverse`  0
  THEN  (RWO  "length-reverse"  (-1)  THENA  Auto)
  THEN  (RWO  "select-rev-append"  0  THENA  Auto)
  THEN  AutoSplit)




Home Index