---

Step * 1 2 of Lemma path-comp-union


1. [A] : SeparationSpace
2. [B] : SeparationSpace
3. ∀f,g:Point(Path(A)).  (f@r1 ≡ g@r0 ⇒ (∃h:Point(Path(A)). path-comp-rel(A;f;g;h)))
4. ∀f,g:Point(Path(B)).  (f@r1 ≡ g@r0 ⇒ (∃h:Point(Path(B)). path-comp-rel(B;f;g;h)))
5. f : Point(Path(A + B))
6. g : Point(Path(A + B))
7. f@r1 ≡ g@r0
8. (∀x:{x:ℝ| (r0 ≤ x) ∧ (x ≤ r1)} . (↑isl(f@x))) ∧ (λx.outl(f x) ∈ Point(Path(A)))
9. (∀x:{x:ℝ| (r0 ≤ x) ∧ (x ≤ r1)} . (↑isl(g@x))) ∧ (λx.outl(g x) ∈ Point(Path(A)))
10. ∃h:Point(Path(A)). path-comp-rel(A;λx.outl(f x);λx.outl(g x);h)
⊢ ∃h:Point(Path(A + B)). path-comp-rel(A + B;f;g;h)
BY
{ (ExRepD THEN D 0 With ⌜λx.(inl (h x))⌝  THEN Auto) }

1
.....wf..... 
1. A : SeparationSpace
2. B : SeparationSpace
3. ∀f,g:Point(Path(A)).  (f@r1 ≡ g@r0 ⇒ (∃h:Point(Path(A)). path-comp-rel(A;f;g;h)))
4. ∀f,g:Point(Path(B)).  (f@r1 ≡ g@r0 ⇒ (∃h:Point(Path(B)). path-comp-rel(B;f;g;h)))
5. f : Point(Path(A + B))
6. g : Point(Path(A + B))
7. f@r1 ≡ g@r0
8. ∀x:{x:ℝ| (r0 ≤ x) ∧ (x ≤ r1)} . (↑isl(f@x))
9. λx.outl(f x) ∈ Point(Path(A))
10. ∀x:{x:ℝ| (r0 ≤ x) ∧ (x ≤ r1)} . (↑isl(g@x))
11. λx.outl(g x) ∈ Point(Path(A))
12. h : Point(Path(A))
13. path-comp-rel(A;λx.outl(f x);λx.outl(g x);h)
⊢ λx.(inl (h x)) ∈ Point(Path(A + B))

2
1. [A] : SeparationSpace
2. [B] : SeparationSpace
3. ∀f,g:Point(Path(A)).  (f@r1 ≡ g@r0 ⇒ (∃h:Point(Path(A)). path-comp-rel(A;f;g;h)))
4. ∀f,g:Point(Path(B)).  (f@r1 ≡ g@r0 ⇒ (∃h:Point(Path(B)). path-comp-rel(B;f;g;h)))
5. f : Point(Path(A + B))
6. g : Point(Path(A + B))
7. f@r1 ≡ g@r0
8. ∀x:{x:ℝ| (r0 ≤ x) ∧ (x ≤ r1)} . (↑isl(f@x))
9. λx.outl(f x) ∈ Point(Path(A))
10. ∀x:{x:ℝ| (r0 ≤ x) ∧ (x ≤ r1)} . (↑isl(g@x))
11. λx.outl(g x) ∈ Point(Path(A))
12. h : Point(Path(A))
13. path-comp-rel(A;λx.outl(f x);λx.outl(g x);h)
⊢ path-comp-rel(A + B;f;g;λx.(inl (h x)))

---

Latex:

---

Latex:

1.  [A]  :  SeparationSpace
2.  [B]  :  SeparationSpace
3.  \mforall{}f,g:Point(Path(A)).    (f@r1  \mequiv{}  g@r0  {}\mRightarrow{}  (\mexists{}h:Point(Path(A)).  path-comp-rel(A;f;g;h)))
4.  \mforall{}f,g:Point(Path(B)).    (f@r1  \mequiv{}  g@r0  {}\mRightarrow{}  (\mexists{}h:Point(Path(B)).  path-comp-rel(B;f;g;h)))
5.  f  :  Point(Path(A  +  B))
6.  g  :  Point(Path(A  +  B))
7.  f@r1  \mequiv{}  g@r0
8.  (\mforall{}x:\{x:\mBbbR{}|  (r0  \mleq{}  x)  \mwedge{}  (x  \mleq{}  r1)\}  .  (\muparrow{}isl(f@x)))  \mwedge{}  (\mlambda{}x.outl(f  x)  \mmember{}  Point(Path(A)))
9.  (\mforall{}x:\{x:\mBbbR{}|  (r0  \mleq{}  x)  \mwedge{}  (x  \mleq{}  r1)\}  .  (\muparrow{}isl(g@x)))  \mwedge{}  (\mlambda{}x.outl(g  x)  \mmember{}  Point(Path(A)))
10.  \mexists{}h:Point(Path(A)).  path-comp-rel(A;\mlambda{}x.outl(f  x);\mlambda{}x.outl(g  x);h)
\mvdash{}  \mexists{}h:Point(Path(A  +  B)).  path-comp-rel(A  +  B;f;g;h)


By

---

Latex:
(ExRepD  THEN  D  0  With  \mkleeneopen{}\mlambda{}x.(inl  (h  x))\mkleeneclose{}    THEN  Auto)

---

Home Index