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

Theorem utop2nei 23402
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 23386 . . . . . . . 8 (𝑈 ∈ (UnifOn‘𝑋) → (unifTop‘𝑈) ∈ Top)
31, 2eqeltrid 2843 . . . . . . 7 (𝑈 ∈ (UnifOn‘𝑋) → 𝐽 ∈ Top)
4 txtop 22720 . . . . . . 7 ((𝐽 ∈ Top ∧ 𝐽 ∈ Top) → (𝐽 ×t 𝐽) ∈ Top)
53, 3, 4syl2anc 584 . . . . . 6 (𝑈 ∈ (UnifOn‘𝑋) → (𝐽 ×t 𝐽) ∈ Top)
653ad2ant1 1132 . . . . 5 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝐽 ×t 𝐽) ∈ Top)
76adantr 481 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → (𝐽 ×t 𝐽) ∈ Top)
8 0nei 22279 . . . 4 ((𝐽 ×t 𝐽) ∈ Top → ∅ ∈ ((nei‘(𝐽 ×t 𝐽))‘∅))
97, 8syl 17 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → ∅ ∈ ((nei‘(𝐽 ×t 𝐽))‘∅))
10 coeq1 5766 . . . . . . 7 (𝑀 = ∅ → (𝑀𝑉) = (∅ ∘ 𝑉))
11 co01 6165 . . . . . . 7 (∅ ∘ 𝑉) = ∅
1210, 11eqtrdi 2794 . . . . . 6 (𝑀 = ∅ → (𝑀𝑉) = ∅)
1312coeq2d 5771 . . . . 5 (𝑀 = ∅ → (𝑉 ∘ (𝑀𝑉)) = (𝑉 ∘ ∅))
14 co02 6164 . . . . 5 (𝑉 ∘ ∅) = ∅
1513, 14eqtrdi 2794 . . . 4 (𝑀 = ∅ → (𝑉 ∘ (𝑀𝑉)) = ∅)
1615adantl 482 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → (𝑉 ∘ (𝑀𝑉)) = ∅)
17 simpr 485 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → 𝑀 = ∅)
1817fveq2d 6778 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → ((nei‘(𝐽 ×t 𝐽))‘𝑀) = ((nei‘(𝐽 ×t 𝐽))‘∅))
199, 16, 183eltr4d 2854 . 2 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 = ∅) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))
206adantr 481 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝐽 ×t 𝐽) ∈ Top)
21 simpl1 1190 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑈 ∈ (UnifOn‘𝑋))
2221, 3syl 17 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝐽 ∈ Top)
23 simpl2l 1225 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑉𝑈)
24 simp3 1137 . . . . . . . . . . . 12 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑀 ⊆ (𝑋 × 𝑋))
2524sselda 3921 . . . . . . . . . . 11 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑟 ∈ (𝑋 × 𝑋))
26 xp1st 7863 . . . . . . . . . . 11 (𝑟 ∈ (𝑋 × 𝑋) → (1st𝑟) ∈ 𝑋)
2725, 26syl 17 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (1st𝑟) ∈ 𝑋)
281utopsnnei 23401 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈 ∧ (1st𝑟) ∈ 𝑋) → (𝑉 “ {(1st𝑟)}) ∈ ((nei‘𝐽)‘{(1st𝑟)}))
2921, 23, 27, 28syl3anc 1370 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 “ {(1st𝑟)}) ∈ ((nei‘𝐽)‘{(1st𝑟)}))
30 xp2nd 7864 . . . . . . . . . . 11 (𝑟 ∈ (𝑋 × 𝑋) → (2nd𝑟) ∈ 𝑋)
3125, 30syl 17 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (2nd𝑟) ∈ 𝑋)
321utopsnnei 23401 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈 ∧ (2nd𝑟) ∈ 𝑋) → (𝑉 “ {(2nd𝑟)}) ∈ ((nei‘𝐽)‘{(2nd𝑟)}))
3321, 23, 31, 32syl3anc 1370 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 “ {(2nd𝑟)}) ∈ ((nei‘𝐽)‘{(2nd𝑟)}))
34 eqid 2738 . . . . . . . . . 10 𝐽 = 𝐽
3534, 34neitx 22758 . . . . . . . . 9 (((𝐽 ∈ Top ∧ 𝐽 ∈ Top) ∧ ((𝑉 “ {(1st𝑟)}) ∈ ((nei‘𝐽)‘{(1st𝑟)}) ∧ (𝑉 “ {(2nd𝑟)}) ∈ ((nei‘𝐽)‘{(2nd𝑟)}))) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘({(1st𝑟)} × {(2nd𝑟)})))
3622, 22, 29, 33, 35syl22anc 836 . . . . . . . 8 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘({(1st𝑟)} × {(2nd𝑟)})))
37 fvex 6787 . . . . . . . . . 10 (1st𝑟) ∈ V
38 fvex 6787 . . . . . . . . . 10 (2nd𝑟) ∈ V
3937, 38xpsn 7013 . . . . . . . . 9 ({(1st𝑟)} × {(2nd𝑟)}) = {⟨(1st𝑟), (2nd𝑟)⟩}
4039fveq2i 6777 . . . . . . . 8 ((nei‘(𝐽 ×t 𝐽))‘({(1st𝑟)} × {(2nd𝑟)})) = ((nei‘(𝐽 ×t 𝐽))‘{⟨(1st𝑟), (2nd𝑟)⟩})
4136, 40eleqtrdi 2849 . . . . . . 7 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘{⟨(1st𝑟), (2nd𝑟)⟩}))
4224adantr 481 . . . . . . . . . . 11 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑀 ⊆ (𝑋 × 𝑋))
43 xpss 5605 . . . . . . . . . . . . 13 (𝑋 × 𝑋) ⊆ (V × V)
44 sstr 3929 . . . . . . . . . . . . 13 ((𝑀 ⊆ (𝑋 × 𝑋) ∧ (𝑋 × 𝑋) ⊆ (V × V)) → 𝑀 ⊆ (V × V))
4543, 44mpan2 688 . . . . . . . . . . . 12 (𝑀 ⊆ (𝑋 × 𝑋) → 𝑀 ⊆ (V × V))
46 df-rel 5596 . . . . . . . . . . . 12 (Rel 𝑀𝑀 ⊆ (V × V))
4745, 46sylibr 233 . . . . . . . . . . 11 (𝑀 ⊆ (𝑋 × 𝑋) → Rel 𝑀)
4842, 47syl 17 . . . . . . . . . 10 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → Rel 𝑀)
49 1st2nd 7880 . . . . . . . . . 10 ((Rel 𝑀𝑟𝑀) → 𝑟 = ⟨(1st𝑟), (2nd𝑟)⟩)
5048, 49sylancom 588 . . . . . . . . 9 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → 𝑟 = ⟨(1st𝑟), (2nd𝑟)⟩)
5150sneqd 4573 . . . . . . . 8 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → {𝑟} = {⟨(1st𝑟), (2nd𝑟)⟩})
5251fveq2d 6778 . . . . . . 7 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((nei‘(𝐽 ×t 𝐽))‘{𝑟}) = ((nei‘(𝐽 ×t 𝐽))‘{⟨(1st𝑟), (2nd𝑟)⟩}))
5341, 52eleqtrrd 2842 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
54 relxp 5607 . . . . . . . . . . 11 Rel ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))
5554a1i 11 . . . . . . . . . 10 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → Rel ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})))
56 1st2nd 7880 . . . . . . . . . 10 ((Rel ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
5755, 56sylancom 588 . . . . . . . . 9 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑧 = ⟨(1st𝑧), (2nd𝑧)⟩)
58 simpll2 1212 . . . . . . . . . . . . 13 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (𝑉𝑈𝑉 = 𝑉))
5958simprd 496 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑉 = 𝑉)
60 simpll1 1211 . . . . . . . . . . . . . 14 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑈 ∈ (UnifOn‘𝑋))
6158simpld 495 . . . . . . . . . . . . . 14 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑉𝑈)
62 ustrel 23363 . . . . . . . . . . . . . 14 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈) → Rel 𝑉)
6360, 61, 62syl2anc 584 . . . . . . . . . . . . 13 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → Rel 𝑉)
64 xp1st 7863 . . . . . . . . . . . . . 14 (𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) → (1st𝑧) ∈ (𝑉 “ {(1st𝑟)}))
6564adantl 482 . . . . . . . . . . . . 13 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑧) ∈ (𝑉 “ {(1st𝑟)}))
66 elrelimasn 5993 . . . . . . . . . . . . . 14 (Rel 𝑉 → ((1st𝑧) ∈ (𝑉 “ {(1st𝑟)}) ↔ (1st𝑟)𝑉(1st𝑧)))
6766biimpa 477 . . . . . . . . . . . . 13 ((Rel 𝑉 ∧ (1st𝑧) ∈ (𝑉 “ {(1st𝑟)})) → (1st𝑟)𝑉(1st𝑧))
6863, 65, 67syl2anc 584 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑟)𝑉(1st𝑧))
69 fvex 6787 . . . . . . . . . . . . . . 15 (1st𝑧) ∈ V
7037, 69brcnv 5791 . . . . . . . . . . . . . 14 ((1st𝑟)𝑉(1st𝑧) ↔ (1st𝑧)𝑉(1st𝑟))
71 breq 5076 . . . . . . . . . . . . . 14 (𝑉 = 𝑉 → ((1st𝑟)𝑉(1st𝑧) ↔ (1st𝑟)𝑉(1st𝑧)))
7270, 71bitr3id 285 . . . . . . . . . . . . 13 (𝑉 = 𝑉 → ((1st𝑧)𝑉(1st𝑟) ↔ (1st𝑟)𝑉(1st𝑧)))
7372biimpar 478 . . . . . . . . . . . 12 ((𝑉 = 𝑉 ∧ (1st𝑟)𝑉(1st𝑧)) → (1st𝑧)𝑉(1st𝑟))
7459, 68, 73syl2anc 584 . . . . . . . . . . 11 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑧)𝑉(1st𝑟))
75 simpll3 1213 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑀 ⊆ (𝑋 × 𝑋))
76 simplr 766 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑟𝑀)
77 1st2ndbr 7883 . . . . . . . . . . . . 13 ((Rel 𝑀𝑟𝑀) → (1st𝑟)𝑀(2nd𝑟))
7847, 77sylan 580 . . . . . . . . . . . 12 ((𝑀 ⊆ (𝑋 × 𝑋) ∧ 𝑟𝑀) → (1st𝑟)𝑀(2nd𝑟))
7975, 76, 78syl2anc 584 . . . . . . . . . . 11 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑟)𝑀(2nd𝑟))
80 xp2nd 7864 . . . . . . . . . . . . 13 (𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) → (2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)}))
8180adantl 482 . . . . . . . . . . . 12 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)}))
82 elrelimasn 5993 . . . . . . . . . . . . 13 (Rel 𝑉 → ((2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)}) ↔ (2nd𝑟)𝑉(2nd𝑧)))
8382biimpa 477 . . . . . . . . . . . 12 ((Rel 𝑉 ∧ (2nd𝑧) ∈ (𝑉 “ {(2nd𝑟)})) → (2nd𝑟)𝑉(2nd𝑧))
8463, 81, 83syl2anc 584 . . . . . . . . . . 11 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (2nd𝑟)𝑉(2nd𝑧))
8569, 38, 373pm3.2i 1338 . . . . . . . . . . . . 13 ((1st𝑧) ∈ V ∧ (2nd𝑟) ∈ V ∧ (1st𝑟) ∈ V)
86 brcogw 5777 . . . . . . . . . . . . 13 ((((1st𝑧) ∈ V ∧ (2nd𝑟) ∈ V ∧ (1st𝑟) ∈ V) ∧ ((1st𝑧)𝑉(1st𝑟) ∧ (1st𝑟)𝑀(2nd𝑟))) → (1st𝑧)(𝑀𝑉)(2nd𝑟))
8785, 86mpan 687 . . . . . . . . . . . 12 (((1st𝑧)𝑉(1st𝑟) ∧ (1st𝑟)𝑀(2nd𝑟)) → (1st𝑧)(𝑀𝑉)(2nd𝑟))
88 fvex 6787 . . . . . . . . . . . . . 14 (2nd𝑧) ∈ V
8969, 88, 383pm3.2i 1338 . . . . . . . . . . . . 13 ((1st𝑧) ∈ V ∧ (2nd𝑧) ∈ V ∧ (2nd𝑟) ∈ V)
90 brcogw 5777 . . . . . . . . . . . . 13 ((((1st𝑧) ∈ V ∧ (2nd𝑧) ∈ V ∧ (2nd𝑟) ∈ V) ∧ ((1st𝑧)(𝑀𝑉)(2nd𝑟) ∧ (2nd𝑟)𝑉(2nd𝑧))) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
9189, 90mpan 687 . . . . . . . . . . . 12 (((1st𝑧)(𝑀𝑉)(2nd𝑟) ∧ (2nd𝑟)𝑉(2nd𝑧)) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
9287, 91sylan 580 . . . . . . . . . . 11 ((((1st𝑧)𝑉(1st𝑟) ∧ (1st𝑟)𝑀(2nd𝑟)) ∧ (2nd𝑟)𝑉(2nd𝑧)) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
9374, 79, 84, 92syl21anc 835 . . . . . . . . . 10 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → (1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧))
94 df-br 5075 . . . . . . . . . 10 ((1st𝑧)(𝑉 ∘ (𝑀𝑉))(2nd𝑧) ↔ ⟨(1st𝑧), (2nd𝑧)⟩ ∈ (𝑉 ∘ (𝑀𝑉)))
9593, 94sylib 217 . . . . . . . . 9 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → ⟨(1st𝑧), (2nd𝑧)⟩ ∈ (𝑉 ∘ (𝑀𝑉)))
9657, 95eqeltrd 2839 . . . . . . . 8 ((((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) ∧ 𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)}))) → 𝑧 ∈ (𝑉 ∘ (𝑀𝑉)))
9796ex 413 . . . . . . 7 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑧 ∈ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) → 𝑧 ∈ (𝑉 ∘ (𝑀𝑉))))
9897ssrdv 3927 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ⊆ (𝑉 ∘ (𝑀𝑉)))
99 simp1 1135 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑈 ∈ (UnifOn‘𝑋))
100 simp2l 1198 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑉𝑈)
101 ustssxp 23356 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ 𝑉𝑈) → 𝑉 ⊆ (𝑋 × 𝑋))
10299, 100, 101syl2anc 584 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑉 ⊆ (𝑋 × 𝑋))
103 coss1 5764 . . . . . . . . . 10 (𝑉 ⊆ (𝑋 × 𝑋) → (𝑉 ∘ (𝑀𝑉)) ⊆ ((𝑋 × 𝑋) ∘ (𝑀𝑉)))
104102, 103syl 17 . . . . . . . . 9 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ⊆ ((𝑋 × 𝑋) ∘ (𝑀𝑉)))
105 coss1 5764 . . . . . . . . . . . 12 (𝑀 ⊆ (𝑋 × 𝑋) → (𝑀𝑉) ⊆ ((𝑋 × 𝑋) ∘ 𝑉))
10624, 105syl 17 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑀𝑉) ⊆ ((𝑋 × 𝑋) ∘ 𝑉))
107 coss2 5765 . . . . . . . . . . . . 13 (𝑉 ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ 𝑉) ⊆ ((𝑋 × 𝑋) ∘ (𝑋 × 𝑋)))
108 xpcoid 6193 . . . . . . . . . . . . 13 ((𝑋 × 𝑋) ∘ (𝑋 × 𝑋)) = (𝑋 × 𝑋)
109107, 108sseqtrdi 3971 . . . . . . . . . . . 12 (𝑉 ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ 𝑉) ⊆ (𝑋 × 𝑋))
110102, 109syl 17 . . . . . . . . . . 11 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → ((𝑋 × 𝑋) ∘ 𝑉) ⊆ (𝑋 × 𝑋))
111106, 110sstrd 3931 . . . . . . . . . 10 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑀𝑉) ⊆ (𝑋 × 𝑋))
112 coss2 5765 . . . . . . . . . . 11 ((𝑀𝑉) ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ (𝑀𝑉)) ⊆ ((𝑋 × 𝑋) ∘ (𝑋 × 𝑋)))
113112, 108sseqtrdi 3971 . . . . . . . . . 10 ((𝑀𝑉) ⊆ (𝑋 × 𝑋) → ((𝑋 × 𝑋) ∘ (𝑀𝑉)) ⊆ (𝑋 × 𝑋))
114111, 113syl 17 . . . . . . . . 9 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → ((𝑋 × 𝑋) ∘ (𝑀𝑉)) ⊆ (𝑋 × 𝑋))
115104, 114sstrd 3931 . . . . . . . 8 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ⊆ (𝑋 × 𝑋))
116 utopbas 23387 . . . . . . . . . . . 12 (𝑈 ∈ (UnifOn‘𝑋) → 𝑋 = (unifTop‘𝑈))
1171unieqi 4852 . . . . . . . . . . . 12 𝐽 = (unifTop‘𝑈)
118116, 117eqtr4di 2796 . . . . . . . . . . 11 (𝑈 ∈ (UnifOn‘𝑋) → 𝑋 = 𝐽)
119118sqxpeqd 5621 . . . . . . . . . 10 (𝑈 ∈ (UnifOn‘𝑋) → (𝑋 × 𝑋) = ( 𝐽 × 𝐽))
12034, 34txuni 22743 . . . . . . . . . . 11 ((𝐽 ∈ Top ∧ 𝐽 ∈ Top) → ( 𝐽 × 𝐽) = (𝐽 ×t 𝐽))
1213, 3, 120syl2anc 584 . . . . . . . . . 10 (𝑈 ∈ (UnifOn‘𝑋) → ( 𝐽 × 𝐽) = (𝐽 ×t 𝐽))
122119, 121eqtrd 2778 . . . . . . . . 9 (𝑈 ∈ (UnifOn‘𝑋) → (𝑋 × 𝑋) = (𝐽 ×t 𝐽))
1231223ad2ant1 1132 . . . . . . . 8 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑋 × 𝑋) = (𝐽 ×t 𝐽))
124115, 123sseqtrd 3961 . . . . . . 7 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ⊆ (𝐽 ×t 𝐽))
125124adantr 481 . . . . . 6 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 ∘ (𝑀𝑉)) ⊆ (𝐽 ×t 𝐽))
126 eqid 2738 . . . . . . 7 (𝐽 ×t 𝐽) = (𝐽 ×t 𝐽)
127126ssnei2 22267 . . . . . 6 ((((𝐽 ×t 𝐽) ∈ Top ∧ ((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟})) ∧ (((𝑉 “ {(1st𝑟)}) × (𝑉 “ {(2nd𝑟)})) ⊆ (𝑉 ∘ (𝑀𝑉)) ∧ (𝑉 ∘ (𝑀𝑉)) ⊆ (𝐽 ×t 𝐽))) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
12820, 53, 98, 125, 127syl22anc 836 . . . . 5 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑟𝑀) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
129128ralrimiva 3103 . . . 4 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
130129adantr 481 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟}))
1316adantr 481 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → (𝐽 ×t 𝐽) ∈ Top)
13224, 123sseqtrd 3961 . . . . 5 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → 𝑀 (𝐽 ×t 𝐽))
133132adantr 481 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → 𝑀 (𝐽 ×t 𝐽))
134 simpr 485 . . . 4 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → 𝑀 ≠ ∅)
135126neips 22264 . . . 4 (((𝐽 ×t 𝐽) ∈ Top ∧ 𝑀 (𝐽 ×t 𝐽) ∧ 𝑀 ≠ ∅) → ((𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀) ↔ ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟})))
136131, 133, 134, 135syl3anc 1370 . . 3 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → ((𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀) ↔ ∀𝑟𝑀 (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘{𝑟})))
137130, 136mpbird 256 . 2 (((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) ∧ 𝑀 ≠ ∅) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))
13819, 137pm2.61dane 3032 1 ((𝑈 ∈ (UnifOn‘𝑋) ∧ (𝑉𝑈𝑉 = 𝑉) ∧ 𝑀 ⊆ (𝑋 × 𝑋)) → (𝑉 ∘ (𝑀𝑉)) ∈ ((nei‘(𝐽 ×t 𝐽))‘𝑀))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396  w3a 1086   = wceq 1539  wcel 2106  wne 2943  wral 3064  Vcvv 3432  wss 3887  c0 4256  {csn 4561  cop 4567   cuni 4839   class class class wbr 5074   × cxp 5587  ccnv 5588  cima 5592  ccom 5593  Rel wrel 5594  cfv 6433  (class class class)co 7275  1st c1st 7829  2nd c2nd 7830  Topctop 22042  neicnei 22248   ×t ctx 22711  UnifOncust 23351  unifTopcutop 23382
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2709  ax-rep 5209  ax-sep 5223  ax-nul 5230  ax-pow 5288  ax-pr 5352  ax-un 7588
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-3or 1087  df-3an 1088  df-tru 1542  df-fal 1552  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569  df-clab 2716  df-cleq 2730  df-clel 2816  df-nfc 2889  df-ne 2944  df-ral 3069  df-rex 3070  df-reu 3072  df-rab 3073  df-v 3434  df-sbc 3717  df-csb 3833  df-dif 3890  df-un 3892  df-in 3894  df-ss 3904  df-pss 3906  df-nul 4257  df-if 4460  df-pw 4535  df-sn 4562  df-pr 4564  df-op 4568  df-uni 4840  df-int 4880  df-iun 4926  df-br 5075  df-opab 5137  df-mpt 5158  df-tr 5192  df-id 5489  df-eprel 5495  df-po 5503  df-so 5504  df-fr 5544  df-we 5546  df-xp 5595  df-rel 5596  df-cnv 5597  df-co 5598  df-dm 5599  df-rn 5600  df-res 5601  df-ima 5602  df-ord 6269  df-on 6270  df-lim 6271  df-suc 6272  df-iota 6391  df-fun 6435  df-fn 6436  df-f 6437  df-f1 6438  df-fo 6439  df-f1o 6440  df-fv 6441  df-ov 7278  df-oprab 7279  df-mpo 7280  df-om 7713  df-1st 7831  df-2nd 7832  df-1o 8297  df-er 8498  df-en 8734  df-fin 8737  df-fi 9170  df-topgen 17154  df-top 22043  df-topon 22060  df-bases 22096  df-nei 22249  df-tx 22713  df-ust 23352  df-utop 23383
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator