Step * of Lemma hd-reverse-is-last

[T:Type]. ∀[L:T List].  hd(rev(L)) last(L) ∈ supposing 0 < ||L||
BY
((Auto THEN Unfold `last` 0)
   THEN (InstLemma `select-reverse` [⌜T⌝;⌜L⌝;⌜0⌝]⋅ THENA Auto)
   THEN RWO "select0" (-1)
   THEN Auto) }


Latex:


Latex:
\mforall{}[T:Type].  \mforall{}[L:T  List].    hd(rev(L))  =  last(L)  supposing  0  <  ||L||


By


Latex:
((Auto  THEN  Unfold  `last`  0)
  THEN  (InstLemma  `select-reverse`  [\mkleeneopen{}T\mkleeneclose{};\mkleeneopen{}L\mkleeneclose{};\mkleeneopen{}0\mkleeneclose{}]\mcdot{}  THENA  Auto)
  THEN  RWO  "select0"  (-1)
  THEN  Auto)




Home Index