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

Theorem utop2nei 24458
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 24442 . . . . . . . 8 (𝑈 ∈ (UnifOn‘𝑋) → (unifTop‘𝑈) ∈ Top)
31, 2eqeltrid 2869 . . . . . . 7 (𝑈 ∈ (UnifOn‘𝑋) → 𝐽 ∈ Top)
4 txtop 23777 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝐽 ∈ Top) → (𝐽 ×t 𝐽) ∈ Top)
53, 3, 4syl2anc 596 . . . . . 6 (𝑈 ∈ (UnifOn‘𝑋) → (𝐽 ×t 𝐽) ∈ Top)
653ad2ant1 1151 . . . . 5 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝐽 ×t 𝐽) ∈ Top)
76adantr 486 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → (𝐽 ×t 𝐽) ∈ Top)
8 0nei 23335 . . . 4 ((𝐽 ×t 𝐽) ∈ Top → ∅ ∈ ((nei‘(𝐽 ×t 𝐽))‘∅))
97, 8syl 18 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → ∅ ∈ ((nei‘(𝐽 ×t 𝐽))‘∅))
10 coeq1 5845 . . . . . . 7 (𝑀 = ∅ → (𝑀𝑉) = (∅ ∘ 𝑉))
11 co01 6265 . . . . . . 7 (∅ ∘ 𝑉) = ∅
1210, 11eqtrdi 2816 . . . . . 6 (𝑀 = ∅ → (𝑀𝑉) = ∅)
1312coeq2d 5850 . . . . 5 (𝑀 = ∅ → (𝑉 ∘ (𝑀𝑉)) = (𝑉 ∘ ∅))
14 co02 6264 . . . . 5 (𝑉 ∘ ∅) = ∅
1513, 14eqtrdi 2816 . . . 4 (𝑀 = ∅ → (𝑉 ∘ (𝑀𝑉)) = ∅)
1615adantl 487 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → (𝑉 ∘ (𝑀𝑉)) = ∅)
17 simpr 490 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → 𝑀 = ∅)
1817fveq2d 6889 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → ((nei‘(𝐽 ×t 𝐽))‘𝑀) = ((nei‘(𝐽 ×t 𝐽))‘∅))
199, 16, 183eltr4d 2880 . 2 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))
206adantr 486 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝐽 ×t 𝐽) ∈ Top)
21 simpl1 1210 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑈 ∈ (UnifOn‘𝑋))
2221, 3syl 18 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝐽 ∈ Top)
23 simpl2l 1245 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑉𝑈)
24 simp3 1156 . . . . . . . . . . . 12 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑀 ⊆ (𝑋 × 𝑋))
2524sselda 3938 . . . . . . . . . . 11 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑟 ∈ (𝑋 × 𝑋))
26 xp1st 8024 . . . . . . . . . . 11 (𝑟 ∈ (𝑋 × 𝑋) → (1st𝑟) ∈ 𝑋)
2725, 26syl 18 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (1st𝑟) ∈ 𝑋)
281utopsnnei 24457 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈 ∧ (1st𝑟) ∈ 𝑋) → (𝑉 “ {(1st𝑟)}) ∈ ((nei‘𝐽)‘{(1st𝑟)}))
2921, 23, 27, 28syl3anc 1398 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 “ {(1st𝑟)}) ∈ ((nei‘𝐽)‘{(1st𝑟)}))
30 xp2nd 8025 . . . . . . . . . . 11 (𝑟 ∈ (𝑋 × 𝑋) → (2nd𝑟) ∈ 𝑋)
3125, 30syl 18 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (2nd𝑟) ∈ 𝑋)
321utopsnnei 24457 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈 ∧ (2nd𝑟) ∈ 𝑋) → (𝑉 “ {(2nd𝑟)}) ∈ ((nei‘𝐽)‘{(2nd𝑟)}))
3321, 23, 31, 32syl3anc 1398 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 “ {(2nd𝑟)}) ∈ ((nei‘𝐽)‘{(2nd𝑟)}))
34 eqid 2765 . . . . . . . . . 10 𝐽 = 𝐽
3534, 34neitx 23815 . . . . . . . . 9 (((𝐽 ∈ Top ∧ 𝐽 ∈ Top) ∧ ((𝑉 “ {(1st𝑟)}) ∈ ((nei‘𝐽)‘{(1st𝑟)}) ∧ (𝑉 “ {(2nd𝑟)}) ∈ ((nei‘𝐽)‘{(2nd𝑟)}))) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘({(1st𝑟)} × {(2nd𝑟)})))
3622, 22, 29, 33, 35syl22anc 852 . . . . . . . 8 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘({(1st𝑟)} × {(2nd𝑟)})))
37 fvex 6898 . . . . . . . . . 10 (1st𝑟) ∈ V
38 fvex 6898 . . . . . . . . . 10 (2nd𝑟) ∈ V
3937, 38xpsn 7140 . . . . . . . . 9 ({(1st𝑟)} × {(2nd𝑟)}) = {⟨(1st𝑟), (2nd𝑟)⟩}
4039fveq2i 6888 . . . . . . . 8 ((nei‘(𝐽 ×t 𝐽))‘({(1st𝑟)} × {(2nd𝑟)})) = ((nei‘(𝐽 ×t 𝐽))‘{⟨(1st𝑟), (2nd𝑟)⟩})
4136, 40eleqtrdi 2875 . . . . . . 7 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘{⟨(1st𝑟), (2nd𝑟)⟩}))
4224adantr 486 . . . . . . . . . . 11 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑀 ⊆ (𝑋 × 𝑋))
43 xpss 5679 . . . . . . . . . . . . 13 (𝑋 × 𝑋) ⊆ (V × V)
44 sstr 3946 . . . . . . . . . . . . 13 ((𝑀 ⊆ (𝑋 × 𝑋) ∧ (𝑋 × 𝑋) ⊆ (V × V)) → 𝑀 ⊆ (V × V))
4543, 44mpan2 704 . . . . . . . . . . . 12 (𝑀 ⊆ (𝑋 × 𝑋) → 𝑀 ⊆ (V × V))
46 df-rel 5670 . . . . . . . . . . . 12 (Rel 𝑀𝑀 ⊆ (V × V))
4745, 46sylibr 237 . . . . . . . . . . 11 (𝑀 ⊆ (𝑋 × 𝑋) → Rel 𝑀)
4842, 47syl 18 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → Rel 𝑀)
49 1st2nd 8042 . . . . . . . . . 10 ((Rel 𝑀𝑟𝑀) → 𝑟 = ⟨(1st𝑟), (2nd𝑟)⟩)
5048, 49sylancom 600 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑟 = ⟨(1st𝑟), (2nd𝑟)⟩)
5150sneqd 4603 . . . . . . . 8 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → {𝑟} = {⟨(1st𝑟), (2nd𝑟)⟩})
5251fveq2d 6889 . . . . . . 7 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((nei‘(𝐽 ×t 𝐽))‘{𝑟}) = ((nei‘(𝐽 ×t 𝐽))‘{⟨(1st𝑟), (2nd𝑟)⟩}))
5341, 52eleqtrrd 2868 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
54 relxp 5681 . . . . . . . . . . 11 Rel ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))
5554a1i 11 . . . . . . . . . 10 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → Rel ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})))
56 1st2nd 8042 . . . . . . . . . 10 ((Rel ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
5755, 56sylancom 600 . . . . . . . . 9 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
58 simpll2 1232 . . . . . . . . . . . . 13 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (𝑉𝑈𝑉 = 𝑉))
5958simprd 501 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑉 = 𝑉)
60 simpll1 1231 . . . . . . . . . . . . . 14 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑈 ∈ (UnifOn‘𝑋))
6158simpld 500 . . . . . . . . . . . . . 14 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑉𝑈)
62 ustrel 24420 . . . . . . . . . . . . . 14 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈) → Rel 𝑉)
6360, 61, 62syl2anc 596 . . . . . . . . . . . . 13 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → Rel 𝑉)
64 xp1st 8024 . . . . . . . . . . . . . 14 (𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) → (1st𝑧) ∈ (𝑉 “ {(1st𝑟)}))
6564adantl 487 . . . . . . . . . . . . 13 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑧) ∈ (𝑉 “ {(1st𝑟)}))
66 elrelimasn 6090 . . . . . . . . . . . . . 14 (Rel 𝑉 → ((1st𝑧) ∈ (𝑉 “ {(1st𝑟)}) ↔ (1st𝑟)𝑉(1st𝑧)))
6766biimpa 482 . . . . . . . . . . . . 13 ((Rel 𝑉 ∧ (1st𝑧) ∈ (𝑉 “ {(1st𝑟)})) → (1st𝑟)𝑉(1st𝑧))
6863, 65, 67syl2anc 596 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑟)𝑉(1st𝑧))
69 fvex 6898 . . . . . . . . . . . . . . 15 (1st𝑧) ∈ V
7037, 69brcnv 5870 . . . . . . . . . . . . . 14 ((1st𝑟)𝑉(1st𝑧) ↔ (1st𝑧)𝑉(1st𝑟))
71 breq 5113 . . . . . . . . . . . . . 14 (𝑉 = 𝑉 → ((1st𝑟)𝑉(1st𝑧) ↔ (1st𝑟)𝑉(1st𝑧)))
7270, 71bitr3id 288 . . . . . . . . . . . . 13 (𝑉 = 𝑉 → ((1st𝑧)𝑉(1st𝑟) ↔ (1st𝑟)𝑉(1st𝑧)))
7372biimpar 483 . . . . . . . . . . . 12 ((𝑉 = 𝑉 ∧ (1st𝑟)𝑉(1st𝑧)) → (1st𝑧)𝑉(1st𝑟))
7459, 68, 73syl2anc 596 . . . . . . . . . . 11 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑧)𝑉(1st𝑟))
75 simpll3 1233 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑀 ⊆ (𝑋 × 𝑋))
76 simplr 781 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑟𝑀)
77 1st2ndbr 8045 . . . . . . . . . . . . 13 ((Rel 𝑀𝑟𝑀) → (1st𝑟)𝑀(2nd𝑟))
7847, 77sylan 592 . . . . . . . . . . . 12 ((𝑀 ⊆ (𝑋 × 𝑋) ∧ 𝑟𝑀) → (1st𝑟)𝑀(2nd𝑟))
7975, 76, 78syl2anc 596 . . . . . . . . . . 11 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑟)𝑀(2nd𝑟))
80 xp2nd 8025 . . . . . . . . . . . . 13 (𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) → (2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)}))
8180adantl 487 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)}))
82 elrelimasn 6090 . . . . . . . . . . . . 13 (Rel 𝑉 → ((2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)}) ↔ (2nd𝑟)𝑉(2nd𝑧)))
8382biimpa 482 . . . . . . . . . . . 12 ((Rel 𝑉 ∧ (2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)})) → (2nd𝑟)𝑉(2nd𝑧))
8463, 81, 83syl2anc 596 . . . . . . . . . . 11 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (2nd𝑟)𝑉(2nd𝑧))
8569, 38, 373pm3.2i 1358 . . . . . . . . . . . . 13 ((1st𝑧) ∈ V ∧ (2nd𝑟) ∈ V ∧ (1st𝑟) ∈ V)
86 brcogw 5856 . . . . . . . . . . . . 13 ((((1st𝑧) ∈ V ∧ (2nd𝑟) ∈ V ∧ (1st𝑟) ∈ V) ∧ ((1st𝑧)𝑉(1st𝑟) ∧ (1st𝑟)𝑀(2nd𝑟))) → (1st𝑧)(𝑀𝑉)(2nd𝑟))
8785, 86mpan 703 . . . . . . . . . . . 12 (((1st𝑧)𝑉(1st𝑟) ∧ (1st𝑟)𝑀(2nd𝑟)) → (1st𝑧)(𝑀𝑉)(2nd𝑟))
88 fvex 6898 . . . . . . . . . . . . . 14 (2nd𝑧) ∈ V
8969, 88, 383pm3.2i 1358 . . . . . . . . . . . . 13 ((1st𝑧) ∈ V ∧ (2nd𝑧) ∈ V ∧ (2nd𝑟) ∈ V)
90 brcogw 5856 . . . . . . . . . . . . 13 ((((1st𝑧) ∈ V ∧ (2nd𝑧) ∈ V ∧ (2nd𝑟) ∈ V) ∧ ((1st𝑧)(𝑀𝑉)(2nd𝑟) ∧ (2nd𝑟)𝑉(2nd𝑧))) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
9189, 90mpan 703 . . . . . . . . . . . 12 (((1st𝑧)(𝑀𝑉)(2nd𝑟) ∧ (2nd𝑟)𝑉(2nd𝑧)) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
9287, 91sylan 592 . . . . . . . . . . 11 ((((1st𝑧)𝑉(1st𝑟) ∧ (1st𝑟)𝑀(2nd𝑟)) ∧ (2nd𝑟)𝑉(2nd𝑧)) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
9374, 79, 84, 92syl21anc 851 . . . . . . . . . 10 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
94 df-br 5112 . . . . . . . . . 10 ((1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧) ↔ ⟨(1st𝑧), (2nd𝑧)⟩ ∈ (𝑉 ∘ (𝑀𝑉)))
9593, 94sylib 221 . . . . . . . . 9 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → ⟨(1st𝑧), (2nd𝑧)⟩ ∈ (𝑉 ∘ (𝑀𝑉)))
9657, 95eqeltrd 2865 . . . . . . . 8 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑧 ∈ (𝑉 ∘ (𝑀𝑉)))
9796ex 418 . . . . . . 7 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) → 𝑧 ∈ (𝑉 ∘ (𝑀𝑉))))
9897ssrdv 3944 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ⊆ (𝑉 ∘ (𝑀𝑉)))
99 simp1 1154 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑈 ∈ (UnifOn‘𝑋))
100 simp2l 1218 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑉𝑈)
101 ustssxp 24413 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈) → 𝑉 ⊆ (𝑋 × 𝑋))
10299, 100, 101syl2anc 596 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑉 ⊆ (𝑋 × 𝑋))
103 coss1 5843 . . . . . . . . . 10 (𝑉 ⊆ (𝑋 × 𝑋) → (𝑉 ∘ (𝑀𝑉)) ⊆ ((𝑋 × 𝑋) ∘ (𝑀𝑉)))
104102, 103syl 18 . . . . . . . . 9 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ⊆ ((𝑋 × 𝑋) ∘ (𝑀𝑉)))
105 coss1 5843 . . . . . . . . . . . 12 (𝑀 ⊆ (𝑋 × 𝑋) → (𝑀𝑉) ⊆ ((𝑋 × 𝑋) ∘ 𝑉))
10624, 105syl 18 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑀𝑉) ⊆ ((𝑋 × 𝑋) ∘ 𝑉))
107 coss2 5844 . . . . . . . . . . . . 13 (𝑉 ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ 𝑉) ⊆ ((𝑋 × 𝑋) ∘ (𝑋 × 𝑋)))
108 xpcoid 6295 . . . . . . . . . . . . 13 ((𝑋 × 𝑋) ∘ (𝑋 × 𝑋)) = (𝑋 × 𝑋)
109107, 108sseqtrdi 3978 . . . . . . . . . . . 12 (𝑉 ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ 𝑉) ⊆ (𝑋 × 𝑋))
110102, 109syl 18 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → ((𝑋 × 𝑋) ∘ 𝑉) ⊆ (𝑋 × 𝑋))
111106, 110sstrd 3948 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑀𝑉) ⊆ (𝑋 × 𝑋))
112 coss2 5844 . . . . . . . . . . 11 ((𝑀𝑉) ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ (𝑀𝑉)) ⊆ ((𝑋 × 𝑋) ∘ (𝑋 × 𝑋)))
113112, 108sseqtrdi 3978 . . . . . . . . . 10 ((𝑀𝑉) ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ (𝑀𝑉)) ⊆ (𝑋 × 𝑋))
114111, 113syl 18 . . . . . . . . 9 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → ((𝑋 × 𝑋) ∘ (𝑀𝑉)) ⊆ (𝑋 × 𝑋))
115104, 114sstrd 3948 . . . . . . . 8 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ⊆ (𝑋 × 𝑋))
116 utopbas 24443 . . . . . . . . . . . 12 (𝑈 ∈ (UnifOn‘𝑋) → 𝑋 = (unifTop‘𝑈))
1171unieqi 4886 . . . . . . . . . . . 12 𝐽 = (unifTop‘𝑈)
118116, 117eqtr4di 2818 . . . . . . . . . . 11 (𝑈 ∈ (UnifOn‘𝑋) → 𝑋 = 𝐽)
119118sqxpeqd 5695 . . . . . . . . . 10 (𝑈 ∈ (UnifOn‘𝑋) → (𝑋 × 𝑋) = ( 𝐽 × 𝐽))
12034, 34txuni 23800 . . . . . . . . . . 11 ((𝐽 ∈ Top ∧ 𝐽 ∈ Top) → ( 𝐽 × 𝐽) = (𝐽 ×t 𝐽))
1213, 3, 120syl2anc 596 . . . . . . . . . 10 (𝑈 ∈ (UnifOn‘𝑋) → ( 𝐽 × 𝐽) = (𝐽 ×t 𝐽))
122119, 121eqtrd 2800 . . . . . . . . 9 (𝑈 ∈ (UnifOn‘𝑋) → (𝑋 × 𝑋) = (𝐽 ×t 𝐽))
1231223ad2ant1 1151 . . . . . . . 8 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑋 × 𝑋) = (𝐽 ×t 𝐽))
124115, 123sseqtrd 3974 . . . . . . 7 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ⊆ (𝐽 ×t 𝐽))
125124adantr 486 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 ∘ (𝑀𝑉)) ⊆ (𝐽 ×t 𝐽))
126 eqid 2765 . . . . . . 7 (𝐽 ×t 𝐽) = (𝐽 ×t 𝐽)
127126ssnei2 23323 . . . . . 6 ((((𝐽 ×t 𝐽) ∈ Top ∧ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟})) ∧ (((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ⊆ (𝑉 ∘ (𝑀𝑉)) ∧ (𝑉 ∘ (𝑀𝑉)) ⊆ (𝐽 ×t 𝐽))) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
12820, 53, 98, 125, 127syl22anc 852 . . . . 5 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
129128ralrimiva 3159 . . . 4 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
130129adantr 486 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
1316adantr 486 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → (𝐽 ×t 𝐽) ∈ Top)
13224, 123sseqtrd 3974 . . . . 5 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑀 (𝐽 ×t 𝐽))
133132adantr 486 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → 𝑀 (𝐽 ×t 𝐽))
134 simpr 490 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → 𝑀 ≠ ∅)
135126neips 23320 . . . 4 (((𝐽 ×t 𝐽) ∈ Top ∧ 𝑀 (𝐽 ×t 𝐽) ∧ 𝑀 ≠ ∅) → ((𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀) ↔ ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟})))
136131, 133, 134, 135syl3anc 1398 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → ((𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀) ↔ ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟})))
137130, 136mpbird 260 . 2 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))
13819, 137pm2.61dane 3047 1 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:  wi 4  wb 209  wa 401  w3a 1103   = wceq 1570  wcel 2146  wne 2960  wral 3081  Vcvv 3457  wss 3906  c0 4286  {csn 4591  cop 4597   cuni 4874   class class class wbr 5111   × cxp 5661  ccnv 5662  cima 5666  ccom 5667  Rel wrel 5668  cfv 6540  (class class class)co 7419  1st c1st 7990  2nd c2nd 7991  Topctop 23100  neicnei 23304   ×t ctx 23768  UnifOncust 24408  unifTopcutop 24438
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2737  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5338  ax-pr 5406  ax-un 7742
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599  df-clab 2744  df-cleq 2757  df-clel 2840  df-nfc 2914  df-ne 2961  df-ral 3082  df-rex 3092  df-reu 3372  df-rab 3419  df-v 3459  df-sbc 3747  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-pss 3926  df-nul 4287  df-if 4490  df-pw 4566  df-sn 4592  df-pr 4594  df-op 4598  df-uni 4875  df-int 4915  df-iun 4960  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5558  df-eprel 5563  df-po 5571  df-so 5572  df-fr 5616  df-we 5618  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-ord 6367  df-on 6368  df-lim 6369  df-suc 6370  df-iota 6496  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-ov 7422  df-oprab 7423  df-mpo 7424  df-om 7869  df-1st 7992  df-2nd 7993  df-1o 8459  df-2o 8460  df-en 8950  df-fin 8953  df-fi 9378  df-topgen 17518  df-top 23101  df-topon 23118  df-bases 23153  df-nei 23305  df-tx 23770  df-ust 24409  df-utop 24439
This theorem is used by: (None)
  Copyright terms: Public domain W3C validator