---

Step * of Lemma map-rev-sq-map

∀[A,B:Type]. ∀[f:A ⟶ B]. ∀[as:A List].  map-rev(f;as) ~ map(f;as) supposing value-type(B)
BY
{ (Auto THEN Unfold `map-rev` 0 THEN (CallByValueReduce 0 THENA Auto) THEN RWO "rev-map-append-sq" 0 THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[A,B:Type].  \mforall{}[f:A  {}\mrightarrow{}  B].  \mforall{}[as:A  List].    map-rev(f;as)  \msim{}  map(f;as)  supposing  value-type(B)


By

---

Latex:
(Auto
  THEN  Unfold  `map-rev`  0
  THEN  (CallByValueReduce  0  THENA  Auto)
  THEN  RWO  "rev-map-append-sq"  0
  THEN  Auto)

---

Home Index