Metamath Proof Explorer


Theorem zdis

Description: The integers are a discrete set in the topology on CC . (Contributed by Mario Carneiro, 19-Sep-2015)

Ref Expression
Hypothesis recld2.1 ⊢ J = TopOpen ⁡ ℂ fld
Assertion zdis ⊢ J ↾ 𝑡 ℤ = 𝒫 ℤ

Proof

Step Hyp Ref Expression
1 recld2.1 ⊢ J = TopOpen ⁡ ℂ fld
2 restsspw ⊢ J ↾ 𝑡 ℤ ⊆ 𝒫 ℤ
3 elpwi ⊢ x ∈ 𝒫 ℤ → x ⊆ ℤ
4 3 sselda ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x → y ∈ ℤ
5 4 zcnd ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x → y ∈ ℂ
6 cnxmet ⊢ abs ∘ − ∈ ∞Met ⁡ ℂ
7 1xr ⊢ 1 ∈ ℝ *
8 1 cnfldtopn ⊢ J = MetOpen ⁡ abs ∘ −
9 8 blopn ⊢ abs ∘ − ∈ ∞Met ⁡ ℂ ∧ y ∈ ℂ ∧ 1 ∈ ℝ * → y ball ⁡ abs ∘ − 1 ∈ J
10 6 7 9 mp3an13 ⊢ y ∈ ℂ → y ball ⁡ abs ∘ − 1 ∈ J
11 1 cnfldtop ⊢ J ∈ Top
12 zex ⊢ ℤ ∈ V
13 elrestr ⊢ J ∈ Top ∧ ℤ ∈ V ∧ y ball ⁡ abs ∘ − 1 ∈ J → y ball ⁡ abs ∘ − 1 ∩ ℤ ∈ J ↾ 𝑡 ℤ
14 11 12 13 mp3an12 ⊢ y ball ⁡ abs ∘ − 1 ∈ J → y ball ⁡ abs ∘ − 1 ∩ ℤ ∈ J ↾ 𝑡 ℤ
15 5 10 14 3syl ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x → y ball ⁡ abs ∘ − 1 ∩ ℤ ∈ J ↾ 𝑡 ℤ
16 1rp ⊢ 1 ∈ ℝ +
17 blcntr ⊢ abs ∘ − ∈ ∞Met ⁡ ℂ ∧ y ∈ ℂ ∧ 1 ∈ ℝ + → y ∈ y ball ⁡ abs ∘ − 1
18 6 16 17 mp3an13 ⊢ y ∈ ℂ → y ∈ y ball ⁡ abs ∘ − 1
19 5 18 syl ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x → y ∈ y ball ⁡ abs ∘ − 1
20 19 4 elind ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x → y ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ
21 5 adantr ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y ∈ ℂ
22 simpr ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ
23 22 elin2d ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → z ∈ ℤ
24 23 zcnd ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → z ∈ ℂ
25 4 adantr ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y ∈ ℤ
26 25 23 zsubcld ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y − z ∈ ℤ
27 26 zcnd ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y − z ∈ ℂ
28 eqid ⊢ abs ∘ − = abs ∘ −
29 28 cnmetdval ⊢ y ∈ ℂ ∧ z ∈ ℂ → y abs ∘ − z = y − z
30 21 24 29 syl2anc ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y abs ∘ − z = y − z
31 22 elin1d ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → z ∈ y ball ⁡ abs ∘ − 1
32 elbl2 ⊢ abs ∘ − ∈ ∞Met ⁡ ℂ ∧ 1 ∈ ℝ * ∧ y ∈ ℂ ∧ z ∈ ℂ → z ∈ y ball ⁡ abs ∘ − 1 ↔ y abs ∘ − z < 1
33 6 7 32 mpanl12 ⊢ y ∈ ℂ ∧ z ∈ ℂ → z ∈ y ball ⁡ abs ∘ − 1 ↔ y abs ∘ − z < 1
34 21 24 33 syl2anc ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → z ∈ y ball ⁡ abs ∘ − 1 ↔ y abs ∘ − z < 1
35 31 34 mpbid ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y abs ∘ − z < 1
36 30 35 eqbrtrrd ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y − z < 1
37 nn0abscl ⊢ y − z ∈ ℤ → y − z ∈ ℕ 0
38 nn0lt10b ⊢ y − z ∈ ℕ 0 → y − z < 1 ↔ y − z = 0
39 26 37 38 3syl ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y − z < 1 ↔ y − z = 0
40 36 39 mpbid ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y − z = 0
41 27 40 abs00d ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y − z = 0
42 21 24 41 subeq0d ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y = z
43 simplr ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → y ∈ x
44 42 43 eqeltrrd ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x ∧ z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → z ∈ x
45 44 ex ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x → z ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ → z ∈ x
46 45 ssrdv ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x → y ball ⁡ abs ∘ − 1 ∩ ℤ ⊆ x
47 eleq2 ⊢ z = y ball ⁡ abs ∘ − 1 ∩ ℤ → y ∈ z ↔ y ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ
48 sseq1 ⊢ z = y ball ⁡ abs ∘ − 1 ∩ ℤ → z ⊆ x ↔ y ball ⁡ abs ∘ − 1 ∩ ℤ ⊆ x
49 47 48 anbi12d ⊢ z = y ball ⁡ abs ∘ − 1 ∩ ℤ → y ∈ z ∧ z ⊆ x ↔ y ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ ∧ y ball ⁡ abs ∘ − 1 ∩ ℤ ⊆ x
50 49 rspcev ⊢ y ball ⁡ abs ∘ − 1 ∩ ℤ ∈ J ↾ 𝑡 ℤ ∧ y ∈ y ball ⁡ abs ∘ − 1 ∩ ℤ ∧ y ball ⁡ abs ∘ − 1 ∩ ℤ ⊆ x → ∃ z ∈ J ↾ 𝑡 ℤ y ∈ z ∧ z ⊆ x
51 15 20 46 50 syl12anc ⊢ x ∈ 𝒫 ℤ ∧ y ∈ x → ∃ z ∈ J ↾ 𝑡 ℤ y ∈ z ∧ z ⊆ x
52 51 ralrimiva ⊢ x ∈ 𝒫 ℤ → ∀ y ∈ x ∃ z ∈ J ↾ 𝑡 ℤ y ∈ z ∧ z ⊆ x
53 resttop ⊢ J ∈ Top ∧ ℤ ∈ V → J ↾ 𝑡 ℤ ∈ Top
54 11 12 53 mp2an ⊢ J ↾ 𝑡 ℤ ∈ Top
55 eltop2 ⊢ J ↾ 𝑡 ℤ ∈ Top → x ∈ J ↾ 𝑡 ℤ ↔ ∀ y ∈ x ∃ z ∈ J ↾ 𝑡 ℤ y ∈ z ∧ z ⊆ x
56 54 55 ax-mp ⊢ x ∈ J ↾ 𝑡 ℤ ↔ ∀ y ∈ x ∃ z ∈ J ↾ 𝑡 ℤ y ∈ z ∧ z ⊆ x
57 52 56 sylibr ⊢ x ∈ 𝒫 ℤ → x ∈ J ↾ 𝑡 ℤ
58 57 ssriv ⊢ 𝒫 ℤ ⊆ J ↾ 𝑡 ℤ
59 2 58 eqssi ⊢ J ↾ 𝑡 ℤ = 𝒫 ℤ