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 34150

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 4191	. . . . . . . 8 ⊢ (NrmRing ∩ DivRing) ⊆ DivRing
2	1	sseli 3930	. . . . . . 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 34145	. . . . . 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 12877	. . . . . . . . . . . . . 14 ⊢ ℚ ⊆ ℂ
12		simpr 484	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℚ)
13	11, 12	sselid 3932	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℂ)
14		0cn 11128	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℂ
15		eqid 2737	. . . . . . . . . . . . . . . 16 ⊢ (abs ∘ − ) = (abs ∘ − )
16	15	cnmetdval 24718	. . . . . . . . . . . . . . 15 ⊢ ((0 ∈ ℂ ∧ 𝑞 ∈ ℂ) → (0(abs ∘ − )𝑞) = (abs‘(0 − 𝑞)))
17	14, 16	mpan 691	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (0(abs ∘ − )𝑞) = (abs‘(0 − 𝑞)))
18		df-neg 11371	. . . . . . . . . . . . . . . 16 ⊢ -𝑞 = (0 − 𝑞)
19	18	fveq2i 6838	. . . . . . . . . . . . . . 15 ⊢ (abs‘-𝑞) = (abs‘(0 − 𝑞))
20	19	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (abs‘-𝑞) = (abs‘(0 − 𝑞)))
21		absneg 15204	. . . . . . . . . . . . . 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 12873	. . . . . . . . . . . . . . 15 ⊢ ℤ ⊆ ℚ
25		0z 12503	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℤ
26	24, 25	sselii 3931	. . . . . . . . . . . . . 14 ⊢ 0 ∈ ℚ
27	26	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 0 ∈ ℚ)
28	27, 12	ovresd 7527	. . . . . . . . . . . 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 34149	. . . . . . . . . . . . 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 7032	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘0) ∈ (Base‘𝑅))
36	34, 12	ffvelcdmd 7032	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅))
37	35, 36	ovresd 7527	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) = (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)))
38		inss1 4190	. . . . . . . . . . . . . . . . 17 ⊢ (NrmRing ∩ DivRing) ⊆ NrmRing
39	38	sseli 3930	. . . . . . . . . . . . . . . 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 24610	. . . . . . . . . . . . . 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 24553	. . . . . . . . . . . . 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 34143	. . . . . . . . . . . . . . . 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 7376	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)))
53		ngpgrp 24547	. . . . . . . . . . . . . . . 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 18959	. . . . . . . . . . . . . . 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 6839	. . . . . . . . . . . 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 5109	. . . . . . . . 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 3129	. . . . . . 7 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
65		breq2 5103	. . . . . . . 8 ⊢ (𝑑 = 𝑒 → ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 ↔ (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒))
66	65	rspceaimv 3583	. . . . . . 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 3129	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
69		qqhcn.q	. . . . . . . 8 ⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
70		cnfldxms 24724	. . . . . . . . 9 ⊢ ℂ_fld ∈ ∞MetSp
71		qex 12878	. . . . . . . . 9 ⊢ ℚ ∈ V
72		ressxms 24473	. . . . . . . . 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 27590	. . . . . . . 8 ⊢ ℚ = (Base‘𝑄)
76		cnfldds 21325	. . . . . . . . . 10 ⊢ (abs ∘ − ) = (dist‘ℂ_fld)
77	69, 76	ressds 17334	. . . . . . . . 9 ⊢ (ℚ ∈ V → (abs ∘ − ) = (dist‘𝑄))
78	71, 77	ax-mp 5	. . . . . . . 8 ⊢ (abs ∘ − ) = (dist‘𝑄)
79	75, 78	xmsxmet2 24407	. . . . . . 7 ⊢ (𝑄 ∈ ∞MetSp → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
80	74, 79	mp1i 13	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
81		ngpxms 24549	. . . . . . . . 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 24407	. . . . . . 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 5935	. . . . . . . . 9 ⊢ ((abs ∘ − ) ↾ (ℚ × ℚ)) = ((dist‘𝑄) ↾ (ℚ × ℚ))
89	87, 75, 88	xmstopn 24399	. . . . . . . 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 24489	. . . . . 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 24399	. . . . . . 7 ⊢ (𝑅 ∈ ∞MetSp → 𝐾 = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))
98	83, 97	syl 17	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝐾 = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))
99	98	oveq2d 7376	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (𝐽 CnP 𝐾) = (𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))))))
100	99	fveq1d 6837	. . . 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 24820	. . . . . 6 ⊢ ℂ_fld ∈ TopGrp
103		qsubdrg 21378	. . . . . . . 8 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) ∧ (ℂ_fld ↾_s ℚ) ∈ DivRing)
104	103	simpli 483	. . . . . . 7 ⊢ ℚ ∈ (SubRing‘ℂ_fld)
105		subrgsubg 20514	. . . . . . 7 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) → ℚ ∈ (SubGrp‘ℂ_fld))
106	104, 105	ax-mp 5	. . . . . 6 ⊢ ℚ ∈ (SubGrp‘ℂ_fld)
107	69	subgtgp 24053	. . . . . 6 ⊢ ((ℂ_fld ∈ TopGrp ∧ ℚ ∈ (SubGrp‘ℂ_fld)) → 𝑄 ∈ TopGrp)
108	102, 106, 107	mp2an 693	. . . . 5 ⊢ 𝑄 ∈ TopGrp
109		tgptmd 24027	. . . . 5 ⊢ (𝑄 ∈ TopGrp → 𝑄 ∈ TopMnd)
110	108, 109	mp1i 13	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑄 ∈ TopMnd)
111		nrgtrg 24638	. . . . 5 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ TopRing)
112		trgtmd2 24117	. . . . 5 ⊢ (𝑅 ∈ TopRing → 𝑅 ∈ TopMnd)
113	40, 111, 112	3syl 18	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ TopMnd)
114	5, 6, 7, 69	qqhghm 34147	. . . . 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 24063	. . . 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 3061 Vcvv 3441 ∩ cin 3901 class class class wbr 5099 × cxp 5623 ↾ cres 5627 ∘ ccom 5629 ⟶wf 6489 ‘cfv 6493 (class class class)co 7360 ℂcc 11028 0cc0 11030 < clt 11170 − cmin 11368 -cneg 11369 ℤcz 12492 ℚcq 12865 ℝ⁺crp 12909 abscabs 15161 Basecbs 17140 ↾_s cress 17161 distcds 17190 TopOpenctopn 17345 0_gc0g 17363 Grpcgrp 18867 -_gcsg 18869 SubGrpcsubg 19054 GrpHom cghm 19145 /_rcdvr 20340 SubRingcsubrg 20506 DivRingcdr 20666 ∞Metcxmet 21298 MetOpencmopn 21303 ℂ_fldccnfld 21313 ℤRHomczrh 21458 ℤModczlm 21459 chrcchr 21460 Cn ccn 23172 CnP ccnp 23173 TopMndctmd 24018 TopGrpctgp 24019 TopRingctrg 24104 ∞MetSpcxms 24265 normcnm 24524 NrmGrpcngp 24525 NrmRingcnrg 24527 NrmModcnlm 24528 ℚHomcqqh 34129

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 5225 ax-sep 5242 ax-nul 5252 ax-pow 5311 ax-pr 5378 ax-un 7682 ax-cnex 11086 ax-resscn 11087 ax-1cn 11088 ax-icn 11089 ax-addcl 11090 ax-addrcl 11091 ax-mulcl 11092 ax-mulrcl 11093 ax-mulcom 11094 ax-addass 11095 ax-mulass 11096 ax-distr 11097 ax-i2m1 11098 ax-1ne0 11099 ax-1rid 11100 ax-rnegex 11101 ax-rrecex 11102 ax-cnre 11103 ax-pre-lttri 11104 ax-pre-lttrn 11105 ax-pre-ltadd 11106 ax-pre-mulgt0 11107 ax-pre-sup 11108 ax-addf 11109 ax-mulf 11110

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 3062 df-rmo 3351 df-reu 3352 df-rab 3401 df-v 3443 df-sbc 3742 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4287 df-if 4481 df-pw 4557 df-sn 4582 df-pr 4584 df-tp 4586 df-op 4588 df-uni 4865 df-int 4904 df-iun 4949 df-iin 4950 df-br 5100 df-opab 5162 df-mpt 5181 df-tr 5207 df-id 5520 df-eprel 5525 df-po 5533 df-so 5534 df-fr 5578 df-se 5579 df-we 5580 df-xp 5631 df-rel 5632 df-cnv 5633 df-co 5634 df-dm 5635 df-rn 5636 df-res 5637 df-ima 5638 df-pred 6260 df-ord 6321 df-on 6322 df-lim 6323 df-suc 6324 df-iota 6449 df-fun 6495 df-fn 6496 df-f 6497 df-f1 6498 df-fo 6499 df-f1o 6500 df-fv 6501 df-isom 6502 df-riota 7317 df-ov 7363 df-oprab 7364 df-mpo 7365 df-of 7624 df-om 7811 df-1st 7935 df-2nd 7936 df-supp 8105 df-tpos 8170 df-frecs 8225 df-wrecs 8256 df-recs 8305 df-rdg 8343 df-1o 8399 df-2o 8400 df-er 8637 df-map 8769 df-ixp 8840 df-en 8888 df-dom 8889 df-sdom 8890 df-fin 8891 df-fsupp 9269 df-fi 9318 df-sup 9349 df-inf 9350 df-oi 9419 df-card 9855 df-pnf 11172 df-mnf 11173 df-xr 11174 df-ltxr 11175 df-le 11176 df-sub 11370 df-neg 11371 df-div 11799 df-nn 12150 df-2 12212 df-3 12213 df-4 12214 df-5 12215 df-6 12216 df-7 12217 df-8 12218 df-9 12219 df-n0 12406 df-z 12493 df-dec 12612 df-uz 12756 df-q 12866 df-rp 12910 df-xneg 13030 df-xadd 13031 df-xmul 13032 df-ico 13271 df-icc 13272 df-fz 13428 df-fzo 13575 df-fl 13716 df-mod 13794 df-seq 13929 df-exp 13989 df-hash 14258 df-cj 15026 df-re 15027 df-im 15028 df-sqrt 15162 df-abs 15163 df-dvds 16184 df-gcd 16426 df-numer 16666 df-denom 16667 df-gz 16862 df-struct 17078 df-sets 17095 df-slot 17113 df-ndx 17125 df-base 17141 df-ress 17162 df-plusg 17194 df-mulr 17195 df-starv 17196 df-sca 17197 df-vsca 17198 df-ip 17199 df-tset 17200 df-ple 17201 df-ds 17203 df-unif 17204 df-hom 17205 df-cco 17206 df-rest 17346 df-topn 17347 df-0g 17365 df-gsum 17366 df-topgen 17367 df-pt 17368 df-prds 17371 df-xrs 17427 df-qtop 17432 df-imas 17433 df-xps 17435 df-mre 17509 df-mrc 17510 df-acs 17512 df-plusf 18568 df-mgm 18569 df-sgrp 18648 df-mnd 18664 df-mhm 18712 df-submnd 18713 df-grp 18870 df-minusg 18871 df-sbg 18872 df-mulg 19002 df-subg 19057 df-ghm 19146 df-cntz 19250 df-od 19461 df-cmn 19715 df-abl 19716 df-mgp 20080 df-rng 20092 df-ur 20121 df-ring 20174 df-cring 20175 df-oppr 20277 df-dvdsr 20297 df-unit 20298 df-invr 20328 df-dvr 20341 df-rhm 20412 df-nzr 20450 df-subrng 20483 df-subrg 20507 df-drng 20668 df-abv 20746 df-lmod 20817 df-scaf 20818 df-sra 21129 df-rgmod 21130 df-psmet 21305 df-xmet 21306 df-met 21307 df-bl 21308 df-mopn 21309 df-cnfld 21314 df-zring 21406 df-zrh 21462 df-zlm 21463 df-chr 21464 df-top 22842 df-topon 22859 df-topsp 22881 df-bases 22894 df-cn 23175 df-cnp 23176 df-tx 23510 df-hmeo 23703 df-tmd 24020 df-tgp 24021 df-trg 24108 df-xms 24268 df-ms 24269 df-tms 24270 df-nm 24530 df-ngp 24531 df-nrg 24533 df-nlm 24534 df-qqh 34130

This theorem is referenced by: rrhqima 34173

W3C validator