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 34022

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 4213	. . . . . . . 8 ⊢ (NrmRing ∩ DivRing) ⊆ DivRing
2	1	sseli 3954	. . . . . . 7 ⊢ (𝑅 ∈ (NrmRing ∩ DivRing) → 𝑅 ∈ DivRing)
3	2	3ad2ant1 1133	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ DivRing)
4		simp3 1138	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (chr‘𝑅) = 0)
5		eqid 2735	. . . . . . 7 ⊢ (Base‘𝑅) = (Base‘𝑅)
6		eqid 2735	. . . . . . 7 ⊢ (/_r‘𝑅) = (/_r‘𝑅)
7		eqid 2735	. . . . . . 7 ⊢ (ℤRHom‘𝑅) = (ℤRHom‘𝑅)
8	5, 6, 7	qqhf 34017	. . . . . 6 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶(Base‘𝑅))
9	3, 4, 8	syl2anc 584	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶(Base‘𝑅))
10		simpr 484	. . . . . . 7 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → 𝑒 ∈ ℝ⁺)
11		qsscn 12976	. . . . . . . . . . . . . 14 ⊢ ℚ ⊆ ℂ
12		simpr 484	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℚ)
13	11, 12	sselid 3956	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℂ)
14		0cn 11227	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℂ
15		eqid 2735	. . . . . . . . . . . . . . . 16 ⊢ (abs ∘ − ) = (abs ∘ − )
16	15	cnmetdval 24709	. . . . . . . . . . . . . . 15 ⊢ ((0 ∈ ℂ ∧ 𝑞 ∈ ℂ) → (0(abs ∘ − )𝑞) = (abs‘(0 − 𝑞)))
17	14, 16	mpan 690	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (0(abs ∘ − )𝑞) = (abs‘(0 − 𝑞)))
18		df-neg 11469	. . . . . . . . . . . . . . . 16 ⊢ -𝑞 = (0 − 𝑞)
19	18	fveq2i 6879	. . . . . . . . . . . . . . 15 ⊢ (abs‘-𝑞) = (abs‘(0 − 𝑞))
20	19	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (abs‘-𝑞) = (abs‘(0 − 𝑞)))
21		absneg 15296	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (abs‘-𝑞) = (abs‘𝑞))
22	17, 20, 21	3eqtr2d 2776	. . . . . . . . . . . . 13 ⊢ (𝑞 ∈ ℂ → (0(abs ∘ − )𝑞) = (abs‘𝑞))
23	13, 22	syl 17	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0(abs ∘ − )𝑞) = (abs‘𝑞))
24		zssq 12972	. . . . . . . . . . . . . . 15 ⊢ ℤ ⊆ ℚ
25		0z 12599	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℤ
26	24, 25	sselii 3955	. . . . . . . . . . . . . 14 ⊢ 0 ∈ ℚ
27	26	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 0 ∈ ℚ)
28	27, 12	ovresd 7574	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (0(abs ∘ − )𝑞))
29		eqid 2735	. . . . . . . . . . . . . 14 ⊢ (norm‘𝑅) = (norm‘𝑅)
30		qqhcn.z	. . . . . . . . . . . . . 14 ⊢ 𝑍 = (ℤMod‘𝑅)
31	29, 30	qqhnm 34021	. . . . . . . . . . . . 13 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)) = (abs‘𝑞))
32	31	adantlr 715	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)) = (abs‘𝑞))
33	23, 28, 32	3eqtr4d 2780	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)))
34	9	ad2antrr 726	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (ℚHom‘𝑅):ℚ⟶(Base‘𝑅))
35	34, 27	ffvelcdmd 7075	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘0) ∈ (Base‘𝑅))
36	34, 12	ffvelcdmd 7075	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅))
37	35, 36	ovresd 7574	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) = (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)))
38		inss1 4212	. . . . . . . . . . . . . . . . 17 ⊢ (NrmRing ∩ DivRing) ⊆ NrmRing
39	38	sseli 3954	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ (NrmRing ∩ DivRing) → 𝑅 ∈ NrmRing)
40	39	3ad2ant1 1133	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ NrmRing)
41	40	ad2antrr 726	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmRing)
42		nrgngp 24601	. . . . . . . . . . . . . 14 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ NrmGrp)
43	41, 42	syl 17	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmGrp)
44		eqid 2735	. . . . . . . . . . . . . 14 ⊢ (-_g‘𝑅) = (-_g‘𝑅)
45		eqid 2735	. . . . . . . . . . . . . 14 ⊢ (dist‘𝑅) = (dist‘𝑅)
46	29, 5, 44, 45	ngpdsr 24544	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ NrmGrp ∧ ((ℚHom‘𝑅)‘0) ∈ (Base‘𝑅) ∧ ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅)) → (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0))))
47	43, 35, 36, 46	syl3anc 1373	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0))))
48	3	ad2antrr 726	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ DivRing)
49	4	ad2antrr 726	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (chr‘𝑅) = 0)
50	5, 6, 7	qqh0 34015	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → ((ℚHom‘𝑅)‘0) = (0_g‘𝑅))
51	48, 49, 50	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘0) = (0_g‘𝑅))
52	51	oveq2d 7421	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)))
53		ngpgrp 24538	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ Grp)
54	43, 53	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ Grp)
55		eqid 2735	. . . . . . . . . . . . . . . 16 ⊢ (0_g‘𝑅) = (0_g‘𝑅)
56	5, 55, 44	grpsubid1 19008	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ Grp ∧ ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅)) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)) = ((ℚHom‘𝑅)‘𝑞))
57	54, 36, 56	syl2anc 584	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)) = ((ℚHom‘𝑅)‘𝑞))
58	52, 57	eqtrd 2770	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0)) = ((ℚHom‘𝑅)‘𝑞))
59	58	fveq2d 6880	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0))) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)))
60	37, 47, 59	3eqtrd 2774	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)))
61	33, 60	eqtr4d 2773	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)))
62	61	breq1d 5129	. . . . . . . . 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 3132	. . . . . . 7 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
65		breq2 5123	. . . . . . . 8 ⊢ (𝑑 = 𝑒 → ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 ↔ (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒))
66	65	rspceaimv 3607	. . . . . . 7 ⊢ ((𝑒 ∈ ℝ⁺ ∧ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒)) → ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
67	10, 64, 66	syl2anc 584	. . . . . 6 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
68	67	ralrimiva 3132	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
69		qqhcn.q	. . . . . . . 8 ⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
70		cnfldxms 24715	. . . . . . . . 9 ⊢ ℂ_fld ∈ ∞MetSp
71		qex 12977	. . . . . . . . 9 ⊢ ℚ ∈ V
72		ressxms 24464	. . . . . . . . 9 ⊢ ((ℂ_fld ∈ ∞MetSp ∧ ℚ ∈ V) → (ℂ_fld ↾_s ℚ) ∈ ∞MetSp)
73	70, 71, 72	mp2an 692	. . . . . . . 8 ⊢ (ℂ_fld ↾_s ℚ) ∈ ∞MetSp
74	69, 73	eqeltri 2830	. . . . . . 7 ⊢ 𝑄 ∈ ∞MetSp
75	69	qrngbas 27582	. . . . . . . 8 ⊢ ℚ = (Base‘𝑄)
76		cnfldds 21327	. . . . . . . . . 10 ⊢ (abs ∘ − ) = (dist‘ℂ_fld)
77	69, 76	ressds 17424	. . . . . . . . 9 ⊢ (ℚ ∈ V → (abs ∘ − ) = (dist‘𝑄))
78	71, 77	ax-mp 5	. . . . . . . 8 ⊢ (abs ∘ − ) = (dist‘𝑄)
79	75, 78	xmsxmet2 24398	. . . . . . 7 ⊢ (𝑄 ∈ ∞MetSp → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
80	74, 79	mp1i 13	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
81		ngpxms 24540	. . . . . . . . 9 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ ∞MetSp)
82	39, 42, 81	3syl 18	. . . . . . . 8 ⊢ (𝑅 ∈ (NrmRing ∩ DivRing) → 𝑅 ∈ ∞MetSp)
83	82	3ad2ant1 1133	. . . . . . 7 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ ∞MetSp)
84	5, 45	xmsxmet2 24398	. . . . . . 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 5962	. . . . . . . . 9 ⊢ ((abs ∘ − ) ↾ (ℚ × ℚ)) = ((dist‘𝑄) ↾ (ℚ × ℚ))
89	87, 75, 88	xmstopn 24390	. . . . . . . 8 ⊢ (𝑄 ∈ ∞MetSp → 𝐽 = (MetOpen‘((abs ∘ − ) ↾ (ℚ × ℚ))))
90	74, 89	ax-mp 5	. . . . . . 7 ⊢ 𝐽 = (MetOpen‘((abs ∘ − ) ↾ (ℚ × ℚ)))
91		eqid 2735	. . . . . . 7 ⊢ (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))) = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))))
92	90, 91	metcnp 24480	. . . . . 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 1373	. . . . 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 713	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ ((𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))‘0))
95		qqhcn.k	. . . . . . . 8 ⊢ 𝐾 = (TopOpen‘𝑅)
96		eqid 2735	. . . . . . . 8 ⊢ ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))) = ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))
97	95, 5, 96	xmstopn 24390	. . . . . . 7 ⊢ (𝑅 ∈ ∞MetSp → 𝐾 = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))
98	83, 97	syl 17	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝐾 = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))
99	98	oveq2d 7421	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (𝐽 CnP 𝐾) = (𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))))))
100	99	fveq1d 6878	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((𝐽 CnP 𝐾)‘0) = ((𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))‘0))
101	94, 100	eleqtrrd 2837	. . 3 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ ((𝐽 CnP 𝐾)‘0))
102		cnfldtgp 24811	. . . . . 6 ⊢ ℂ_fld ∈ TopGrp
103		qsubdrg 21387	. . . . . . . 8 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) ∧ (ℂ_fld ↾_s ℚ) ∈ DivRing)
104	103	simpli 483	. . . . . . 7 ⊢ ℚ ∈ (SubRing‘ℂ_fld)
105		subrgsubg 20537	. . . . . . 7 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) → ℚ ∈ (SubGrp‘ℂ_fld))
106	104, 105	ax-mp 5	. . . . . 6 ⊢ ℚ ∈ (SubGrp‘ℂ_fld)
107	69	subgtgp 24043	. . . . . 6 ⊢ ((ℂ_fld ∈ TopGrp ∧ ℚ ∈ (SubGrp‘ℂ_fld)) → 𝑄 ∈ TopGrp)
108	102, 106, 107	mp2an 692	. . . . 5 ⊢ 𝑄 ∈ TopGrp
109		tgptmd 24017	. . . . 5 ⊢ (𝑄 ∈ TopGrp → 𝑄 ∈ TopMnd)
110	108, 109	mp1i 13	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑄 ∈ TopMnd)
111		nrgtrg 24629	. . . . 5 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ TopRing)
112		trgtmd2 24107	. . . . 5 ⊢ (𝑅 ∈ TopRing → 𝑅 ∈ TopMnd)
113	40, 111, 112	3syl 18	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ TopMnd)
114	5, 6, 7, 69	qqhghm 34019	. . . . 5 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
115	3, 4, 114	syl2anc 584	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
116	75, 87, 95	ghmcnp 24053	. . . 4 ⊢ ((𝑄 ∈ TopMnd ∧ 𝑅 ∈ TopMnd ∧ (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅)) → ((ℚHom‘𝑅) ∈ ((𝐽 CnP 𝐾)‘0) ↔ (0 ∈ ℚ ∧ (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾))))
117	110, 113, 115, 116	syl3anc 1373	. . 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 1086 = wceq 1540 ∈ wcel 2108 ∀wral 3051 ∃wrex 3060 Vcvv 3459 ∩ cin 3925 class class class wbr 5119 × cxp 5652 ↾ cres 5656 ∘ ccom 5658 ⟶wf 6527 ‘cfv 6531 (class class class)co 7405 ℂcc 11127 0cc0 11129 < clt 11269 − cmin 11466 -cneg 11467 ℤcz 12588 ℚcq 12964 ℝ⁺crp 13008 abscabs 15253 Basecbs 17228 ↾_s cress 17251 distcds 17280 TopOpenctopn 17435 0_gc0g 17453 Grpcgrp 18916 -_gcsg 18918 SubGrpcsubg 19103 GrpHom cghm 19195 /_rcdvr 20360 SubRingcsubrg 20529 DivRingcdr 20689 ∞Metcxmet 21300 MetOpencmopn 21305 ℂ_fldccnfld 21315 ℤRHomczrh 21460 ℤModczlm 21461 chrcchr 21462 Cn ccn 23162 CnP ccnp 23163 TopMndctmd 24008 TopGrpctgp 24009 TopRingctrg 24094 ∞MetSpcxms 24256 normcnm 24515 NrmGrpcngp 24516 NrmRingcnrg 24518 NrmModcnlm 24519 ℚHomcqqh 34001

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2157 ax-12 2177 ax-ext 2707 ax-rep 5249 ax-sep 5266 ax-nul 5276 ax-pow 5335 ax-pr 5402 ax-un 7729 ax-cnex 11185 ax-resscn 11186 ax-1cn 11187 ax-icn 11188 ax-addcl 11189 ax-addrcl 11190 ax-mulcl 11191 ax-mulrcl 11192 ax-mulcom 11193 ax-addass 11194 ax-mulass 11195 ax-distr 11196 ax-i2m1 11197 ax-1ne0 11198 ax-1rid 11199 ax-rnegex 11200 ax-rrecex 11201 ax-cnre 11202 ax-pre-lttri 11203 ax-pre-lttrn 11204 ax-pre-ltadd 11205 ax-pre-mulgt0 11206 ax-pre-sup 11207 ax-addf 11208 ax-mulf 11209

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2065 df-mo 2539 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2809 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3061 df-rmo 3359 df-reu 3360 df-rab 3416 df-v 3461 df-sbc 3766 df-csb 3875 df-dif 3929 df-un 3931 df-in 3933 df-ss 3943 df-pss 3946 df-nul 4309 df-if 4501 df-pw 4577 df-sn 4602 df-pr 4604 df-tp 4606 df-op 4608 df-uni 4884 df-int 4923 df-iun 4969 df-iin 4970 df-br 5120 df-opab 5182 df-mpt 5202 df-tr 5230 df-id 5548 df-eprel 5553 df-po 5561 df-so 5562 df-fr 5606 df-se 5607 df-we 5608 df-xp 5660 df-rel 5661 df-cnv 5662 df-co 5663 df-dm 5664 df-rn 5665 df-res 5666 df-ima 5667 df-pred 6290 df-ord 6355 df-on 6356 df-lim 6357 df-suc 6358 df-iota 6484 df-fun 6533 df-fn 6534 df-f 6535 df-f1 6536 df-fo 6537 df-f1o 6538 df-fv 6539 df-isom 6540 df-riota 7362 df-ov 7408 df-oprab 7409 df-mpo 7410 df-of 7671 df-om 7862 df-1st 7988 df-2nd 7989 df-supp 8160 df-tpos 8225 df-frecs 8280 df-wrecs 8311 df-recs 8385 df-rdg 8424 df-1o 8480 df-2o 8481 df-er 8719 df-map 8842 df-ixp 8912 df-en 8960 df-dom 8961 df-sdom 8962 df-fin 8963 df-fsupp 9374 df-fi 9423 df-sup 9454 df-inf 9455 df-oi 9524 df-card 9953 df-pnf 11271 df-mnf 11272 df-xr 11273 df-ltxr 11274 df-le 11275 df-sub 11468 df-neg 11469 df-div 11895 df-nn 12241 df-2 12303 df-3 12304 df-4 12305 df-5 12306 df-6 12307 df-7 12308 df-8 12309 df-9 12310 df-n0 12502 df-z 12589 df-dec 12709 df-uz 12853 df-q 12965 df-rp 13009 df-xneg 13128 df-xadd 13129 df-xmul 13130 df-ico 13368 df-icc 13369 df-fz 13525 df-fzo 13672 df-fl 13809 df-mod 13887 df-seq 14020 df-exp 14080 df-hash 14349 df-cj 15118 df-re 15119 df-im 15120 df-sqrt 15254 df-abs 15255 df-dvds 16273 df-gcd 16514 df-numer 16754 df-denom 16755 df-gz 16950 df-struct 17166 df-sets 17183 df-slot 17201 df-ndx 17213 df-base 17229 df-ress 17252 df-plusg 17284 df-mulr 17285 df-starv 17286 df-sca 17287 df-vsca 17288 df-ip 17289 df-tset 17290 df-ple 17291 df-ds 17293 df-unif 17294 df-hom 17295 df-cco 17296 df-rest 17436 df-topn 17437 df-0g 17455 df-gsum 17456 df-topgen 17457 df-pt 17458 df-prds 17461 df-xrs 17516 df-qtop 17521 df-imas 17522 df-xps 17524 df-mre 17598 df-mrc 17599 df-acs 17601 df-plusf 18617 df-mgm 18618 df-sgrp 18697 df-mnd 18713 df-mhm 18761 df-submnd 18762 df-grp 18919 df-minusg 18920 df-sbg 18921 df-mulg 19051 df-subg 19106 df-ghm 19196 df-cntz 19300 df-od 19509 df-cmn 19763 df-abl 19764 df-mgp 20101 df-rng 20113 df-ur 20142 df-ring 20195 df-cring 20196 df-oppr 20297 df-dvdsr 20317 df-unit 20318 df-invr 20348 df-dvr 20361 df-rhm 20432 df-nzr 20473 df-subrng 20506 df-subrg 20530 df-drng 20691 df-abv 20769 df-lmod 20819 df-scaf 20820 df-sra 21131 df-rgmod 21132 df-psmet 21307 df-xmet 21308 df-met 21309 df-bl 21310 df-mopn 21311 df-cnfld 21316 df-zring 21408 df-zrh 21464 df-zlm 21465 df-chr 21466 df-top 22832 df-topon 22849 df-topsp 22871 df-bases 22884 df-cn 23165 df-cnp 23166 df-tx 23500 df-hmeo 23693 df-tmd 24010 df-tgp 24011 df-trg 24098 df-xms 24259 df-ms 24260 df-tms 24261 df-nm 24521 df-ngp 24522 df-nrg 24524 df-nlm 24525 df-qqh 34002

This theorem is referenced by: rrhqima 34045

W3C validator