qqhcn - Mathbox for Thierry Arnoux

	Mathbox for Thierry Arnoux		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > qqhcn		Structured version Visualization version GIF version

Theorem qqhcn 34175

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

**Hypotheses**
Ref	Expression
qqhcn.q	⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
qqhcn.j	⊢ 𝐽 = (TopOpen‘𝑄)
qqhcn.z	⊢ 𝑍 = (ℤMod‘𝑅)
qqhcn.k	⊢ 𝐾 = (TopOpen‘𝑅)

**Assertion**
Ref	Expression
qqhcn	⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾))

Proof of Theorem qqhcn Dummy variables 𝑒 𝑑 𝑞 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		inss2 4192	. . . . . . . 8 ⊢ (NrmRing ∩ DivRing) ⊆ DivRing
2	1	sseli 3931	. . . . . . 7 ⊢ (𝑅 ∈ (NrmRing ∩ DivRing) → 𝑅 ∈ DivRing)
3	2	3ad2ant1 1134	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ DivRing)
4		simp3 1139	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (chr‘𝑅) = 0)
5		eqid 2737	. . . . . . 7 ⊢ (Base‘𝑅) = (Base‘𝑅)
6		eqid 2737	. . . . . . 7 ⊢ (/_r‘𝑅) = (/_r‘𝑅)
7		eqid 2737	. . . . . . 7 ⊢ (ℤRHom‘𝑅) = (ℤRHom‘𝑅)
8	5, 6, 7	qqhf 34170	. . . . . 6 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶(Base‘𝑅))
9	3, 4, 8	syl2anc 585	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶(Base‘𝑅))
10		simpr 484	. . . . . . 7 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → 𝑒 ∈ ℝ⁺)
11		qsscn 12887	. . . . . . . . . . . . . 14 ⊢ ℚ ⊆ ℂ
12		simpr 484	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℚ)
13	11, 12	sselid 3933	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℂ)
14		0cn 11138	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℂ
15		eqid 2737	. . . . . . . . . . . . . . . 16 ⊢ (abs ∘ − ) = (abs ∘ − )
16	15	cnmetdval 24731	. . . . . . . . . . . . . . 15 ⊢ ((0 ∈ ℂ ∧ 𝑞 ∈ ℂ) → (0(abs ∘ − )𝑞) = (abs‘(0 − 𝑞)))
17	14, 16	mpan 691	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (0(abs ∘ − )𝑞) = (abs‘(0 − 𝑞)))
18		df-neg 11381	. . . . . . . . . . . . . . . 16 ⊢ -𝑞 = (0 − 𝑞)
19	18	fveq2i 6847	. . . . . . . . . . . . . . 15 ⊢ (abs‘-𝑞) = (abs‘(0 − 𝑞))
20	19	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (abs‘-𝑞) = (abs‘(0 − 𝑞)))
21		absneg 15214	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (abs‘-𝑞) = (abs‘𝑞))
22	17, 20, 21	3eqtr2d 2778	. . . . . . . . . . . . 13 ⊢ (𝑞 ∈ ℂ → (0(abs ∘ − )𝑞) = (abs‘𝑞))
23	13, 22	syl 17	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0(abs ∘ − )𝑞) = (abs‘𝑞))
24		zssq 12883	. . . . . . . . . . . . . . 15 ⊢ ℤ ⊆ ℚ
25		0z 12513	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℤ
26	24, 25	sselii 3932	. . . . . . . . . . . . . 14 ⊢ 0 ∈ ℚ
27	26	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 0 ∈ ℚ)
28	27, 12	ovresd 7537	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (0(abs ∘ − )𝑞))
29		eqid 2737	. . . . . . . . . . . . . 14 ⊢ (norm‘𝑅) = (norm‘𝑅)
30		qqhcn.z	. . . . . . . . . . . . . 14 ⊢ 𝑍 = (ℤMod‘𝑅)
31	29, 30	qqhnm 34174	. . . . . . . . . . . . 13 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)) = (abs‘𝑞))
32	31	adantlr 716	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)) = (abs‘𝑞))
33	23, 28, 32	3eqtr4d 2782	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)))
34	9	ad2antrr 727	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (ℚHom‘𝑅):ℚ⟶(Base‘𝑅))
35	34, 27	ffvelcdmd 7041	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘0) ∈ (Base‘𝑅))
36	34, 12	ffvelcdmd 7041	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅))
37	35, 36	ovresd 7537	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) = (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)))
38		inss1 4191	. . . . . . . . . . . . . . . . 17 ⊢ (NrmRing ∩ DivRing) ⊆ NrmRing
39	38	sseli 3931	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ (NrmRing ∩ DivRing) → 𝑅 ∈ NrmRing)
40	39	3ad2ant1 1134	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ NrmRing)
41	40	ad2antrr 727	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmRing)
42		nrgngp 24623	. . . . . . . . . . . . . 14 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ NrmGrp)
43	41, 42	syl 17	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmGrp)
44		eqid 2737	. . . . . . . . . . . . . 14 ⊢ (-_g‘𝑅) = (-_g‘𝑅)
45		eqid 2737	. . . . . . . . . . . . . 14 ⊢ (dist‘𝑅) = (dist‘𝑅)
46	29, 5, 44, 45	ngpdsr 24566	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ NrmGrp ∧ ((ℚHom‘𝑅)‘0) ∈ (Base‘𝑅) ∧ ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅)) → (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0))))
47	43, 35, 36, 46	syl3anc 1374	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0))))
48	3	ad2antrr 727	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ DivRing)
49	4	ad2antrr 727	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (chr‘𝑅) = 0)
50	5, 6, 7	qqh0 34168	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → ((ℚHom‘𝑅)‘0) = (0_g‘𝑅))
51	48, 49, 50	syl2anc 585	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘0) = (0_g‘𝑅))
52	51	oveq2d 7386	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)))
53		ngpgrp 24560	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ Grp)
54	43, 53	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ Grp)
55		eqid 2737	. . . . . . . . . . . . . . . 16 ⊢ (0_g‘𝑅) = (0_g‘𝑅)
56	5, 55, 44	grpsubid1 18972	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ Grp ∧ ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅)) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)) = ((ℚHom‘𝑅)‘𝑞))
57	54, 36, 56	syl2anc 585	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)) = ((ℚHom‘𝑅)‘𝑞))
58	52, 57	eqtrd 2772	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0)) = ((ℚHom‘𝑅)‘𝑞))
59	58	fveq2d 6848	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0))) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)))
60	37, 47, 59	3eqtrd 2776	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)))
61	33, 60	eqtr4d 2775	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)))
62	61	breq1d 5110	. . . . . . . . 9 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 ↔ (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
63	62	biimpd 229	. . . . . . . 8 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
64	63	ralrimiva 3130	. . . . . . 7 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
65		breq2 5104	. . . . . . . 8 ⊢ (𝑑 = 𝑒 → ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 ↔ (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒))
66	65	rspceaimv 3584	. . . . . . 7 ⊢ ((𝑒 ∈ ℝ⁺ ∧ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒)) → ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
67	10, 64, 66	syl2anc 585	. . . . . 6 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
68	67	ralrimiva 3130	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
69		qqhcn.q	. . . . . . . 8 ⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
70		cnfldxms 24737	. . . . . . . . 9 ⊢ ℂ_fld ∈ ∞MetSp
71		qex 12888	. . . . . . . . 9 ⊢ ℚ ∈ V
72		ressxms 24486	. . . . . . . . 9 ⊢ ((ℂ_fld ∈ ∞MetSp ∧ ℚ ∈ V) → (ℂ_fld ↾_s ℚ) ∈ ∞MetSp)
73	70, 71, 72	mp2an 693	. . . . . . . 8 ⊢ (ℂ_fld ↾_s ℚ) ∈ ∞MetSp
74	69, 73	eqeltri 2833	. . . . . . 7 ⊢ 𝑄 ∈ ∞MetSp
75	69	qrngbas 27603	. . . . . . . 8 ⊢ ℚ = (Base‘𝑄)
76		cnfldds 21338	. . . . . . . . . 10 ⊢ (abs ∘ − ) = (dist‘ℂ_fld)
77	69, 76	ressds 17344	. . . . . . . . 9 ⊢ (ℚ ∈ V → (abs ∘ − ) = (dist‘𝑄))
78	71, 77	ax-mp 5	. . . . . . . 8 ⊢ (abs ∘ − ) = (dist‘𝑄)
79	75, 78	xmsxmet2 24420	. . . . . . 7 ⊢ (𝑄 ∈ ∞MetSp → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
80	74, 79	mp1i 13	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
81		ngpxms 24562	. . . . . . . . 9 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ ∞MetSp)
82	39, 42, 81	3syl 18	. . . . . . . 8 ⊢ (𝑅 ∈ (NrmRing ∩ DivRing) → 𝑅 ∈ ∞MetSp)
83	82	3ad2ant1 1134	. . . . . . 7 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ ∞MetSp)
84	5, 45	xmsxmet2 24420	. . . . . . 7 ⊢ (𝑅 ∈ ∞MetSp → ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))) ∈ (∞Met‘(Base‘𝑅)))
85	83, 84	syl 17	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))) ∈ (∞Met‘(Base‘𝑅)))
86	26	a1i 11	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 0 ∈ ℚ)
87		qqhcn.j	. . . . . . . . 9 ⊢ 𝐽 = (TopOpen‘𝑄)
88	78	reseq1i 5944	. . . . . . . . 9 ⊢ ((abs ∘ − ) ↾ (ℚ × ℚ)) = ((dist‘𝑄) ↾ (ℚ × ℚ))
89	87, 75, 88	xmstopn 24412	. . . . . . . 8 ⊢ (𝑄 ∈ ∞MetSp → 𝐽 = (MetOpen‘((abs ∘ − ) ↾ (ℚ × ℚ))))
90	74, 89	ax-mp 5	. . . . . . 7 ⊢ 𝐽 = (MetOpen‘((abs ∘ − ) ↾ (ℚ × ℚ)))
91		eqid 2737	. . . . . . 7 ⊢ (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))) = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))))
92	90, 91	metcnp 24502	. . . . . 6 ⊢ ((((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ) ∧ ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))) ∈ (∞Met‘(Base‘𝑅)) ∧ 0 ∈ ℚ) → ((ℚHom‘𝑅) ∈ ((𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))‘0) ↔ ((ℚHom‘𝑅):ℚ⟶(Base‘𝑅) ∧ ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))))
93	80, 85, 86, 92	syl3anc 1374	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((ℚHom‘𝑅) ∈ ((𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))‘0) ↔ ((ℚHom‘𝑅):ℚ⟶(Base‘𝑅) ∧ ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))))
94	9, 68, 93	mpbir2and 714	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ ((𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))‘0))
95		qqhcn.k	. . . . . . . 8 ⊢ 𝐾 = (TopOpen‘𝑅)
96		eqid 2737	. . . . . . . 8 ⊢ ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))) = ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))
97	95, 5, 96	xmstopn 24412	. . . . . . 7 ⊢ (𝑅 ∈ ∞MetSp → 𝐾 = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))
98	83, 97	syl 17	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝐾 = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))
99	98	oveq2d 7386	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (𝐽 CnP 𝐾) = (𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))))))
100	99	fveq1d 6846	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((𝐽 CnP 𝐾)‘0) = ((𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))‘0))
101	94, 100	eleqtrrd 2840	. . 3 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ ((𝐽 CnP 𝐾)‘0))
102		cnfldtgp 24833	. . . . . 6 ⊢ ℂ_fld ∈ TopGrp
103		qsubdrg 21391	. . . . . . . 8 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) ∧ (ℂ_fld ↾_s ℚ) ∈ DivRing)
104	103	simpli 483	. . . . . . 7 ⊢ ℚ ∈ (SubRing‘ℂ_fld)
105		subrgsubg 20527	. . . . . . 7 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) → ℚ ∈ (SubGrp‘ℂ_fld))
106	104, 105	ax-mp 5	. . . . . 6 ⊢ ℚ ∈ (SubGrp‘ℂ_fld)
107	69	subgtgp 24066	. . . . . 6 ⊢ ((ℂ_fld ∈ TopGrp ∧ ℚ ∈ (SubGrp‘ℂ_fld)) → 𝑄 ∈ TopGrp)
108	102, 106, 107	mp2an 693	. . . . 5 ⊢ 𝑄 ∈ TopGrp
109		tgptmd 24040	. . . . 5 ⊢ (𝑄 ∈ TopGrp → 𝑄 ∈ TopMnd)
110	108, 109	mp1i 13	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑄 ∈ TopMnd)
111		nrgtrg 24651	. . . . 5 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ TopRing)
112		trgtmd2 24130	. . . . 5 ⊢ (𝑅 ∈ TopRing → 𝑅 ∈ TopMnd)
113	40, 111, 112	3syl 18	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ TopMnd)
114	5, 6, 7, 69	qqhghm 34172	. . . . 5 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
115	3, 4, 114	syl2anc 585	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
116	75, 87, 95	ghmcnp 24076	. . . 4 ⊢ ((𝑄 ∈ TopMnd ∧ 𝑅 ∈ TopMnd ∧ (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅)) → ((ℚHom‘𝑅) ∈ ((𝐽 CnP 𝐾)‘0) ↔ (0 ∈ ℚ ∧ (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾))))
117	110, 113, 115, 116	syl3anc 1374	. . 3 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((ℚHom‘𝑅) ∈ ((𝐽 CnP 𝐾)‘0) ↔ (0 ∈ ℚ ∧ (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾))))
118	101, 117	mpbid 232	. 2 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (0 ∈ ℚ ∧ (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾)))
119	118	simprd 495	1 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 ∀wral 3052 ∃wrex 3062 Vcvv 3442 ∩ cin 3902 class class class wbr 5100 × cxp 5632 ↾ cres 5636 ∘ ccom 5638 ⟶wf 6498 ‘cfv 6502 (class class class)co 7370 ℂcc 11038 0cc0 11040 < clt 11180 − cmin 11378 -cneg 11379 ℤcz 12502 ℚcq 12875 ℝ⁺crp 12919 abscabs 15171 Basecbs 17150 ↾_s cress 17171 distcds 17200 TopOpenctopn 17355 0_gc0g 17373 Grpcgrp 18880 -_gcsg 18882 SubGrpcsubg 19067 GrpHom cghm 19158 /_rcdvr 20353 SubRingcsubrg 20519 DivRingcdr 20679 ∞Metcxmet 21311 MetOpencmopn 21316 ℂ_fldccnfld 21326 ℤRHomczrh 21471 ℤModczlm 21472 chrcchr 21473 Cn ccn 23185 CnP ccnp 23186 TopMndctmd 24031 TopGrpctgp 24032 TopRingctrg 24117 ∞MetSpcxms 24278 normcnm 24537 NrmGrpcngp 24538 NrmRingcnrg 24540 NrmModcnlm 24541 ℚHomcqqh 34154

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5226 ax-sep 5245 ax-nul 5255 ax-pow 5314 ax-pr 5381 ax-un 7692 ax-cnex 11096 ax-resscn 11097 ax-1cn 11098 ax-icn 11099 ax-addcl 11100 ax-addrcl 11101 ax-mulcl 11102 ax-mulrcl 11103 ax-mulcom 11104 ax-addass 11105 ax-mulass 11106 ax-distr 11107 ax-i2m1 11108 ax-1ne0 11109 ax-1rid 11110 ax-rnegex 11111 ax-rrecex 11112 ax-cnre 11113 ax-pre-lttri 11114 ax-pre-lttrn 11115 ax-pre-ltadd 11116 ax-pre-mulgt0 11117 ax-pre-sup 11118 ax-addf 11119 ax-mulf 11120

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-nel 3038 df-ral 3053 df-rex 3063 df-rmo 3352 df-reu 3353 df-rab 3402 df-v 3444 df-sbc 3743 df-csb 3852 df-dif 3906 df-un 3908 df-in 3910 df-ss 3920 df-pss 3923 df-nul 4288 df-if 4482 df-pw 4558 df-sn 4583 df-pr 4585 df-tp 4587 df-op 4589 df-uni 4866 df-int 4905 df-iun 4950 df-iin 4951 df-br 5101 df-opab 5163 df-mpt 5182 df-tr 5208 df-id 5529 df-eprel 5534 df-po 5542 df-so 5543 df-fr 5587 df-se 5588 df-we 5589 df-xp 5640 df-rel 5641 df-cnv 5642 df-co 5643 df-dm 5644 df-rn 5645 df-res 5646 df-ima 5647 df-pred 6269 df-ord 6330 df-on 6331 df-lim 6332 df-suc 6333 df-iota 6458 df-fun 6504 df-fn 6505 df-f 6506 df-f1 6507 df-fo 6508 df-f1o 6509 df-fv 6510 df-isom 6511 df-riota 7327 df-ov 7373 df-oprab 7374 df-mpo 7375 df-of 7634 df-om 7821 df-1st 7945 df-2nd 7946 df-supp 8115 df-tpos 8180 df-frecs 8235 df-wrecs 8266 df-recs 8315 df-rdg 8353 df-1o 8409 df-2o 8410 df-er 8647 df-map 8779 df-ixp 8850 df-en 8898 df-dom 8899 df-sdom 8900 df-fin 8901 df-fsupp 9279 df-fi 9328 df-sup 9359 df-inf 9360 df-oi 9429 df-card 9865 df-pnf 11182 df-mnf 11183 df-xr 11184 df-ltxr 11185 df-le 11186 df-sub 11380 df-neg 11381 df-div 11809 df-nn 12160 df-2 12222 df-3 12223 df-4 12224 df-5 12225 df-6 12226 df-7 12227 df-8 12228 df-9 12229 df-n0 12416 df-z 12503 df-dec 12622 df-uz 12766 df-q 12876 df-rp 12920 df-xneg 13040 df-xadd 13041 df-xmul 13042 df-ico 13281 df-icc 13282 df-fz 13438 df-fzo 13585 df-fl 13726 df-mod 13804 df-seq 13939 df-exp 13999 df-hash 14268 df-cj 15036 df-re 15037 df-im 15038 df-sqrt 15172 df-abs 15173 df-dvds 16194 df-gcd 16436 df-numer 16676 df-denom 16677 df-gz 16872 df-struct 17088 df-sets 17105 df-slot 17123 df-ndx 17135 df-base 17151 df-ress 17172 df-plusg 17204 df-mulr 17205 df-starv 17206 df-sca 17207 df-vsca 17208 df-ip 17209 df-tset 17210 df-ple 17211 df-ds 17213 df-unif 17214 df-hom 17215 df-cco 17216 df-rest 17356 df-topn 17357 df-0g 17375 df-gsum 17376 df-topgen 17377 df-pt 17378 df-prds 17381 df-xrs 17437 df-qtop 17442 df-imas 17443 df-xps 17445 df-mre 17519 df-mrc 17520 df-acs 17522 df-plusf 18578 df-mgm 18579 df-sgrp 18658 df-mnd 18674 df-mhm 18722 df-submnd 18723 df-grp 18883 df-minusg 18884 df-sbg 18885 df-mulg 19015 df-subg 19070 df-ghm 19159 df-cntz 19263 df-od 19474 df-cmn 19728 df-abl 19729 df-mgp 20093 df-rng 20105 df-ur 20134 df-ring 20187 df-cring 20188 df-oppr 20290 df-dvdsr 20310 df-unit 20311 df-invr 20341 df-dvr 20354 df-rhm 20425 df-nzr 20463 df-subrng 20496 df-subrg 20520 df-drng 20681 df-abv 20759 df-lmod 20830 df-scaf 20831 df-sra 21142 df-rgmod 21143 df-psmet 21318 df-xmet 21319 df-met 21320 df-bl 21321 df-mopn 21322 df-cnfld 21327 df-zring 21419 df-zrh 21475 df-zlm 21476 df-chr 21477 df-top 22855 df-topon 22872 df-topsp 22894 df-bases 22907 df-cn 23188 df-cnp 23189 df-tx 23523 df-hmeo 23716 df-tmd 24033 df-tgp 24034 df-trg 24121 df-xms 24281 df-ms 24282 df-tms 24283 df-nm 24543 df-ngp 24544 df-nrg 24546 df-nlm 24547 df-qqh 34155

This theorem is referenced by: rrhqima 34198

W3C validator