---

Step * 2 1 1 of Lemma fpf-join-list-ap


1. [A] : Type
2. eq : EqDecider(A)@i
3. [B] : A ─→ Type
4. u : a:A fp-> B[a]@i
5. v : a:A fp-> B[a] List@i
6. ∀x:A. (∃f∈v. (↑x ∈ dom(f)) ∧ (⊕(v)(x) = f(x) ∈ B[x])) supposing ↑x ∈ dom(⊕(v))@i
7. x : A@i
8. ↑x ∈ dom(⊕(v))
9. ¬↑x ∈ dom(u)
10. (∃f∈v. (↑x ∈ dom(f)) ∧ (⊕(v)(x) = f(x) ∈ B[x]))
⊢ (∃f∈v. (↑x ∈ dom(f)) ∧ (u ⊕ ⊕(v)(x) = f(x) ∈ B[x]))
BY
{ RepeatFor 2 (ParallelLast) }

1
1. [A] : Type
2. eq : EqDecider(A)@i
3. [B] : A ─→ Type
4. u : a:A fp-> B[a]@i
5. v : a:A fp-> B[a] List@i
6. ∀x:A. (∃f∈v. (↑x ∈ dom(f)) ∧ (⊕(v)(x) = f(x) ∈ B[x])) supposing ↑x ∈ dom(⊕(v))@i
7. x : A@i
8. ↑x ∈ dom(⊕(v))
9. ¬↑x ∈ dom(u)
10. i : ℕ||v||
11. (↑x ∈ dom(v[i])) ∧ (⊕(v)(x) = v[i](x) ∈ B[x])
⊢ (↑x ∈ dom(v[i])) ∧ (u ⊕ ⊕(v)(x) = v[i](x) ∈ B[x])

---

Latex:



1.  [A]  :  Type
2.  eq  :  EqDecider(A)@i
3.  [B]  :  A  {}\mrightarrow{}  Type
4.  u  :  a:A  fp->  B[a]@i
5.  v  :  a:A  fp->  B[a]  List@i
6.  \mforall{}x:A.  (\mexists{}f\mmember{}v.  (\muparrow{}x  \mmember{}  dom(f))  \mwedge{}  (\moplus{}(v)(x)  =  f(x)))  supposing  \muparrow{}x  \mmember{}  dom(\moplus{}(v))@i
7.  x  :  A@i
8.  \muparrow{}x  \mmember{}  dom(\moplus{}(v))
9.  \mneg{}\muparrow{}x  \mmember{}  dom(u)
10.  (\mexists{}f\mmember{}v.  (\muparrow{}x  \mmember{}  dom(f))  \mwedge{}  (\moplus{}(v)(x)  =  f(x)))
\mvdash{}  (\mexists{}f\mmember{}v.  (\muparrow{}x  \mmember{}  dom(f))  \mwedge{}  (u  \moplus{}  \moplus{}(v)(x)  =  f(x)))


By

RepeatFor  2  (ParallelLast)

---

Home Index