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 34326

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 4198	. . . . . . . 8 ⊢ (NrmRing ∩ DivRing) ⊆ DivRing
2	1	sseli 3941	. . . . . . 7 ⊢ (𝑅 ∈ (NrmRing ∩ DivRing) → 𝑅 ∈ DivRing)
3	2	3ad2ant1 1149	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ DivRing)
4		simp3 1154	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (chr‘𝑅) = 0)
5		eqid 2769	. . . . . . 7 ⊢ (Base‘𝑅) = (Base‘𝑅)
6		eqid 2769	. . . . . . 7 ⊢ (/_r‘𝑅) = (/_r‘𝑅)
7		eqid 2769	. . . . . . 7 ⊢ (ℤRHom‘𝑅) = (ℤRHom‘𝑅)
8	5, 6, 7	qqhf 34321	. . . . . 6 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶(Base‘𝑅))
9	3, 4, 8	syl2anc 595	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶(Base‘𝑅))
10		simpr 489	. . . . . . 7 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → 𝑒 ∈ ℝ⁺)
11		qsscn 12984	. . . . . . . . . . . . . 14 ⊢ ℚ ⊆ ℂ
12		simpr 489	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℚ)
13	11, 12	sselid 3943	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℂ)
14		0cn 11198	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℂ
15		eqid 2769	. . . . . . . . . . . . . . . 16 ⊢ (abs ∘ − ) = (abs ∘ − )
16	15	cnmetdval 24896	. . . . . . . . . . . . . . 15 ⊢ ((0 ∈ ℂ ∧ 𝑞 ∈ ℂ) → (0(abs ∘ − )𝑞) = (abs‘(0 − 𝑞)))
17	14, 16	mpan 702	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (0(abs ∘ − )𝑞) = (abs‘(0 − 𝑞)))
18		df-neg 11444	. . . . . . . . . . . . . . . 16 ⊢ -𝑞 = (0 − 𝑞)
19	18	fveq2i 6885	. . . . . . . . . . . . . . 15 ⊢ (abs‘-𝑞) = (abs‘(0 − 𝑞))
20	19	a1i 11	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (abs‘-𝑞) = (abs‘(0 − 𝑞)))
21		absneg 15328	. . . . . . . . . . . . . 14 ⊢ (𝑞 ∈ ℂ → (abs‘-𝑞) = (abs‘𝑞))
22	17, 20, 21	3eqtr2d 2810	. . . . . . . . . . . . 13 ⊢ (𝑞 ∈ ℂ → (0(abs ∘ − )𝑞) = (abs‘𝑞))
23	13, 22	syl 18	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0(abs ∘ − )𝑞) = (abs‘𝑞))
24		zssq 12980	. . . . . . . . . . . . . . 15 ⊢ ℤ ⊆ ℚ
25		0z 12602	. . . . . . . . . . . . . . 15 ⊢ 0 ∈ ℤ
26	24, 25	sselii 3942	. . . . . . . . . . . . . 14 ⊢ 0 ∈ ℚ
27	26	a1i 11	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 0 ∈ ℚ)
28	27, 12	ovresd 7578	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (0(abs ∘ − )𝑞))
29		eqid 2769	. . . . . . . . . . . . . 14 ⊢ (norm‘𝑅) = (norm‘𝑅)
30		qqhcn.z	. . . . . . . . . . . . . 14 ⊢ 𝑍 = (ℤMod‘𝑅)
31	29, 30	qqhnm 34325	. . . . . . . . . . . . 13 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)) = (abs‘𝑞))
32	31	adantlr 727	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)) = (abs‘𝑞))
33	23, 28, 32	3eqtr4d 2814	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)))
34	9	ad2antrr 738	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (ℚHom‘𝑅):ℚ⟶(Base‘𝑅))
35	34, 27	ffvelcdmd 7081	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘0) ∈ (Base‘𝑅))
36	34, 12	ffvelcdmd 7081	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅))
37	35, 36	ovresd 7578	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) = (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)))
38		inss1 4197	. . . . . . . . . . . . . . . . 17 ⊢ (NrmRing ∩ DivRing) ⊆ NrmRing
39	38	sseli 3941	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ (NrmRing ∩ DivRing) → 𝑅 ∈ NrmRing)
40	39	3ad2ant1 1149	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ NrmRing)
41	40	ad2antrr 738	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmRing)
42		nrgngp 24788	. . . . . . . . . . . . . 14 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ NrmGrp)
43	41, 42	syl 18	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmGrp)
44		eqid 2769	. . . . . . . . . . . . . 14 ⊢ (-_g‘𝑅) = (-_g‘𝑅)
45		eqid 2769	. . . . . . . . . . . . . 14 ⊢ (dist‘𝑅) = (dist‘𝑅)
46	29, 5, 44, 45	ngpdsr 24731	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ NrmGrp ∧ ((ℚHom‘𝑅)‘0) ∈ (Base‘𝑅) ∧ ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅)) → (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0))))
47	43, 35, 36, 46	syl3anc 1396	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0))))
48	3	ad2antrr 738	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ DivRing)
49	4	ad2antrr 738	. . . . . . . . . . . . . . . 16 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (chr‘𝑅) = 0)
50	5, 6, 7	qqh0 34319	. . . . . . . . . . . . . . . 16 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → ((ℚHom‘𝑅)‘0) = (0_g‘𝑅))
51	48, 49, 50	syl2anc 595	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘0) = (0_g‘𝑅))
52	51	oveq2d 7427	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)))
53		ngpgrp 24725	. . . . . . . . . . . . . . . 16 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ Grp)
54	43, 53	syl 18	. . . . . . . . . . . . . . 15 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ Grp)
55		eqid 2769	. . . . . . . . . . . . . . . 16 ⊢ (0_g‘𝑅) = (0_g‘𝑅)
56	5, 55, 44	grpsubid1 19091	. . . . . . . . . . . . . . 15 ⊢ ((𝑅 ∈ Grp ∧ ((ℚHom‘𝑅)‘𝑞) ∈ (Base‘𝑅)) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)) = ((ℚHom‘𝑅)‘𝑞))
57	54, 36, 56	syl2anc 595	. . . . . . . . . . . . . 14 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)(0_g‘𝑅)) = ((ℚHom‘𝑅)‘𝑞))
58	52, 57	eqtrd 2804	. . . . . . . . . . . . 13 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0)) = ((ℚHom‘𝑅)‘𝑞))
59	58	fveq2d 6886	. . . . . . . . . . . 12 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘0))) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)))
60	37, 47, 59	3eqtrd 2808	. . . . . . . . . . 11 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘𝑞)))
61	33, 60	eqtr4d 2807	. . . . . . . . . 10 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)))
62	61	breq1d 5123	. . . . . . . . 9 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 ↔ (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
63	62	biimpd 232	. . . . . . . 8 ⊢ ((((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) ∧ 𝑞 ∈ ℚ) → ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
64	63	ralrimiva 3163	. . . . . . 7 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
65		breq2 5117	. . . . . . . 8 ⊢ (𝑑 = 𝑒 → ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 ↔ (0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒))
66	65	rspceaimv 3596	. . . . . . 7 ⊢ ((𝑒 ∈ ℝ⁺ ∧ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒)) → ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
67	10, 64, 66	syl2anc 595	. . . . . 6 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ 𝑒 ∈ ℝ⁺) → ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
68	67	ralrimiva 3163	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑞 ∈ ℚ ((0((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘0)((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
69		qqhcn.q	. . . . . . . 8 ⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
70		cnfldxms 24902	. . . . . . . . 9 ⊢ ℂ_fld ∈ ∞MetSp
71		qex 12985	. . . . . . . . 9 ⊢ ℚ ∈ V
72		ressxms 24651	. . . . . . . . 9 ⊢ ((ℂ_fld ∈ ∞MetSp ∧ ℚ ∈ V) → (ℂ_fld ↾_s ℚ) ∈ ∞MetSp)
73	70, 71, 72	mp2an 704	. . . . . . . 8 ⊢ (ℂ_fld ↾_s ℚ) ∈ ∞MetSp
74	69, 73	eqeltri 2865	. . . . . . 7 ⊢ 𝑄 ∈ ∞MetSp
75	69	qrngbas 27749	. . . . . . . 8 ⊢ ℚ = (Base‘𝑄)
76		cnfldds 21503	. . . . . . . . . 10 ⊢ (abs ∘ − ) = (dist‘ℂ_fld)
77	69, 76	ressds 17463	. . . . . . . . 9 ⊢ (ℚ ∈ V → (abs ∘ − ) = (dist‘𝑄))
78	71, 77	ax-mp 5	. . . . . . . 8 ⊢ (abs ∘ − ) = (dist‘𝑄)
79	75, 78	xmsxmet2 24585	. . . . . . 7 ⊢ (𝑄 ∈ ∞MetSp → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
80	74, 79	mp1i 14	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
81		ngpxms 24727	. . . . . . . . 9 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ ∞MetSp)
82	39, 42, 81	3syl 19	. . . . . . . 8 ⊢ (𝑅 ∈ (NrmRing ∩ DivRing) → 𝑅 ∈ ∞MetSp)
83	82	3ad2ant1 1149	. . . . . . 7 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ ∞MetSp)
84	5, 45	xmsxmet2 24585	. . . . . . 7 ⊢ (𝑅 ∈ ∞MetSp → ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))) ∈ (∞Met‘(Base‘𝑅)))
85	83, 84	syl 18	. . . . . 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 5975	. . . . . . . . 9 ⊢ ((abs ∘ − ) ↾ (ℚ × ℚ)) = ((dist‘𝑄) ↾ (ℚ × ℚ))
89	87, 75, 88	xmstopn 24577	. . . . . . . 8 ⊢ (𝑄 ∈ ∞MetSp → 𝐽 = (MetOpen‘((abs ∘ − ) ↾ (ℚ × ℚ))))
90	74, 89	ax-mp 5	. . . . . . 7 ⊢ 𝐽 = (MetOpen‘((abs ∘ − ) ↾ (ℚ × ℚ)))
91		eqid 2769	. . . . . . 7 ⊢ (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))) = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))))
92	90, 91	metcnp 24667	. . . . . 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 1396	. . . . 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 725	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ ((𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))‘0))
95		qqhcn.k	. . . . . . . 8 ⊢ 𝐾 = (TopOpen‘𝑅)
96		eqid 2769	. . . . . . . 8 ⊢ ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))) = ((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))
97	95, 5, 96	xmstopn 24577	. . . . . . 7 ⊢ (𝑅 ∈ ∞MetSp → 𝐾 = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))
98	83, 97	syl 18	. . . . . 6 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝐾 = (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))
99	98	oveq2d 7427	. . . . 5 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (𝐽 CnP 𝐾) = (𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅))))))
100	99	fveq1d 6884	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((𝐽 CnP 𝐾)‘0) = ((𝐽 CnP (MetOpen‘((dist‘𝑅) ↾ ((Base‘𝑅) × (Base‘𝑅)))))‘0))
101	94, 100	eleqtrrd 2872	. . 3 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ ((𝐽 CnP 𝐾)‘0))
102		cnfldtgp 24997	. . . . . 6 ⊢ ℂ_fld ∈ TopGrp
103		qsubdrg 21538	. . . . . . . 8 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) ∧ (ℂ_fld ↾_s ℚ) ∈ DivRing)
104	103	simpli 488	. . . . . . 7 ⊢ ℚ ∈ (SubRing‘ℂ_fld)
105		subrgsubg 20662	. . . . . . 7 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) → ℚ ∈ (SubGrp‘ℂ_fld))
106	104, 105	ax-mp 5	. . . . . 6 ⊢ ℚ ∈ (SubGrp‘ℂ_fld)
107	69	subgtgp 24231	. . . . . 6 ⊢ ((ℂ_fld ∈ TopGrp ∧ ℚ ∈ (SubGrp‘ℂ_fld)) → 𝑄 ∈ TopGrp)
108	102, 106, 107	mp2an 704	. . . . 5 ⊢ 𝑄 ∈ TopGrp
109		tgptmd 24205	. . . . 5 ⊢ (𝑄 ∈ TopGrp → 𝑄 ∈ TopMnd)
110	108, 109	mp1i 14	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑄 ∈ TopMnd)
111		nrgtrg 24816	. . . . 5 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ TopRing)
112		trgtmd2 24295	. . . . 5 ⊢ (𝑅 ∈ TopRing → 𝑅 ∈ TopMnd)
113	40, 111, 112	3syl 19	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → 𝑅 ∈ TopMnd)
114	5, 6, 7, 69	qqhghm 34323	. . . . 5 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
115	3, 4, 114	syl2anc 595	. . . 4 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
116	75, 87, 95	ghmcnp 24241	. . . 4 ⊢ ((𝑄 ∈ TopMnd ∧ 𝑅 ∈ TopMnd ∧ (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅)) → ((ℚHom‘𝑅) ∈ ((𝐽 CnP 𝐾)‘0) ↔ (0 ∈ ℚ ∧ (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾))))
117	110, 113, 115, 116	syl3anc 1396	. . 3 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → ((ℚHom‘𝑅) ∈ ((𝐽 CnP 𝐾)‘0) ↔ (0 ∈ ℚ ∧ (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾))))
118	101, 117	mpbid 235	. 2 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (0 ∈ ℚ ∧ (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾)))
119	118	simprd 500	1 ⊢ ((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝐽 Cn 𝐾))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 209 ∧ wa 400 ∧ w3a 1101 = wceq 1567 ∈ wcel 2149 ∀wral 3085 ∃wrex 3095 Vcvv 3463 ∩ cin 3912 class class class wbr 5113 × cxp 5660 ↾ cres 5664 ∘ ccom 5666 ⟶wf 6533 ‘cfv 6537 (class class class)co 7411 ℂcc 11098 0cc0 11100 < clt 11243 − cmin 11441 -cneg 11442 ℤcz 12591 ℚcq 12972 ℝ⁺crp 13016 abscabs 15285 Basecbs 17269 ↾_s cress 17290 distcds 17319 TopOpenctopn 17474 0_gc0g 17492 Grpcgrp 19000 -_gcsg 19002 SubGrpcsubg 19186 GrpHom cghm 19283 /_rcdvr 20482 SubRingcsubrg 20654 DivRingcdr 20813 ∞Metcxmet 21476 MetOpencmopn 21481 ℂ_fldccnfld 21491 ℤRHomczrh 21618 ℤModczlm 21619 chrcchr 21620 Cn ccn 23350 CnP ccnp 23351 TopMndctmd 24196 TopGrpctgp 24197 TopRingctrg 24282 ∞MetSpcxms 24443 normcnm 24702 NrmGrpcngp 24703 NrmRingcnrg 24705 NrmModcnlm 24706 ℚHomcqqh 34305

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1822 ax-4 1836 ax-5 1937 ax-6 1994 ax-7 2035 ax-8 2151 ax-9 2159 ax-10 2182 ax-11 2198 ax-12 2219 ax-ext 2741 ax-rep 5242 ax-sep 5261 ax-nul 5271 ax-pow 5337 ax-pr 5405 ax-un 7733 ax-cnex 11156 ax-resscn 11157 ax-1cn 11158 ax-icn 11159 ax-addcl 11160 ax-addrcl 11161 ax-mulcl 11162 ax-mulrcl 11163 ax-mulcom 11164 ax-addass 11165 ax-mulass 11166 ax-distr 11167 ax-i2m1 11168 ax-1ne0 11169 ax-1rid 11170 ax-rnegex 11171 ax-rrecex 11172 ax-cnre 11173 ax-pre-lttri 11174 ax-pre-lttrn 11175 ax-pre-ltadd 11176 ax-pre-mulgt0 11177 ax-pre-sup 11178 ax-addf 11179 ax-mulf 11180

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1102 df-3an 1103 df-tru 1570 df-fal 1580 df-ex 1807 df-nf 1811 df-sb 2098 df-mo 2573 df-eu 2603 df-clab 2748 df-cleq 2761 df-clel 2844 df-nfc 2918 df-ne 2965 df-nel 3071 df-ral 3086 df-rex 3096 df-rmo 3376 df-reu 3377 df-rab 3424 df-v 3465 df-sbc 3754 df-csb 3862 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3933 df-nul 4295 df-if 4493 df-pw 4569 df-sn 4595 df-pr 4597 df-tp 4599 df-op 4601 df-uni 4877 df-int 4917 df-iun 4962 df-iin 4963 df-br 5114 df-opab 5178 df-mpt 5197 df-tr 5223 df-id 5557 df-eprel 5562 df-po 5570 df-so 5571 df-fr 5615 df-se 5616 df-we 5617 df-xp 5668 df-rel 5669 df-cnv 5670 df-co 5671 df-dm 5672 df-rn 5673 df-res 5674 df-ima 5675 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-isom 6546 df-riota 7368 df-ov 7414 df-oprab 7415 df-mpo 7416 df-of 7675 df-om 7863 df-1st 7986 df-2nd 7987 df-supp 8157 df-tpos 8222 df-frecs 8278 df-wrecs 8309 df-recs 8358 df-rdg 8397 df-1o 8453 df-2o 8454 df-er 8694 df-map 8826 df-ixp 8896 df-en 8944 df-dom 8945 df-sdom 8946 df-fin 8947 df-fsupp 9322 df-fi 9371 df-sup 9402 df-inf 9403 df-oi 9472 df-card 9925 df-pnf 11245 df-mnf 11246 df-xr 11247 df-ltxr 11248 df-le 11249 df-sub 11443 df-neg 11444 df-div 11872 df-nn 12234 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 12505 df-z 12592 df-dec 12712 df-uz 12863 df-q 12973 df-rp 13017 df-xneg 13137 df-xadd 13138 df-xmul 13139 df-ico 13378 df-icc 13379 df-fz 13536 df-fzo 13683 df-fl 13825 df-mod 13903 df-seq 14038 df-exp 14098 df-hash 14367 df-cj 15150 df-re 15151 df-im 15152 df-sqrt 15286 df-abs 15287 df-dvds 16311 df-gcd 16553 df-numer 16794 df-denom 16795 df-gz 16990 df-struct 17207 df-sets 17224 df-slot 17242 df-ndx 17254 df-base 17270 df-ress 17291 df-plusg 17323 df-mulr 17324 df-starv 17325 df-sca 17326 df-vsca 17327 df-ip 17328 df-tset 17329 df-ple 17330 df-ds 17332 df-unif 17333 df-hom 17334 df-cco 17335 df-rest 17475 df-topn 17476 df-0g 17494 df-gsum 17495 df-topgen 17496 df-pt 17497 df-prds 17500 df-xrs 17556 df-qtop 17561 df-imas 17562 df-xps 17564 df-mre 17638 df-mrc 17639 df-acs 17641 df-plusf 18697 df-mgm 18698 df-sgrp 18777 df-mnd 18793 df-mhm 18841 df-submnd 18842 df-grp 19003 df-minusg 19004 df-sbg 19005 df-mulg 19134 df-subg 19189 df-ghm 19284 df-cntz 19387 df-od 19598 df-cmn 19852 df-abl 19853 df-mgp 20217 df-rng 20231 df-ur 20264 df-ring 20317 df-cring 20318 df-oppr 20419 df-dvdsr 20439 df-unit 20440 df-invr 20470 df-dvr 20483 df-rhm 20554 df-nzr 20596 df-subrng 20631 df-subrg 20655 df-drng 20815 df-abv 20890 df-lmod 20961 df-scaf 20962 df-sra 21272 df-rgmod 21273 df-psmet 21483 df-xmet 21484 df-met 21485 df-bl 21486 df-mopn 21487 df-cnfld 21492 df-zring 21566 df-zrh 21622 df-zlm 21623 df-chr 21624 df-top 23020 df-topon 23037 df-topsp 23059 df-bases 23072 df-cn 23353 df-cnp 23354 df-tx 23688 df-hmeo 23881 df-tmd 24198 df-tgp 24199 df-trg 24286 df-xms 24446 df-ms 24447 df-tms 24448 df-nm 24708 df-ngp 24709 df-nrg 24711 df-nlm 24712 df-qqh 34306

This theorem is referenced by: rrhqima 34349

W3C validator