Metamath Proof Explorer


Theorem qqhcn

Description: The QQHom homomorphism is a continuous function. (Contributed by Thierry Arnoux, 9-Nov-2017)

Ref Expression
Hypotheses qqhcn.q ⊢ Q = ℂ fld ↾ 𝑠 ℚ
qqhcn.j ⊢ J = TopOpen ⁡ Q
qqhcn.z ⊢ Z = ℤMod ⁡ R
qqhcn.k ⊢ K = TopOpen ⁡ R
Assertion qqhcn ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → ℚHom ⁡ R ∈ J Cn K

Proof

Step Hyp Ref Expression
1 qqhcn.q ⊢ Q = ℂ fld ↾ 𝑠 ℚ
2 qqhcn.j ⊢ J = TopOpen ⁡ Q
3 qqhcn.z ⊢ Z = ℤMod ⁡ R
4 qqhcn.k ⊢ K = TopOpen ⁡ R
5 inss2 ⊢ NrmRing ∩ DivRing ⊆ DivRing
6 5 sseli ⊢ R ∈ NrmRing ∩ DivRing → R ∈ DivRing
7 6 3ad2ant1 ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → R ∈ DivRing
8 simp3 ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → chr ⁡ R = 0
9 eqid ⊢ Base R = Base R
10 eqid ⊢ / r ⁡ R = / r ⁡ R
11 eqid ⊢ ℤRHom ⁡ R = ℤRHom ⁡ R
12 9 10 11 qqhf ⊢ R ∈ DivRing ∧ chr ⁡ R = 0 → ℚHom ⁡ R : ℚ ⟶ Base R
13 7 8 12 syl2anc ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → ℚHom ⁡ R : ℚ ⟶ Base R
14 simpr ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + → e ∈ ℝ +
15 qsscn ⊢ ℚ ⊆ ℂ
16 simpr ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → q ∈ ℚ
17 15 16 sselid ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → q ∈ ℂ
18 0cn ⊢ 0 ∈ ℂ
19 eqid ⊢ abs ∘ − = abs ∘ −
20 19 cnmetdval ⊢ 0 ∈ ℂ ∧ q ∈ ℂ → 0 abs ∘ − q = 0 − q
21 18 20 mpan ⊢ q ∈ ℂ → 0 abs ∘ − q = 0 − q
22 df-neg ⊢ − q = 0 − q
23 22 fveq2i ⊢ − q = 0 − q
24 23 a1i ⊢ q ∈ ℂ → − q = 0 − q
25 absneg ⊢ q ∈ ℂ → − q = q
26 21 24 25 3eqtr2d ⊢ q ∈ ℂ → 0 abs ∘ − q = q
27 17 26 syl ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → 0 abs ∘ − q = q
28 zssq ⊢ ℤ ⊆ ℚ
29 0z ⊢ 0 ∈ ℤ
30 28 29 sselii ⊢ 0 ∈ ℚ
31 30 a1i ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → 0 ∈ ℚ
32 31 16 ovresd ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → 0 abs ∘ − ↾ ℚ × ℚ q = 0 abs ∘ − q
33 eqid ⊢ norm ⁡ R = norm ⁡ R
34 33 3 qqhnm ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ q ∈ ℚ → norm ⁡ R ⁡ ℚHom ⁡ R ⁡ q = q
35 34 adantlr ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → norm ⁡ R ⁡ ℚHom ⁡ R ⁡ q = q
36 27 32 35 3eqtr4d ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → 0 abs ∘ − ↾ ℚ × ℚ q = norm ⁡ R ⁡ ℚHom ⁡ R ⁡ q
37 13 ad2antrr ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R : ℚ ⟶ Base R
38 37 31 ffvelcdmd ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R ⁡ 0 ∈ Base R
39 37 16 ffvelcdmd ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R ⁡ q ∈ Base R
40 38 39 ovresd ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q = ℚHom ⁡ R ⁡ 0 dist ⁡ R ℚHom ⁡ R ⁡ q
41 inss1 ⊢ NrmRing ∩ DivRing ⊆ NrmRing
42 41 sseli ⊢ R ∈ NrmRing ∩ DivRing → R ∈ NrmRing
43 42 3ad2ant1 ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → R ∈ NrmRing
44 43 ad2antrr ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → R ∈ NrmRing
45 nrgngp ⊢ R ∈ NrmRing → R ∈ NrmGrp
46 44 45 syl ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → R ∈ NrmGrp
47 eqid ⊢ - R = - R
48 eqid ⊢ dist ⁡ R = dist ⁡ R
49 33 9 47 48 ngpdsr ⊢ R ∈ NrmGrp ∧ ℚHom ⁡ R ⁡ 0 ∈ Base R ∧ ℚHom ⁡ R ⁡ q ∈ Base R → ℚHom ⁡ R ⁡ 0 dist ⁡ R ℚHom ⁡ R ⁡ q = norm ⁡ R ⁡ ℚHom ⁡ R ⁡ q - R ℚHom ⁡ R ⁡ 0
50 46 38 39 49 syl3anc ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R ⁡ 0 dist ⁡ R ℚHom ⁡ R ⁡ q = norm ⁡ R ⁡ ℚHom ⁡ R ⁡ q - R ℚHom ⁡ R ⁡ 0
51 7 ad2antrr ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → R ∈ DivRing
52 8 ad2antrr ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → chr ⁡ R = 0
53 9 10 11 qqh0 ⊢ R ∈ DivRing ∧ chr ⁡ R = 0 → ℚHom ⁡ R ⁡ 0 = 0 R
54 51 52 53 syl2anc ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R ⁡ 0 = 0 R
55 54 oveq2d ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R ⁡ q - R ℚHom ⁡ R ⁡ 0 = ℚHom ⁡ R ⁡ q - R 0 R
56 ngpgrp ⊢ R ∈ NrmGrp → R ∈ Grp
57 46 56 syl ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → R ∈ Grp
58 eqid ⊢ 0 R = 0 R
59 9 58 47 grpsubid1 ⊢ R ∈ Grp ∧ ℚHom ⁡ R ⁡ q ∈ Base R → ℚHom ⁡ R ⁡ q - R 0 R = ℚHom ⁡ R ⁡ q
60 57 39 59 syl2anc ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R ⁡ q - R 0 R = ℚHom ⁡ R ⁡ q
61 55 60 eqtrd ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R ⁡ q - R ℚHom ⁡ R ⁡ 0 = ℚHom ⁡ R ⁡ q
62 61 fveq2d ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → norm ⁡ R ⁡ ℚHom ⁡ R ⁡ q - R ℚHom ⁡ R ⁡ 0 = norm ⁡ R ⁡ ℚHom ⁡ R ⁡ q
63 40 50 62 3eqtrd ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q = norm ⁡ R ⁡ ℚHom ⁡ R ⁡ q
64 36 63 eqtr4d ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → 0 abs ∘ − ↾ ℚ × ℚ q = ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q
65 64 breq1d ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → 0 abs ∘ − ↾ ℚ × ℚ q < e ↔ ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q < e
66 65 biimpd ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + ∧ q ∈ ℚ → 0 abs ∘ − ↾ ℚ × ℚ q < e → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q < e
67 66 ralrimiva ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + → ∀ q ∈ ℚ 0 abs ∘ − ↾ ℚ × ℚ q < e → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q < e
68 breq2 ⊢ d = e → 0 abs ∘ − ↾ ℚ × ℚ q < d ↔ 0 abs ∘ − ↾ ℚ × ℚ q < e
69 68 rspceaimv ⊢ e ∈ ℝ + ∧ ∀ q ∈ ℚ 0 abs ∘ − ↾ ℚ × ℚ q < e → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q < e → ∃ d ∈ ℝ + ∀ q ∈ ℚ 0 abs ∘ − ↾ ℚ × ℚ q < d → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q < e
70 14 67 69 syl2anc ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 ∧ e ∈ ℝ + → ∃ d ∈ ℝ + ∀ q ∈ ℚ 0 abs ∘ − ↾ ℚ × ℚ q < d → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q < e
71 70 ralrimiva ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → ∀ e ∈ ℝ + ∃ d ∈ ℝ + ∀ q ∈ ℚ 0 abs ∘ − ↾ ℚ × ℚ q < d → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q < e
72 cnfldxms ⊢ ℂ fld ∈ ∞MetSp
73 qex ⊢ ℚ ∈ V
74 ressxms ⊢ ℂ fld ∈ ∞MetSp ∧ ℚ ∈ V → ℂ fld ↾ 𝑠 ℚ ∈ ∞MetSp
75 72 73 74 mp2an ⊢ ℂ fld ↾ 𝑠 ℚ ∈ ∞MetSp
76 1 75 eqeltri ⊢ Q ∈ ∞MetSp
77 1 qrngbas ⊢ ℚ = Base Q
78 cnfldds ⊢ abs ∘ − = dist ⁡ ℂ fld
79 1 78 ressds ⊢ ℚ ∈ V → abs ∘ − = dist ⁡ Q
80 73 79 ax-mp ⊢ abs ∘ − = dist ⁡ Q
81 77 80 xmsxmet2 ⊢ Q ∈ ∞MetSp → abs ∘ − ↾ ℚ × ℚ ∈ ∞Met ⁡ ℚ
82 76 81 mp1i ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → abs ∘ − ↾ ℚ × ℚ ∈ ∞Met ⁡ ℚ
83 ngpxms ⊢ R ∈ NrmGrp → R ∈ ∞MetSp
84 42 45 83 3syl ⊢ R ∈ NrmRing ∩ DivRing → R ∈ ∞MetSp
85 84 3ad2ant1 ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → R ∈ ∞MetSp
86 9 48 xmsxmet2 ⊢ R ∈ ∞MetSp → dist ⁡ R ↾ Base R × Base R ∈ ∞Met ⁡ Base R
87 85 86 syl ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → dist ⁡ R ↾ Base R × Base R ∈ ∞Met ⁡ Base R
88 30 a1i ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → 0 ∈ ℚ
89 80 reseq1i ⊢ abs ∘ − ↾ ℚ × ℚ = dist ⁡ Q ↾ ℚ × ℚ
90 2 77 89 xmstopn ⊢ Q ∈ ∞MetSp → J = MetOpen ⁡ abs ∘ − ↾ ℚ × ℚ
91 76 90 ax-mp ⊢ J = MetOpen ⁡ abs ∘ − ↾ ℚ × ℚ
92 eqid ⊢ MetOpen ⁡ dist ⁡ R ↾ Base R × Base R = MetOpen ⁡ dist ⁡ R ↾ Base R × Base R
93 91 92 metcnp ⊢ abs ∘ − ↾ ℚ × ℚ ∈ ∞Met ⁡ ℚ ∧ dist ⁡ R ↾ Base R × Base R ∈ ∞Met ⁡ Base R ∧ 0 ∈ ℚ → ℚHom ⁡ R ∈ J CnP MetOpen ⁡ dist ⁡ R ↾ Base R × Base R ⁡ 0 ↔ ℚHom ⁡ R : ℚ ⟶ Base R ∧ ∀ e ∈ ℝ + ∃ d ∈ ℝ + ∀ q ∈ ℚ 0 abs ∘ − ↾ ℚ × ℚ q < d → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q < e
94 82 87 88 93 syl3anc ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → ℚHom ⁡ R ∈ J CnP MetOpen ⁡ dist ⁡ R ↾ Base R × Base R ⁡ 0 ↔ ℚHom ⁡ R : ℚ ⟶ Base R ∧ ∀ e ∈ ℝ + ∃ d ∈ ℝ + ∀ q ∈ ℚ 0 abs ∘ − ↾ ℚ × ℚ q < d → ℚHom ⁡ R ⁡ 0 dist ⁡ R ↾ Base R × Base R ℚHom ⁡ R ⁡ q < e
95 13 71 94 mpbir2and ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → ℚHom ⁡ R ∈ J CnP MetOpen ⁡ dist ⁡ R ↾ Base R × Base R ⁡ 0
96 eqid ⊢ dist ⁡ R ↾ Base R × Base R = dist ⁡ R ↾ Base R × Base R
97 4 9 96 xmstopn ⊢ R ∈ ∞MetSp → K = MetOpen ⁡ dist ⁡ R ↾ Base R × Base R
98 85 97 syl ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → K = MetOpen ⁡ dist ⁡ R ↾ Base R × Base R
99 98 oveq2d ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → J CnP K = J CnP MetOpen ⁡ dist ⁡ R ↾ Base R × Base R
100 99 fveq1d ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → J CnP K ⁡ 0 = J CnP MetOpen ⁡ dist ⁡ R ↾ Base R × Base R ⁡ 0
101 95 100 eleqtrrd ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → ℚHom ⁡ R ∈ J CnP K ⁡ 0
102 cnfldtgp ⊢ ℂ fld ∈ TopGrp
103 qsubdrg ⊢ ℚ ∈ SubRing ⁡ ℂ fld ∧ ℂ fld ↾ 𝑠 ℚ ∈ DivRing
104 103 simpli ⊢ ℚ ∈ SubRing ⁡ ℂ fld
105 subrgsubg ⊢ ℚ ∈ SubRing ⁡ ℂ fld → ℚ ∈ SubGrp ⁡ ℂ fld
106 104 105 ax-mp ⊢ ℚ ∈ SubGrp ⁡ ℂ fld
107 1 subgtgp ⊢ ℂ fld ∈ TopGrp ∧ ℚ ∈ SubGrp ⁡ ℂ fld → Q ∈ TopGrp
108 102 106 107 mp2an ⊢ Q ∈ TopGrp
109 tgptmd ⊢ Q ∈ TopGrp → Q ∈ TopMnd
110 108 109 mp1i ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → Q ∈ TopMnd
111 nrgtrg ⊢ R ∈ NrmRing → R ∈ TopRing
112 trgtmd2 ⊢ R ∈ TopRing → R ∈ TopMnd
113 43 111 112 3syl ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → R ∈ TopMnd
114 9 10 11 1 qqhghm ⊢ R ∈ DivRing ∧ chr ⁡ R = 0 → ℚHom ⁡ R ∈ Q GrpHom R
115 7 8 114 syl2anc ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → ℚHom ⁡ R ∈ Q GrpHom R
116 77 2 4 ghmcnp ⊢ Q ∈ TopMnd ∧ R ∈ TopMnd ∧ ℚHom ⁡ R ∈ Q GrpHom R → ℚHom ⁡ R ∈ J CnP K ⁡ 0 ↔ 0 ∈ ℚ ∧ ℚHom ⁡ R ∈ J Cn K
117 110 113 115 116 syl3anc ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → ℚHom ⁡ R ∈ J CnP K ⁡ 0 ↔ 0 ∈ ℚ ∧ ℚHom ⁡ R ∈ J Cn K
118 101 117 mpbid ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → 0 ∈ ℚ ∧ ℚHom ⁡ R ∈ J Cn K
119 118 simprd ⊢ R ∈ NrmRing ∩ DivRing ∧ Z ∈ NrmMod ∧ chr ⁡ R = 0 → ℚHom ⁡ R ∈ J Cn K