---

Step * 1 1 of Lemma fpf_ap_compose_lemma


1. x : Top
2. eq : Top
3. f : Top
4. g : Top
⊢ g ((snd(f)) x) ~ g f(x)
BY
{ Try (RW (AddrC [2] (UnfoldC `fpf-ap` ANDTHENC ReduceC)) 0)⋅ }

1
1. x : Top
2. eq : Top
3. f : Top
4. g : Top
⊢ g ((snd(f)) x) ~ g ((snd(f)) x)

---

Latex:

---

Latex:

1.  x  :  Top
2.  eq  :  Top
3.  f  :  Top
4.  g  :  Top
\mvdash{}  g  ((snd(f))  x)  \msim{}  g  f(x)


By

---

Latex:
Try  (RW  (AddrC  [2]  (UnfoldC  `fpf-ap`  ANDTHENC  ReduceC))  0)\mcdot{}

---

Home Index