---

Step * 2 of Lemma member-concat-map


1. [T] : Type
2. [S] : Type
3. f : T ⟶ (S List)@i
4. u : T@i
5. v : T List@i
6. ∀x:S. ((x ∈ concat(map(f;v))) ⇐⇒ (∃t∈v. (x ∈ f t)))@i
7. x : S@i
8. (x ∈ (f u) @ concat(map(f;v)))@i
⊢ (∃t∈[u / v]. (x ∈ f t))
BY
{ ((BLemma `l_exists_cons` THENA Auto)
   THEN (RWO "member_append" (-1) THENA Auto)
   THEN ParallelLast
   THEN BackThruSomeHyp
   THEN Auto) }

---

Latex:

---

Latex:

1.  [T]  :  Type
2.  [S]  :  Type
3.  f  :  T  {}\mrightarrow{}  (S  List)@i
4.  u  :  T@i
5.  v  :  T  List@i
6.  \mforall{}x:S.  ((x  \mmember{}  concat(map(f;v)))  \mLeftarrow{}{}\mRightarrow{}  (\mexists{}t\mmember{}v.  (x  \mmember{}  f  t)))@i
7.  x  :  S@i
8.  (x  \mmember{}  (f  u)  @  concat(map(f;v)))@i
\mvdash{}  (\mexists{}t\mmember{}[u  /  v].  (x  \mmember{}  f  t))


By

---

Latex:
((BLemma  `l\_exists\_cons`  THENA  Auto)
  THEN  (RWO  "member\_append"  (-1)  THENA  Auto)
  THEN  ParallelLast
  THEN  BackThruSomeHyp
  THEN  Auto)

---

Home Index