Step
*
of Lemma
map-reverse
∀[f:Top]. ∀[L:Top List].  (map(f;rev(L)) ~ rev(map(f;L)))
BY
{ ((InductionOnList THEN Reduce 0 THEN Try (Trivial))
   THEN (RWO "reverse-append map_append_sq" 0 THENM Reduce 0)
   THEN Auto) }
Latex:
Latex:
\mforall{}[f:Top].  \mforall{}[L:Top  List].    (map(f;rev(L))  \msim{}  rev(map(f;L)))
By
Latex:
((InductionOnList  THEN  Reduce  0  THEN  Try  (Trivial))
  THEN  (RWO  "reverse-append  map\_append\_sq"  0  THENM  Reduce  0)
  THEN  Auto)
Home
Index