MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  utop2nei Structured version   Visualization version   GIF version

Theorem utop2nei 21864
Description: For any symmetrical entourage 𝑉 and any relation 𝑀, build a neighborhood of 𝑀. First part of proposition 2 of [BourbakiTop1] p. II.4. (Contributed by Thierry Arnoux, 14-Jan-2018.)
Hypothesis
Ref Expression
utoptop.1 𝐽 = (unifTop‘𝑈)
Assertion
Ref Expression
utop2nei ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))

Proof of Theorem utop2nei
Dummy variables 𝑟 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 utoptop.1 . . . . . . . 8 𝐽 = (unifTop‘𝑈)
2 utoptop 21848 . . . . . . . 8 (𝑈 ∈ (UnifOn‘𝑋) → (unifTop‘𝑈) ∈ Top)
31, 2syl5eqel 2692 . . . . . . 7 (𝑈 ∈ (UnifOn‘𝑋) → 𝐽 ∈ Top)
4 txtop 21182 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝐽 ∈ Top) → (𝐽 ×t 𝐽) ∈ Top)
53, 3, 4syl2anc 691 . . . . . 6 (𝑈 ∈ (UnifOn‘𝑋) → (𝐽 ×t 𝐽) ∈ Top)
653ad2ant1 1075 . . . . 5 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝐽 ×t 𝐽) ∈ Top)
76adantr 480 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → (𝐽 ×t 𝐽) ∈ Top)
8 0nei 20742 . . . 4 ((𝐽 ×t 𝐽) ∈ Top → ∅ ∈ ((nei‘(𝐽 ×t 𝐽))‘∅))
97, 8syl 17 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → ∅ ∈ ((nei‘(𝐽 ×t 𝐽))‘∅))
10 coeq1 5201 . . . . . . 7 (𝑀 = ∅ → (𝑀𝑉) = (∅ ∘ 𝑉))
11 co01 5567 . . . . . . 7 (∅ ∘ 𝑉) = ∅
1210, 11syl6eq 2660 . . . . . 6 (𝑀 = ∅ → (𝑀𝑉) = ∅)
1312coeq2d 5206 . . . . 5 (𝑀 = ∅ → (𝑉 ∘ (𝑀𝑉)) = (𝑉 ∘ ∅))
14 co02 5566 . . . . 5 (𝑉 ∘ ∅) = ∅
1513, 14syl6eq 2660 . . . 4 (𝑀 = ∅ → (𝑉 ∘ (𝑀𝑉)) = ∅)
1615adantl 481 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → (𝑉 ∘ (𝑀𝑉)) = ∅)
17 simpr 476 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → 𝑀 = ∅)
1817fveq2d 6107 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → ((nei‘(𝐽 ×t 𝐽))‘𝑀) = ((nei‘(𝐽 ×t 𝐽))‘∅))
199, 16, 183eltr4d 2703 . 2 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))
206adantr 480 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝐽 ×t 𝐽) ∈ Top)
21 simpl1 1057 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑈 ∈ (UnifOn‘𝑋))
2221, 3syl 17 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝐽 ∈ Top)
23 simpl2l 1107 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑉𝑈)
24 simp3 1056 . . . . . . . . . . . 12 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑀 ⊆ (𝑋 × 𝑋))
2524sselda 3568 . . . . . . . . . . 11 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑟 ∈ (𝑋 × 𝑋))
26 xp1st 7089 . . . . . . . . . . 11 (𝑟 ∈ (𝑋 × 𝑋) → (1st𝑟) ∈ 𝑋)
2725, 26syl 17 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (1st𝑟) ∈ 𝑋)
281utopsnnei 21863 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈 ∧ (1st𝑟) ∈ 𝑋) → (𝑉 “ {(1st𝑟)}) ∈ ((nei‘𝐽)‘{(1st𝑟)}))
2921, 23, 27, 28syl3anc 1318 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 “ {(1st𝑟)}) ∈ ((nei‘𝐽)‘{(1st𝑟)}))
30 xp2nd 7090 . . . . . . . . . . 11 (𝑟 ∈ (𝑋 × 𝑋) → (2nd𝑟) ∈ 𝑋)
3125, 30syl 17 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (2nd𝑟) ∈ 𝑋)
321utopsnnei 21863 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈 ∧ (2nd𝑟) ∈ 𝑋) → (𝑉 “ {(2nd𝑟)}) ∈ ((nei‘𝐽)‘{(2nd𝑟)}))
3321, 23, 31, 32syl3anc 1318 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 “ {(2nd𝑟)}) ∈ ((nei‘𝐽)‘{(2nd𝑟)}))
34 eqid 2610 . . . . . . . . . 10 𝐽 = 𝐽
3534, 34neitx 21220 . . . . . . . . 9 (((𝐽 ∈ Top ∧ 𝐽 ∈ Top) ∧ ((𝑉 “ {(1st𝑟)}) ∈ ((nei‘𝐽)‘{(1st𝑟)}) ∧ (𝑉 “ {(2nd𝑟)}) ∈ ((nei‘𝐽)‘{(2nd𝑟)}))) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘({(1st𝑟)} × {(2nd𝑟)})))
3622, 22, 29, 33, 35syl22anc 1319 . . . . . . . 8 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘({(1st𝑟)} × {(2nd𝑟)})))
37 fvex 6113 . . . . . . . . . 10 (1st𝑟) ∈ V
38 fvex 6113 . . . . . . . . . 10 (2nd𝑟) ∈ V
3937, 38xpsn 6313 . . . . . . . . 9 ({(1st𝑟)} × {(2nd𝑟)}) = {⟨(1st𝑟), (2nd𝑟)⟩}
4039fveq2i 6106 . . . . . . . 8 ((nei‘(𝐽 ×t 𝐽))‘({(1st𝑟)} × {(2nd𝑟)})) = ((nei‘(𝐽 ×t 𝐽))‘{⟨(1st𝑟), (2nd𝑟)⟩})
4136, 40syl6eleq 2698 . . . . . . 7 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘{⟨(1st𝑟), (2nd𝑟)⟩}))
4224adantr 480 . . . . . . . . . . 11 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑀 ⊆ (𝑋 × 𝑋))
43 xpss 5149 . . . . . . . . . . . . 13 (𝑋 × 𝑋) ⊆ (V × V)
44 sstr 3576 . . . . . . . . . . . . 13 ((𝑀 ⊆ (𝑋 × 𝑋) ∧ (𝑋 × 𝑋) ⊆ (V × V)) → 𝑀 ⊆ (V × V))
4543, 44mpan2 703 . . . . . . . . . . . 12 (𝑀 ⊆ (𝑋 × 𝑋) → 𝑀 ⊆ (V × V))
46 df-rel 5045 . . . . . . . . . . . 12 (Rel 𝑀𝑀 ⊆ (V × V))
4745, 46sylibr 223 . . . . . . . . . . 11 (𝑀 ⊆ (𝑋 × 𝑋) → Rel 𝑀)
4842, 47syl 17 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → Rel 𝑀)
49 1st2nd 7105 . . . . . . . . . 10 ((Rel 𝑀𝑟𝑀) → 𝑟 = ⟨(1st𝑟), (2nd𝑟)⟩)
5048, 49sylancom 698 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑟 = ⟨(1st𝑟), (2nd𝑟)⟩)
5150sneqd 4137 . . . . . . . 8 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → {𝑟} = {⟨(1st𝑟), (2nd𝑟)⟩})
5251fveq2d 6107 . . . . . . 7 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((nei‘(𝐽 ×t 𝐽))‘{𝑟}) = ((nei‘(𝐽 ×t 𝐽))‘{⟨(1st𝑟), (2nd𝑟)⟩}))
5341, 52eleqtrrd 2691 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
54 relxp 5150 . . . . . . . . . . 11 Rel ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))
5554a1i 11 . . . . . . . . . 10 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → Rel ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})))
56 1st2nd 7105 . . . . . . . . . 10 ((Rel ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
5755, 56sylancom 698 . . . . . . . . 9 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
58 simpll2 1094 . . . . . . . . . . . . 13 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (𝑉𝑈𝑉 = 𝑉))
5958simprd 478 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑉 = 𝑉)
60 simpll1 1093 . . . . . . . . . . . . . 14 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑈 ∈ (UnifOn‘𝑋))
6158simpld 474 . . . . . . . . . . . . . 14 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑉𝑈)
62 ustrel 21825 . . . . . . . . . . . . . 14 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈) → Rel 𝑉)
6360, 61, 62syl2anc 691 . . . . . . . . . . . . 13 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → Rel 𝑉)
64 xp1st 7089 . . . . . . . . . . . . . 14 (𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) → (1st𝑧) ∈ (𝑉 “ {(1st𝑟)}))
6564adantl 481 . . . . . . . . . . . . 13 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑧) ∈ (𝑉 “ {(1st𝑟)}))
66 elrelimasn 5408 . . . . . . . . . . . . . 14 (Rel 𝑉 → ((1st𝑧) ∈ (𝑉 “ {(1st𝑟)}) ↔ (1st𝑟)𝑉(1st𝑧)))
6766biimpa 500 . . . . . . . . . . . . 13 ((Rel 𝑉 ∧ (1st𝑧) ∈ (𝑉 “ {(1st𝑟)})) → (1st𝑟)𝑉(1st𝑧))
6863, 65, 67syl2anc 691 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑟)𝑉(1st𝑧))
69 fvex 6113 . . . . . . . . . . . . . . 15 (1st𝑧) ∈ V
7037, 69brcnv 5227 . . . . . . . . . . . . . 14 ((1st𝑟)𝑉(1st𝑧) ↔ (1st𝑧)𝑉(1st𝑟))
71 breq 4585 . . . . . . . . . . . . . 14 (𝑉 = 𝑉 → ((1st𝑟)𝑉(1st𝑧) ↔ (1st𝑟)𝑉(1st𝑧)))
7270, 71syl5bbr 273 . . . . . . . . . . . . 13 (𝑉 = 𝑉 → ((1st𝑧)𝑉(1st𝑟) ↔ (1st𝑟)𝑉(1st𝑧)))
7372biimpar 501 . . . . . . . . . . . 12 ((𝑉 = 𝑉 ∧ (1st𝑟)𝑉(1st𝑧)) → (1st𝑧)𝑉(1st𝑟))
7459, 68, 73syl2anc 691 . . . . . . . . . . 11 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑧)𝑉(1st𝑟))
75 simpll3 1095 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑀 ⊆ (𝑋 × 𝑋))
76 simplr 788 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑟𝑀)
77 1st2ndbr 7108 . . . . . . . . . . . . 13 ((Rel 𝑀𝑟𝑀) → (1st𝑟)𝑀(2nd𝑟))
7847, 77sylan 487 . . . . . . . . . . . 12 ((𝑀 ⊆ (𝑋 × 𝑋) ∧ 𝑟𝑀) → (1st𝑟)𝑀(2nd𝑟))
7975, 76, 78syl2anc 691 . . . . . . . . . . 11 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑟)𝑀(2nd𝑟))
80 xp2nd 7090 . . . . . . . . . . . . 13 (𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) → (2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)}))
8180adantl 481 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)}))
82 elrelimasn 5408 . . . . . . . . . . . . 13 (Rel 𝑉 → ((2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)}) ↔ (2nd𝑟)𝑉(2nd𝑧)))
8382biimpa 500 . . . . . . . . . . . 12 ((Rel 𝑉 ∧ (2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)})) → (2nd𝑟)𝑉(2nd𝑧))
8463, 81, 83syl2anc 691 . . . . . . . . . . 11 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (2nd𝑟)𝑉(2nd𝑧))
8569, 38, 373pm3.2i 1232 . . . . . . . . . . . . 13 ((1st𝑧) ∈ V ∧ (2nd𝑟) ∈ V ∧ (1st𝑟) ∈ V)
86 brcogw 5212 . . . . . . . . . . . . 13 ((((1st𝑧) ∈ V ∧ (2nd𝑟) ∈ V ∧ (1st𝑟) ∈ V) ∧ ((1st𝑧)𝑉(1st𝑟) ∧ (1st𝑟)𝑀(2nd𝑟))) → (1st𝑧)(𝑀𝑉)(2nd𝑟))
8785, 86mpan 702 . . . . . . . . . . . 12 (((1st𝑧)𝑉(1st𝑟) ∧ (1st𝑟)𝑀(2nd𝑟)) → (1st𝑧)(𝑀𝑉)(2nd𝑟))
88 fvex 6113 . . . . . . . . . . . . . 14 (2nd𝑧) ∈ V
8969, 88, 383pm3.2i 1232 . . . . . . . . . . . . 13 ((1st𝑧) ∈ V ∧ (2nd𝑧) ∈ V ∧ (2nd𝑟) ∈ V)
90 brcogw 5212 . . . . . . . . . . . . 13 ((((1st𝑧) ∈ V ∧ (2nd𝑧) ∈ V ∧ (2nd𝑟) ∈ V) ∧ ((1st𝑧)(𝑀𝑉)(2nd𝑟) ∧ (2nd𝑟)𝑉(2nd𝑧))) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
9189, 90mpan 702 . . . . . . . . . . . 12 (((1st𝑧)(𝑀𝑉)(2nd𝑟) ∧ (2nd𝑟)𝑉(2nd𝑧)) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
9287, 91sylan 487 . . . . . . . . . . 11 ((((1st𝑧)𝑉(1st𝑟) ∧ (1st𝑟)𝑀(2nd𝑟)) ∧ (2nd𝑟)𝑉(2nd𝑧)) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
9374, 79, 84, 92syl21anc 1317 . . . . . . . . . 10 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
94 df-br 4584 . . . . . . . . . 10 ((1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧) ↔ ⟨(1st𝑧), (2nd𝑧)⟩ ∈ (𝑉 ∘ (𝑀𝑉)))
9593, 94sylib 207 . . . . . . . . 9 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → ⟨(1st𝑧), (2nd𝑧)⟩ ∈ (𝑉 ∘ (𝑀𝑉)))
9657, 95eqeltrd 2688 . . . . . . . 8 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑧 ∈ (𝑉 ∘ (𝑀𝑉)))
9796ex 449 . . . . . . 7 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) → 𝑧 ∈ (𝑉 ∘ (𝑀𝑉))))
9897ssrdv 3574 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ⊆ (𝑉 ∘ (𝑀𝑉)))
99 simp1 1054 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑈 ∈ (UnifOn‘𝑋))
100 simp2l 1080 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑉𝑈)
101 ustssxp 21818 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈) → 𝑉 ⊆ (𝑋 × 𝑋))
10299, 100, 101syl2anc 691 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑉 ⊆ (𝑋 × 𝑋))
103 coss1 5199 . . . . . . . . . 10 (𝑉 ⊆ (𝑋 × 𝑋) → (𝑉 ∘ (𝑀𝑉)) ⊆ ((𝑋 × 𝑋) ∘ (𝑀𝑉)))
104102, 103syl 17 . . . . . . . . 9 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ⊆ ((𝑋 × 𝑋) ∘ (𝑀𝑉)))
105 coss1 5199 . . . . . . . . . . . 12 (𝑀 ⊆ (𝑋 × 𝑋) → (𝑀𝑉) ⊆ ((𝑋 × 𝑋) ∘ 𝑉))
10624, 105syl 17 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑀𝑉) ⊆ ((𝑋 × 𝑋) ∘ 𝑉))
107 coss2 5200 . . . . . . . . . . . . 13 (𝑉 ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ 𝑉) ⊆ ((𝑋 × 𝑋) ∘ (𝑋 × 𝑋)))
108 xpcoid 5593 . . . . . . . . . . . . 13 ((𝑋 × 𝑋) ∘ (𝑋 × 𝑋)) = (𝑋 × 𝑋)
109107, 108syl6sseq 3614 . . . . . . . . . . . 12 (𝑉 ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ 𝑉) ⊆ (𝑋 × 𝑋))
110102, 109syl 17 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → ((𝑋 × 𝑋) ∘ 𝑉) ⊆ (𝑋 × 𝑋))
111106, 110sstrd 3578 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑀𝑉) ⊆ (𝑋 × 𝑋))
112 coss2 5200 . . . . . . . . . . 11 ((𝑀𝑉) ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ (𝑀𝑉)) ⊆ ((𝑋 × 𝑋) ∘ (𝑋 × 𝑋)))
113112, 108syl6sseq 3614 . . . . . . . . . 10 ((𝑀𝑉) ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ (𝑀𝑉)) ⊆ (𝑋 × 𝑋))
114111, 113syl 17 . . . . . . . . 9 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → ((𝑋 × 𝑋) ∘ (𝑀𝑉)) ⊆ (𝑋 × 𝑋))
115104, 114sstrd 3578 . . . . . . . 8 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ⊆ (𝑋 × 𝑋))
116 utopbas 21849 . . . . . . . . . . . 12 (𝑈 ∈ (UnifOn‘𝑋) → 𝑋 = (unifTop‘𝑈))
1171unieqi 4381 . . . . . . . . . . . 12 𝐽 = (unifTop‘𝑈)
118116, 117syl6eqr 2662 . . . . . . . . . . 11 (𝑈 ∈ (UnifOn‘𝑋) → 𝑋 = 𝐽)
119118sqxpeqd 5065 . . . . . . . . . 10 (𝑈 ∈ (UnifOn‘𝑋) → (𝑋 × 𝑋) = ( 𝐽 × 𝐽))
12034, 34txuni 21205 . . . . . . . . . . 11 ((𝐽 ∈ Top ∧ 𝐽 ∈ Top) → ( 𝐽 × 𝐽) = (𝐽 ×t 𝐽))
1213, 3, 120syl2anc 691 . . . . . . . . . 10 (𝑈 ∈ (UnifOn‘𝑋) → ( 𝐽 × 𝐽) = (𝐽 ×t 𝐽))
122119, 121eqtrd 2644 . . . . . . . . 9 (𝑈 ∈ (UnifOn‘𝑋) → (𝑋 × 𝑋) = (𝐽 ×t 𝐽))
1231223ad2ant1 1075 . . . . . . . 8 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑋 × 𝑋) = (𝐽 ×t 𝐽))
124115, 123sseqtrd 3604 . . . . . . 7 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ⊆ (𝐽 ×t 𝐽))
125124adantr 480 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 ∘ (𝑀𝑉)) ⊆ (𝐽 ×t 𝐽))
126 eqid 2610 . . . . . . 7 (𝐽 ×t 𝐽) = (𝐽 ×t 𝐽)
127126ssnei2 20730 . . . . . 6 ((((𝐽 ×t 𝐽) ∈ Top ∧ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟})) ∧ (((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ⊆ (𝑉 ∘ (𝑀𝑉)) ∧ (𝑉 ∘ (𝑀𝑉)) ⊆ (𝐽 ×t 𝐽))) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
12820, 53, 98, 125, 127syl22anc 1319 . . . . 5 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
129128ralrimiva 2949 . . . 4 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
130129adantr 480 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
1316adantr 480 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → (𝐽 ×t 𝐽) ∈ Top)
13224, 123sseqtrd 3604 . . . . 5 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑀 (𝐽 ×t 𝐽))
133132adantr 480 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → 𝑀 (𝐽 ×t 𝐽))
134 simpr 476 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → 𝑀 ≠ ∅)
135126neips 20727 . . . 4 (((𝐽 ×t 𝐽) ∈ Top ∧ 𝑀 (𝐽 ×t 𝐽) ∧ 𝑀 ≠ ∅) → ((𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀) ↔ ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟})))
136131, 133, 134, 135syl3anc 1318 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → ((𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀) ↔ ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟})))
137130, 136mpbird 246 . 2 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))
13819, 137pm2.61dane 2869 1 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 195  wa 383  w3a 1031   = wceq 1475  wcel 1977  wne 2780  wral 2896  Vcvv 3173  wss 3540  c0 3874  {csn 4125  cop 4131   cuni 4372   class class class wbr 4583   × cxp 5036  ccnv 5037  cima 5041  ccom 5042  Rel wrel 5043  cfv 5804  (class class class)co 6549  1st c1st 7057  2nd c2nd 7058  Topctop 20517  neicnei 20711   ×t ctx 21173  UnifOncust 21813  unifTopcutop 21844
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-reu 2903  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-int 4411  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-om 6958  df-1st 7059  df-2nd 7060  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-1o 7447  df-oadd 7451  df-er 7629  df-en 7842  df-fin 7845  df-fi 8200  df-topgen 15927  df-top 20521  df-bases 20522  df-topon 20523  df-nei 20712  df-tx 21175  df-ust 21814  df-utop 21845
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator