---

Step * 2 1 1 1 of Lemma eager-map-append-sq


1. T : Type
2. value-type(T)
3. A : Type
4. f : A ⟶ T
5. u : A
6. v : A List
7. ∀[bs:T List]. (eager-map-append(f;v;bs) ~ map(f;rev(v)) @ bs)
8. bs : T List
⊢ map(f;rev(v)) @ [f u / bs] ~ map(f;rev(v) @ [u]) @ bs
BY
{ (RWO  "map_append_sq" 0 THENA Auto) }

1
1. T : Type
2. value-type(T)
3. A : Type
4. f : A ⟶ T
5. u : A
6. v : A List
7. ∀[bs:T List]. (eager-map-append(f;v;bs) ~ map(f;rev(v)) @ bs)
8. bs : T List
⊢ map(f;rev(v)) @ [f u / bs] ~ (map(f;rev(v)) @ map(f;[u])) @ bs

---

Latex:

---

Latex:

1.  T  :  Type
2.  value-type(T)
3.  A  :  Type
4.  f  :  A  {}\mrightarrow{}  T
5.  u  :  A
6.  v  :  A  List
7.  \mforall{}[bs:T  List].  (eager-map-append(f;v;bs)  \msim{}  map(f;rev(v))  @  bs)
8.  bs  :  T  List
\mvdash{}  map(f;rev(v))  @  [f  u  /  bs]  \msim{}  map(f;rev(v)  @  [u])  @  bs


By

---

Latex:
(RWO    "map\_append\_sq"  0  THENA  Auto)

---

Home Index