qqhucn - Mathbox for Thierry Arnoux

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

Theorem qqhucn 34169

Description: The ℚHom homomorphism is uniformly continuous. (Contributed by Thierry Arnoux, 28-Jan-2018.)

**Hypotheses**
Ref	Expression
qqhucn.b	⊢ 𝐵 = (Base‘𝑅)
qqhucn.q	⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
qqhucn.u	⊢ 𝑈 = (UnifSt‘𝑄)
qqhucn.v	⊢ 𝑉 = (metUnif‘((dist‘𝑅) ↾ (𝐵 × 𝐵)))
qqhucn.z	⊢ 𝑍 = (ℤMod‘𝑅)
qqhucn.1	⊢ (𝜑 → 𝑅 ∈ NrmRing)
qqhucn.2	⊢ (𝜑 → 𝑅 ∈ DivRing)
qqhucn.3	⊢ (𝜑 → 𝑍 ∈ NrmMod)
qqhucn.4	⊢ (𝜑 → (chr‘𝑅) = 0)

**Assertion**
Ref	Expression
qqhucn	⊢ (𝜑 → (ℚHom‘𝑅) ∈ (𝑈 Cn_u𝑉))

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

Step	Hyp	Ref	Expression
1		qqhucn.2	. . . 4 ⊢ (𝜑 → 𝑅 ∈ DivRing)
2		qqhucn.4	. . . 4 ⊢ (𝜑 → (chr‘𝑅) = 0)
3		qqhucn.b	. . . . 5 ⊢ 𝐵 = (Base‘𝑅)
4		eqid 2737	. . . . 5 ⊢ (/_r‘𝑅) = (/_r‘𝑅)
5		eqid 2737	. . . . 5 ⊢ (ℤRHom‘𝑅) = (ℤRHom‘𝑅)
6	3, 4, 5	qqhf 34163	. . . 4 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶𝐵)
7	1, 2, 6	syl2anc 585	. . 3 ⊢ (𝜑 → (ℚHom‘𝑅):ℚ⟶𝐵)
8		simpr 484	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → 𝑒 ∈ ℝ⁺)
9		qqhucn.1	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ NrmRing)
10		nrgngp 24618	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ NrmGrp)
11	9, 10	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ NrmGrp)
12	11	ad2antrr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmGrp)
13	7	ffvelcdmda 7038	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵)
14	13	adantr 480	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵)
15	7	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → (ℚHom‘𝑅):ℚ⟶𝐵)
16	15	ffvelcdmda 7038	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑞) ∈ 𝐵)
17		eqid 2737	. . . . . . . . . . . . . 14 ⊢ (norm‘𝑅) = (norm‘𝑅)
18		eqid 2737	. . . . . . . . . . . . . 14 ⊢ (-_g‘𝑅) = (-_g‘𝑅)
19		eqid 2737	. . . . . . . . . . . . . 14 ⊢ (dist‘𝑅) = (dist‘𝑅)
20	17, 3, 18, 19	ngpdsr 24561	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ NrmGrp ∧ ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵 ∧ ((ℚHom‘𝑅)‘𝑞) ∈ 𝐵) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))))
21	12, 14, 16, 20	syl3anc 1374	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))))
22		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℚ)
23		simplr 769	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑝 ∈ ℚ)
24		qsubdrg 21386	. . . . . . . . . . . . . . . . . . 19 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) ∧ (ℂ_fld ↾_s ℚ) ∈ DivRing)
25	24	simpli 483	. . . . . . . . . . . . . . . . . 18 ⊢ ℚ ∈ (SubRing‘ℂ_fld)
26		subrgsubg 20522	. . . . . . . . . . . . . . . . . 18 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) → ℚ ∈ (SubGrp‘ℂ_fld))
27	25, 26	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ ℚ ∈ (SubGrp‘ℂ_fld)
28		cnfldsub 21364	. . . . . . . . . . . . . . . . . 18 ⊢ − = (-_g‘ℂ_fld)
29		qqhucn.q	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
30		eqid 2737	. . . . . . . . . . . . . . . . . 18 ⊢ (-_g‘𝑄) = (-_g‘𝑄)
31	28, 29, 30	subgsub 19080	. . . . . . . . . . . . . . . . 17 ⊢ ((ℚ ∈ (SubGrp‘ℂ_fld) ∧ 𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
32	27, 31	mp3an1 1451	. . . . . . . . . . . . . . . 16 ⊢ ((𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
33	22, 23, 32	syl2anc 585	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
34	33	fveq2d 6846	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞 − 𝑝)) = ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)))
35	3, 4, 5, 29	qqhghm 34165	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
36	1, 2, 35	syl2anc 585	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
37	36	ad2antrr 727	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
38	29	qrngbas 27598	. . . . . . . . . . . . . . . 16 ⊢ ℚ = (Base‘𝑄)
39	38, 30, 18	ghmsub 19165	. . . . . . . . . . . . . . 15 ⊢ (((ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅) ∧ 𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)))
40	37, 22, 23, 39	syl3anc 1374	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)))
41	34, 40	eqtr2d 2773	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)) = ((ℚHom‘𝑅)‘(𝑞 − 𝑝)))
42	41	fveq2d 6846	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))))
43	9, 1	elind 4154	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ (NrmRing ∩ DivRing))
44	43	ad2antrr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ (NrmRing ∩ DivRing))
45		qqhucn.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑍 ∈ NrmMod)
46	45	ad2antrr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑍 ∈ NrmMod)
47	2	ad2antrr 727	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (chr‘𝑅) = 0)
48		qsubcl 12893	. . . . . . . . . . . . . 14 ⊢ ((𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) ∈ ℚ)
49	22, 23, 48	syl2anc 585	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑞 − 𝑝) ∈ ℚ)
50		qqhucn.z	. . . . . . . . . . . . . 14 ⊢ 𝑍 = (ℤMod‘𝑅)
51	17, 50	qqhnm 34167	. . . . . . . . . . . . 13 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ (𝑞 − 𝑝) ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))) = (abs‘(𝑞 − 𝑝)))
52	44, 46, 47, 49, 51	syl31anc 1376	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))) = (abs‘(𝑞 − 𝑝)))
53	21, 42, 52	3eqtrd 2776	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = (abs‘(𝑞 − 𝑝)))
54	14, 16	ovresd 7535	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) = (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)))
55		qsscn 12885	. . . . . . . . . . . . . 14 ⊢ ℚ ⊆ ℂ
56	55, 23	sselid 3933	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑝 ∈ ℂ)
57	55, 22	sselid 3933	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℂ)
58		eqid 2737	. . . . . . . . . . . . . 14 ⊢ (abs ∘ − ) = (abs ∘ − )
59	58	cnmetdval 24726	. . . . . . . . . . . . 13 ⊢ ((𝑝 ∈ ℂ ∧ 𝑞 ∈ ℂ) → (𝑝(abs ∘ − )𝑞) = (abs‘(𝑝 − 𝑞)))
60	56, 57, 59	syl2anc 585	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝(abs ∘ − )𝑞) = (abs‘(𝑝 − 𝑞)))
61	23, 22	ovresd 7535	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (𝑝(abs ∘ − )𝑞))
62	57, 56	abssubd 15391	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (abs‘(𝑞 − 𝑝)) = (abs‘(𝑝 − 𝑞)))
63	60, 61, 62	3eqtr4d 2782	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (abs‘(𝑞 − 𝑝)))
64	53, 54, 63	3eqtr4rd 2783	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)))
65	64	breq1d 5110	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 ↔ (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
66	65	biimpd 229	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
67	66	ralrimiva 3130	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
68	67	ralrimiva 3130	. . . . . 6 ⊢ (𝜑 → ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
69	68	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
70		breq2 5104	. . . . . . . 8 ⊢ (𝑑 = 𝑒 → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 ↔ (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒))
71	70	imbi1d 341	. . . . . . 7 ⊢ (𝑑 = 𝑒 → (((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒) ↔ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)))
72	71	2ralbidv 3202	. . . . . 6 ⊢ (𝑑 = 𝑒 → (∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒) ↔ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)))
73	72	rspcev 3578	. . . . 5 ⊢ ((𝑒 ∈ ℝ⁺ ∧ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)) → ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
74	8, 69, 73	syl2anc 585	. . . 4 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
75	74	ralrimiva 3130	. . 3 ⊢ (𝜑 → ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
76		eqid 2737	. . . 4 ⊢ (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
77		qqhucn.v	. . . 4 ⊢ 𝑉 = (metUnif‘((dist‘𝑅) ↾ (𝐵 × 𝐵)))
78		0z 12511	. . . . . 6 ⊢ 0 ∈ ℤ
79		zq 12879	. . . . . 6 ⊢ (0 ∈ ℤ → 0 ∈ ℚ)
80		ne0i 4295	. . . . . 6 ⊢ (0 ∈ ℚ → ℚ ≠ ∅)
81	78, 79, 80	mp2b 10	. . . . 5 ⊢ ℚ ≠ ∅
82	81	a1i 11	. . . 4 ⊢ (𝜑 → ℚ ≠ ∅)
83		drngring 20681	. . . . 5 ⊢ (𝑅 ∈ DivRing → 𝑅 ∈ Ring)
84		eqid 2737	. . . . . 6 ⊢ (1_r‘𝑅) = (1_r‘𝑅)
85	3, 84	ringidcl 20212	. . . . 5 ⊢ (𝑅 ∈ Ring → (1_r‘𝑅) ∈ 𝐵)
86		ne0i 4295	. . . . 5 ⊢ ((1_r‘𝑅) ∈ 𝐵 → 𝐵 ≠ ∅)
87	1, 83, 85, 86	4syl 19	. . . 4 ⊢ (𝜑 → 𝐵 ≠ ∅)
88		cnfldxms 24732	. . . . . . . 8 ⊢ ℂ_fld ∈ ∞MetSp
89		qex 12886	. . . . . . . 8 ⊢ ℚ ∈ V
90		ressxms 24481	. . . . . . . 8 ⊢ ((ℂ_fld ∈ ∞MetSp ∧ ℚ ∈ V) → (ℂ_fld ↾_s ℚ) ∈ ∞MetSp)
91	88, 89, 90	mp2an 693	. . . . . . 7 ⊢ (ℂ_fld ↾_s ℚ) ∈ ∞MetSp
92	29, 91	eqeltri 2833	. . . . . 6 ⊢ 𝑄 ∈ ∞MetSp
93		cnfldds 21333	. . . . . . . . 9 ⊢ (abs ∘ − ) = (dist‘ℂ_fld)
94	29, 93	ressds 17342	. . . . . . . 8 ⊢ (ℚ ∈ V → (abs ∘ − ) = (dist‘𝑄))
95	89, 94	ax-mp 5	. . . . . . 7 ⊢ (abs ∘ − ) = (dist‘𝑄)
96	38, 95	xmsxmet2 24415	. . . . . 6 ⊢ (𝑄 ∈ ∞MetSp → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
97	92, 96	mp1i 13	. . . . 5 ⊢ (𝜑 → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
98		xmetpsmet 24304	. . . . 5 ⊢ (((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ) → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (PsMet‘ℚ))
99	97, 98	syl 17	. . . 4 ⊢ (𝜑 → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (PsMet‘ℚ))
100		ngpxms 24557	. . . . . 6 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ ∞MetSp)
101	3, 19	xmsxmet2 24415	. . . . . 6 ⊢ (𝑅 ∈ ∞MetSp → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵))
102	9, 10, 100, 101	4syl 19	. . . . 5 ⊢ (𝜑 → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵))
103		xmetpsmet 24304	. . . . 5 ⊢ (((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵) → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (PsMet‘𝐵))
104	102, 103	syl 17	. . . 4 ⊢ (𝜑 → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (PsMet‘𝐵))
105	76, 77, 82, 87, 99, 104	metucn 24527	. . 3 ⊢ (𝜑 → ((ℚHom‘𝑅) ∈ ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉) ↔ ((ℚHom‘𝑅):ℚ⟶𝐵 ∧ ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))))
106	7, 75, 105	mpbir2and 714	. 2 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉))
107		qqhucn.u	. . . . . 6 ⊢ 𝑈 = (UnifSt‘𝑄)
108	29	fveq2i 6845	. . . . . 6 ⊢ (UnifSt‘𝑄) = (UnifSt‘(ℂ_fld ↾_s ℚ))
109		ressuss 24218	. . . . . . 7 ⊢ (ℚ ∈ V → (UnifSt‘(ℂ_fld ↾_s ℚ)) = ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ)))
110	89, 109	ax-mp 5	. . . . . 6 ⊢ (UnifSt‘(ℂ_fld ↾_s ℚ)) = ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ))
111	107, 108, 110	3eqtri 2764	. . . . 5 ⊢ 𝑈 = ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ))
112		eqid 2737	. . . . . . 7 ⊢ (UnifSt‘ℂ_fld) = (UnifSt‘ℂ_fld)
113	112	cnflduss 25324	. . . . . 6 ⊢ (UnifSt‘ℂ_fld) = (metUnif‘(abs ∘ − ))
114	113	oveq1i 7378	. . . . 5 ⊢ ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ)) = ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ))
115		cnxmet 24728	. . . . . . 7 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
116		xmetpsmet 24304	. . . . . . 7 ⊢ ((abs ∘ − ) ∈ (∞Met‘ℂ) → (abs ∘ − ) ∈ (PsMet‘ℂ))
117	115, 116	ax-mp 5	. . . . . 6 ⊢ (abs ∘ − ) ∈ (PsMet‘ℂ)
118		restmetu 24526	. . . . . 6 ⊢ ((ℚ ≠ ∅ ∧ (abs ∘ − ) ∈ (PsMet‘ℂ) ∧ ℚ ⊆ ℂ) → ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ)) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))))
119	81, 117, 55, 118	mp3an 1464	. . . . 5 ⊢ ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ)) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
120	111, 114, 119	3eqtri 2764	. . . 4 ⊢ 𝑈 = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
121	120	a1i 11	. . 3 ⊢ (𝜑 → 𝑈 = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))))
122	121	oveq1d 7383	. 2 ⊢ (𝜑 → (𝑈 Cn_u𝑉) = ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉))
123	106, 122	eleqtrrd 2840	1 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ (𝑈 Cn_u𝑉))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1542 ∈ wcel 2114 ≠ wne 2933 ∀wral 3052 ∃wrex 3062 Vcvv 3442 ∩ cin 3902 ⊆ wss 3903 ∅c0 4287 class class class wbr 5100 × cxp 5630 ↾ cres 5634 ∘ ccom 5636 ⟶wf 6496 ‘cfv 6500 (class class class)co 7368 ℂcc 11036 0cc0 11038 < clt 11178 − cmin 11376 ℤcz 12500 ℚcq 12873 ℝ⁺crp 12917 abscabs 15169 Basecbs 17148 ↾_s cress 17169 distcds 17198 ↾_t crest 17352 -_gcsg 18877 SubGrpcsubg 19062 GrpHom cghm 19153 1_rcur 20128 Ringcrg 20180 /_rcdvr 20348 SubRingcsubrg 20514 DivRingcdr 20674 PsMetcpsmet 21305 ∞Metcxmet 21306 metUnifcmetu 21312 ℂ_fldccnfld 21321 ℤRHomczrh 21466 ℤModczlm 21467 chrcchr 21468 UnifStcuss 24209 Cn_ucucn 24230 ∞MetSpcxms 24273 normcnm 24532 NrmGrpcngp 24533 NrmRingcnrg 24535 NrmModcnlm 24536 ℚHomcqqh 34147

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 5243 ax-nul 5253 ax-pow 5312 ax-pr 5379 ax-un 7690 ax-cnex 11094 ax-resscn 11095 ax-1cn 11096 ax-icn 11097 ax-addcl 11098 ax-addrcl 11099 ax-mulcl 11100 ax-mulrcl 11101 ax-mulcom 11102 ax-addass 11103 ax-mulass 11104 ax-distr 11105 ax-i2m1 11106 ax-1ne0 11107 ax-1rid 11108 ax-rnegex 11109 ax-rrecex 11110 ax-cnre 11111 ax-pre-lttri 11112 ax-pre-lttrn 11113 ax-pre-ltadd 11114 ax-pre-mulgt0 11115 ax-pre-sup 11116 ax-addf 11117 ax-mulf 11118

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-iun 4950 df-br 5101 df-opab 5163 df-mpt 5182 df-tr 5208 df-id 5527 df-eprel 5532 df-po 5540 df-so 5541 df-fr 5585 df-we 5587 df-xp 5638 df-rel 5639 df-cnv 5640 df-co 5641 df-dm 5642 df-rn 5643 df-res 5644 df-ima 5645 df-pred 6267 df-ord 6328 df-on 6329 df-lim 6330 df-suc 6331 df-iota 6456 df-fun 6502 df-fn 6503 df-f 6504 df-f1 6505 df-fo 6506 df-f1o 6507 df-fv 6508 df-riota 7325 df-ov 7371 df-oprab 7372 df-mpo 7373 df-om 7819 df-1st 7943 df-2nd 7944 df-tpos 8178 df-frecs 8233 df-wrecs 8264 df-recs 8313 df-rdg 8351 df-1o 8407 df-er 8645 df-map 8777 df-en 8896 df-dom 8897 df-sdom 8898 df-fin 8899 df-sup 9357 df-inf 9358 df-pnf 11180 df-mnf 11181 df-xr 11182 df-ltxr 11183 df-le 11184 df-sub 11378 df-neg 11379 df-div 11807 df-nn 12158 df-2 12220 df-3 12221 df-4 12222 df-5 12223 df-6 12224 df-7 12225 df-8 12226 df-9 12227 df-n0 12414 df-z 12501 df-dec 12620 df-uz 12764 df-q 12874 df-rp 12918 df-xneg 13038 df-xadd 13039 df-xmul 13040 df-ico 13279 df-fz 13436 df-fzo 13583 df-fl 13724 df-mod 13802 df-seq 13937 df-exp 13997 df-cj 15034 df-re 15035 df-im 15036 df-sqrt 15170 df-abs 15171 df-dvds 16192 df-gcd 16434 df-numer 16674 df-denom 16675 df-gz 16870 df-struct 17086 df-sets 17103 df-slot 17121 df-ndx 17133 df-base 17149 df-ress 17170 df-plusg 17202 df-mulr 17203 df-starv 17204 df-sca 17205 df-vsca 17206 df-ip 17207 df-tset 17208 df-ple 17209 df-ds 17211 df-unif 17212 df-rest 17354 df-topn 17355 df-0g 17373 df-topgen 17375 df-mgm 18577 df-sgrp 18656 df-mnd 18672 df-mhm 18720 df-grp 18878 df-minusg 18879 df-sbg 18880 df-mulg 19010 df-subg 19065 df-ghm 19154 df-od 19469 df-cmn 19723 df-abl 19724 df-mgp 20088 df-rng 20100 df-ur 20129 df-ring 20182 df-cring 20183 df-oppr 20285 df-dvdsr 20305 df-unit 20306 df-invr 20336 df-dvr 20349 df-rhm 20420 df-nzr 20458 df-subrng 20491 df-subrg 20515 df-drng 20676 df-abv 20754 df-lmod 20825 df-psmet 21313 df-xmet 21314 df-met 21315 df-bl 21316 df-mopn 21317 df-fbas 21318 df-fg 21319 df-metu 21320 df-cnfld 21322 df-zring 21414 df-zrh 21470 df-zlm 21471 df-chr 21472 df-top 22850 df-topon 22867 df-topsp 22889 df-bases 22902 df-fil 23802 df-ust 24157 df-uss 24212 df-ucn 24231 df-xms 24276 df-ms 24277 df-nm 24538 df-ngp 24539 df-nrg 24541 df-nlm 24542 df-qqh 34148

This theorem is referenced by: rrhcn 34174

W3C validator