Metamath Proof Explorer


Theorem utop3cls

Description: Relation between a topological closure and a symmetric entourage in an uniform space. Second part of proposition 2 of BourbakiTop1 p. II.4. (Contributed by Thierry Arnoux, 17-Jan-2018)

Ref Expression
Hypothesis utoptop.1 ⊢ J = unifTop ⁡ U
Assertion utop3cls ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V → cls ⁡ J × t J ⁡ M ⊆ V ∘ M ∘ V

Proof

Step Hyp Ref Expression
1 utoptop.1 ⊢ J = unifTop ⁡ U
2 relxp ⊢ Rel ⁡ X × X
3 utoptop ⊢ U ∈ UnifOn ⁡ X → unifTop ⁡ U ∈ Top
4 1 3 eqeltrid ⊢ U ∈ UnifOn ⁡ X → J ∈ Top
5 txtop ⊢ J ∈ Top ∧ J ∈ Top → J × t J ∈ Top
6 4 4 5 syl2anc ⊢ U ∈ UnifOn ⁡ X → J × t J ∈ Top
7 6 ad3antrrr ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → J × t J ∈ Top
8 simpllr ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → M ⊆ X × X
9 utoptopon ⊢ U ∈ UnifOn ⁡ X → unifTop ⁡ U ∈ TopOn ⁡ X
10 1 9 eqeltrid ⊢ U ∈ UnifOn ⁡ X → J ∈ TopOn ⁡ X
11 toponuni ⊢ J ∈ TopOn ⁡ X → X = ⋃ J
12 10 11 syl ⊢ U ∈ UnifOn ⁡ X → X = ⋃ J
13 12 sqxpeqd ⊢ U ∈ UnifOn ⁡ X → X × X = ⋃ J × ⋃ J
14 eqid ⊢ ⋃ J = ⋃ J
15 14 14 txuni ⊢ J ∈ Top ∧ J ∈ Top → ⋃ J × ⋃ J = ⋃ J × t J
16 4 4 15 syl2anc ⊢ U ∈ UnifOn ⁡ X → ⋃ J × ⋃ J = ⋃ J × t J
17 13 16 eqtrd ⊢ U ∈ UnifOn ⁡ X → X × X = ⋃ J × t J
18 17 ad3antrrr ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → X × X = ⋃ J × t J
19 8 18 sseqtrd ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → M ⊆ ⋃ J × t J
20 eqid ⊢ ⋃ J × t J = ⋃ J × t J
21 20 clsss3 ⊢ J × t J ∈ Top ∧ M ⊆ ⋃ J × t J → cls ⁡ J × t J ⁡ M ⊆ ⋃ J × t J
22 7 19 21 syl2anc ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → cls ⁡ J × t J ⁡ M ⊆ ⋃ J × t J
23 22 18 sseqtrrd ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → cls ⁡ J × t J ⁡ M ⊆ X × X
24 simpr ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → z ∈ cls ⁡ J × t J ⁡ M
25 23 24 sseldd ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → z ∈ X × X
26 1st2nd ⊢ Rel ⁡ X × X ∧ z ∈ X × X → z = 1 st ⁡ z 2 nd ⁡ z
27 2 25 26 sylancr ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → z = 1 st ⁡ z 2 nd ⁡ z
28 simplll ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → U ∈ UnifOn ⁡ X
29 simplrl ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → V ∈ U
30 4 3ad2ant1 ⊢ U ∈ UnifOn ⁡ X ∧ V ∈ U ∧ z ∈ X × X → J ∈ Top
31 xp1st ⊢ z ∈ X × X → 1 st ⁡ z ∈ X
32 1 utopsnnei ⊢ U ∈ UnifOn ⁡ X ∧ V ∈ U ∧ 1 st ⁡ z ∈ X → V 1 st ⁡ z ∈ nei ⁡ J ⁡ 1 st ⁡ z
33 31 32 syl3an3 ⊢ U ∈ UnifOn ⁡ X ∧ V ∈ U ∧ z ∈ X × X → V 1 st ⁡ z ∈ nei ⁡ J ⁡ 1 st ⁡ z
34 xp2nd ⊢ z ∈ X × X → 2 nd ⁡ z ∈ X
35 1 utopsnnei ⊢ U ∈ UnifOn ⁡ X ∧ V ∈ U ∧ 2 nd ⁡ z ∈ X → V 2 nd ⁡ z ∈ nei ⁡ J ⁡ 2 nd ⁡ z
36 34 35 syl3an3 ⊢ U ∈ UnifOn ⁡ X ∧ V ∈ U ∧ z ∈ X × X → V 2 nd ⁡ z ∈ nei ⁡ J ⁡ 2 nd ⁡ z
37 14 14 neitx ⊢ J ∈ Top ∧ J ∈ Top ∧ V 1 st ⁡ z ∈ nei ⁡ J ⁡ 1 st ⁡ z ∧ V 2 nd ⁡ z ∈ nei ⁡ J ⁡ 2 nd ⁡ z → V 1 st ⁡ z × V 2 nd ⁡ z ∈ nei ⁡ J × t J ⁡ 1 st ⁡ z × 2 nd ⁡ z
38 30 30 33 36 37 syl22anc ⊢ U ∈ UnifOn ⁡ X ∧ V ∈ U ∧ z ∈ X × X → V 1 st ⁡ z × V 2 nd ⁡ z ∈ nei ⁡ J × t J ⁡ 1 st ⁡ z × 2 nd ⁡ z
39 1st2nd2 ⊢ z ∈ X × X → z = 1 st ⁡ z 2 nd ⁡ z
40 39 sneqd ⊢ z ∈ X × X → z = 1 st ⁡ z 2 nd ⁡ z
41 fvex ⊢ 1 st ⁡ z ∈ V
42 fvex ⊢ 2 nd ⁡ z ∈ V
43 41 42 xpsn ⊢ 1 st ⁡ z × 2 nd ⁡ z = 1 st ⁡ z 2 nd ⁡ z
44 40 43 eqtr4di ⊢ z ∈ X × X → z = 1 st ⁡ z × 2 nd ⁡ z
45 44 fveq2d ⊢ z ∈ X × X → nei ⁡ J × t J ⁡ z = nei ⁡ J × t J ⁡ 1 st ⁡ z × 2 nd ⁡ z
46 45 3ad2ant3 ⊢ U ∈ UnifOn ⁡ X ∧ V ∈ U ∧ z ∈ X × X → nei ⁡ J × t J ⁡ z = nei ⁡ J × t J ⁡ 1 st ⁡ z × 2 nd ⁡ z
47 38 46 eleqtrrd ⊢ U ∈ UnifOn ⁡ X ∧ V ∈ U ∧ z ∈ X × X → V 1 st ⁡ z × V 2 nd ⁡ z ∈ nei ⁡ J × t J ⁡ z
48 28 29 25 47 syl3anc ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → V 1 st ⁡ z × V 2 nd ⁡ z ∈ nei ⁡ J × t J ⁡ z
49 20 neindisj ⊢ J × t J ∈ Top ∧ M ⊆ ⋃ J × t J ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ V 1 st ⁡ z × V 2 nd ⁡ z ∈ nei ⁡ J × t J ⁡ z → V 1 st ⁡ z × V 2 nd ⁡ z ∩ M ≠ ∅
50 7 19 24 48 49 syl22anc ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → V 1 st ⁡ z × V 2 nd ⁡ z ∩ M ≠ ∅
51 simp-4l ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → U ∈ UnifOn ⁡ X
52 simpr1l ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → V ∈ U
53 52 3anassrs ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → V ∈ U
54 ustrel ⊢ U ∈ UnifOn ⁡ X ∧ V ∈ U → Rel ⁡ V
55 51 53 54 syl2anc ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → Rel ⁡ V
56 simpr ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M
57 elin ⊢ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M ↔ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∧ r ∈ M
58 56 57 sylib ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∧ r ∈ M
59 58 simpld ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → r ∈ V 1 st ⁡ z × V 2 nd ⁡ z
60 xp1st ⊢ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z → 1 st ⁡ r ∈ V 1 st ⁡ z
61 59 60 syl ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → 1 st ⁡ r ∈ V 1 st ⁡ z
62 elrelimasn ⊢ Rel ⁡ V → 1 st ⁡ r ∈ V 1 st ⁡ z ↔ 1 st ⁡ z V 1 st ⁡ r
63 62 biimpa ⊢ Rel ⁡ V ∧ 1 st ⁡ r ∈ V 1 st ⁡ z → 1 st ⁡ z V 1 st ⁡ r
64 55 61 63 syl2anc ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → 1 st ⁡ z V 1 st ⁡ r
65 simp-4r ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → M ⊆ X × X
66 xpss ⊢ X × X ⊆ V × V
67 65 66 sstrdi ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → M ⊆ V × V
68 df-rel ⊢ Rel ⁡ M ↔ M ⊆ V × V
69 67 68 sylibr ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → Rel ⁡ M
70 58 simprd ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → r ∈ M
71 1st2ndbr ⊢ Rel ⁡ M ∧ r ∈ M → 1 st ⁡ r M 2 nd ⁡ r
72 69 70 71 syl2anc ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → 1 st ⁡ r M 2 nd ⁡ r
73 xp2nd ⊢ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z → 2 nd ⁡ r ∈ V 2 nd ⁡ z
74 59 73 syl ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → 2 nd ⁡ r ∈ V 2 nd ⁡ z
75 elrelimasn ⊢ Rel ⁡ V → 2 nd ⁡ r ∈ V 2 nd ⁡ z ↔ 2 nd ⁡ z V 2 nd ⁡ r
76 75 biimpa ⊢ Rel ⁡ V ∧ 2 nd ⁡ r ∈ V 2 nd ⁡ z → 2 nd ⁡ z V 2 nd ⁡ r
77 55 74 76 syl2anc ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → 2 nd ⁡ z V 2 nd ⁡ r
78 simpr1r ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → V -1 = V
79 78 3anassrs ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → V -1 = V
80 breq ⊢ V -1 = V → 2 nd ⁡ r V -1 2 nd ⁡ z ↔ 2 nd ⁡ r V 2 nd ⁡ z
81 fvex ⊢ 2 nd ⁡ r ∈ V
82 81 42 brcnv ⊢ 2 nd ⁡ r V -1 2 nd ⁡ z ↔ 2 nd ⁡ z V 2 nd ⁡ r
83 80 82 bitr3di ⊢ V -1 = V → 2 nd ⁡ r V 2 nd ⁡ z ↔ 2 nd ⁡ z V 2 nd ⁡ r
84 79 83 syl ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → 2 nd ⁡ r V 2 nd ⁡ z ↔ 2 nd ⁡ z V 2 nd ⁡ r
85 77 84 mpbird ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → 2 nd ⁡ r V 2 nd ⁡ z
86 fvex ⊢ 1 st ⁡ r ∈ V
87 41 86 81 brcoi ⊢ 1 st ⁡ z V 1 st ⁡ r ∧ 1 st ⁡ r M 2 nd ⁡ r → 1 st ⁡ z M ∘ V 2 nd ⁡ r
88 41 81 42 brcoi ⊢ 1 st ⁡ z M ∘ V 2 nd ⁡ r ∧ 2 nd ⁡ r V 2 nd ⁡ z → 1 st ⁡ z V ∘ M ∘ V 2 nd ⁡ z
89 87 88 sylan ⊢ 1 st ⁡ z V 1 st ⁡ r ∧ 1 st ⁡ r M 2 nd ⁡ r ∧ 2 nd ⁡ r V 2 nd ⁡ z → 1 st ⁡ z V ∘ M ∘ V 2 nd ⁡ z
90 64 72 85 89 syl21anc ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M ∧ r ∈ V 1 st ⁡ z × V 2 nd ⁡ z ∩ M → 1 st ⁡ z V ∘ M ∘ V 2 nd ⁡ z
91 50 90 n0limd ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → 1 st ⁡ z V ∘ M ∘ V 2 nd ⁡ z
92 df-br ⊢ 1 st ⁡ z V ∘ M ∘ V 2 nd ⁡ z ↔ 1 st ⁡ z 2 nd ⁡ z ∈ V ∘ M ∘ V
93 91 92 sylib ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → 1 st ⁡ z 2 nd ⁡ z ∈ V ∘ M ∘ V
94 27 93 eqeltrd ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V ∧ z ∈ cls ⁡ J × t J ⁡ M → z ∈ V ∘ M ∘ V
95 94 ex ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V → z ∈ cls ⁡ J × t J ⁡ M → z ∈ V ∘ M ∘ V
96 95 ssrdv ⊢ U ∈ UnifOn ⁡ X ∧ M ⊆ X × X ∧ V ∈ U ∧ V -1 = V → cls ⁡ J × t J ⁡ M ⊆ V ∘ M ∘ V