---

Step * 1 of Lemma mon_for_cons_lemma


1. f : Top@i
2. as : Top@i
3. a : Top@i
4. g : Top@i
5. T : Top@i
⊢ For{g} x ∈ [a / as]. f[x] ~ f[a] * (For{g} x ∈ as. f[x])
BY
{ Try (RW (AddrC [1] (UnfoldsC ``infix_ap mon_for`` ANDTHENC ReduceC)) 0)⋅ }

1
1. f : Top@i
2. as : Top@i
3. a : Top@i
4. g : Top@i
5. T : Top@i
⊢ * f[a] (For{T,*,e} x ∈ as. f[x]) ~ f[a] * (For{g} x ∈ as. f[x])

---

Latex:

---

Latex:

1.  f  :  Top@i
2.  as  :  Top@i
3.  a  :  Top@i
4.  g  :  Top@i
5.  T  :  Top@i
\mvdash{}  For\{g\}  x  \mmember{}  [a  /  as].  f[x]  \msim{}  f[a]  *  (For\{g\}  x  \mmember{}  as.  f[x])


By

---

Latex:
Try  (RW  (AddrC  [1]  (UnfoldsC  ``infix\_ap  mon\_for``  ANDTHENC  ReduceC))  0)\mcdot{}

---

Home Index