Metamath Proof Explorer


Theorem zcld

Description: The integers are a closed set in the topology on RR . (Contributed by Mario Carneiro, 17-Feb-2015)

Ref Expression
Hypothesis zcld.1 ⊢ J = topGen ⁡ ran ⁡ .
Assertion zcld ⊢ ℤ ∈ Clsd ⁡ J

Proof

Step Hyp Ref Expression
1 zcld.1 ⊢ J = topGen ⁡ ran ⁡ .
2 eliun ⊢ y ∈ ⋃ x ∈ ℤ x x + 1 ↔ ∃ x ∈ ℤ y ∈ x x + 1
3 elioore ⊢ y ∈ x x + 1 → y ∈ ℝ
4 3 adantl ⊢ x ∈ ℤ ∧ y ∈ x x + 1 → y ∈ ℝ
5 eliooord ⊢ y ∈ x x + 1 → x < y ∧ y < x + 1
6 btwnnz ⊢ x ∈ ℤ ∧ x < y ∧ y < x + 1 → ¬ y ∈ ℤ
7 6 3expb ⊢ x ∈ ℤ ∧ x < y ∧ y < x + 1 → ¬ y ∈ ℤ
8 5 7 sylan2 ⊢ x ∈ ℤ ∧ y ∈ x x + 1 → ¬ y ∈ ℤ
9 4 8 eldifd ⊢ x ∈ ℤ ∧ y ∈ x x + 1 → y ∈ ℝ ∖ ℤ
10 9 rexlimiva ⊢ ∃ x ∈ ℤ y ∈ x x + 1 → y ∈ ℝ ∖ ℤ
11 eldifi ⊢ y ∈ ℝ ∖ ℤ → y ∈ ℝ
12 11 flcld ⊢ y ∈ ℝ ∖ ℤ → y ∈ ℤ
13 12 zred ⊢ y ∈ ℝ ∖ ℤ → y ∈ ℝ
14 flle ⊢ y ∈ ℝ → y ≤ y
15 11 14 syl ⊢ y ∈ ℝ ∖ ℤ → y ≤ y
16 eldifn ⊢ y ∈ ℝ ∖ ℤ → ¬ y ∈ ℤ
17 nelne2 ⊢ y ∈ ℤ ∧ ¬ y ∈ ℤ → y ≠ y
18 12 16 17 syl2anc ⊢ y ∈ ℝ ∖ ℤ → y ≠ y
19 18 necomd ⊢ y ∈ ℝ ∖ ℤ → y ≠ y
20 13 11 15 19 leneltd ⊢ y ∈ ℝ ∖ ℤ → y < y
21 flltp1 ⊢ y ∈ ℝ → y < y + 1
22 11 21 syl ⊢ y ∈ ℝ ∖ ℤ → y < y + 1
23 13 rexrd ⊢ y ∈ ℝ ∖ ℤ → y ∈ ℝ *
24 peano2re ⊢ y ∈ ℝ → y + 1 ∈ ℝ
25 13 24 syl ⊢ y ∈ ℝ ∖ ℤ → y + 1 ∈ ℝ
26 25 rexrd ⊢ y ∈ ℝ ∖ ℤ → y + 1 ∈ ℝ *
27 elioo2 ⊢ y ∈ ℝ * ∧ y + 1 ∈ ℝ * → y ∈ y y + 1 ↔ y ∈ ℝ ∧ y < y ∧ y < y + 1
28 23 26 27 syl2anc ⊢ y ∈ ℝ ∖ ℤ → y ∈ y y + 1 ↔ y ∈ ℝ ∧ y < y ∧ y < y + 1
29 11 20 22 28 mpbir3and ⊢ y ∈ ℝ ∖ ℤ → y ∈ y y + 1
30 id ⊢ x = y → x = y
31 oveq1 ⊢ x = y → x + 1 = y + 1
32 30 31 oveq12d ⊢ x = y → x x + 1 = y y + 1
33 32 eleq2d ⊢ x = y → y ∈ x x + 1 ↔ y ∈ y y + 1
34 33 rspcev ⊢ y ∈ ℤ ∧ y ∈ y y + 1 → ∃ x ∈ ℤ y ∈ x x + 1
35 12 29 34 syl2anc ⊢ y ∈ ℝ ∖ ℤ → ∃ x ∈ ℤ y ∈ x x + 1
36 10 35 impbii ⊢ ∃ x ∈ ℤ y ∈ x x + 1 ↔ y ∈ ℝ ∖ ℤ
37 2 36 bitri ⊢ y ∈ ⋃ x ∈ ℤ x x + 1 ↔ y ∈ ℝ ∖ ℤ
38 37 eqriv ⊢ ⋃ x ∈ ℤ x x + 1 = ℝ ∖ ℤ
39 retop ⊢ topGen ⁡ ran ⁡ . ∈ Top
40 1 39 eqeltri ⊢ J ∈ Top
41 iooretop ⊢ x x + 1 ∈ topGen ⁡ ran ⁡ .
42 41 1 eleqtrri ⊢ x x + 1 ∈ J
43 42 rgenw ⊢ ∀ x ∈ ℤ x x + 1 ∈ J
44 iunopn ⊢ J ∈ Top ∧ ∀ x ∈ ℤ x x + 1 ∈ J → ⋃ x ∈ ℤ x x + 1 ∈ J
45 40 43 44 mp2an ⊢ ⋃ x ∈ ℤ x x + 1 ∈ J
46 38 45 eqeltrri ⊢ ℝ ∖ ℤ ∈ J
47 zssre ⊢ ℤ ⊆ ℝ
48 uniretop ⊢ ℝ = ⋃ topGen ⁡ ran ⁡ .
49 1 unieqi ⊢ ⋃ J = ⋃ topGen ⁡ ran ⁡ .
50 48 49 eqtr4i ⊢ ℝ = ⋃ J
51 50 iscld2 ⊢ J ∈ Top ∧ ℤ ⊆ ℝ → ℤ ∈ Clsd ⁡ J ↔ ℝ ∖ ℤ ∈ J
52 40 47 51 mp2an ⊢ ℤ ∈ Clsd ⁡ J ↔ ℝ ∖ ℤ ∈ J
53 46 52 mpbir ⊢ ℤ ∈ Clsd ⁡ J