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 33982

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 2729	. . . . 5 ⊢ (/_r‘𝑅) = (/_r‘𝑅)
5		eqid 2729	. . . . 5 ⊢ (ℤRHom‘𝑅) = (ℤRHom‘𝑅)
6	3, 4, 5	qqhf 33976	. . . 4 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶𝐵)
7	1, 2, 6	syl2anc 584	. . 3 ⊢ (𝜑 → (ℚHom‘𝑅):ℚ⟶𝐵)
8		simpr 484	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → 𝑒 ∈ ℝ⁺)
9		qqhucn.1	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ NrmRing)
10		nrgngp 24550	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ NrmGrp)
11	9, 10	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ NrmGrp)
12	11	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmGrp)
13	7	ffvelcdmda 7056	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵)
14	13	adantr 480	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵)
15	7	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → (ℚHom‘𝑅):ℚ⟶𝐵)
16	15	ffvelcdmda 7056	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑞) ∈ 𝐵)
17		eqid 2729	. . . . . . . . . . . . . 14 ⊢ (norm‘𝑅) = (norm‘𝑅)
18		eqid 2729	. . . . . . . . . . . . . 14 ⊢ (-_g‘𝑅) = (-_g‘𝑅)
19		eqid 2729	. . . . . . . . . . . . . 14 ⊢ (dist‘𝑅) = (dist‘𝑅)
20	17, 3, 18, 19	ngpdsr 24493	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ NrmGrp ∧ ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵 ∧ ((ℚHom‘𝑅)‘𝑞) ∈ 𝐵) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))))
21	12, 14, 16, 20	syl3anc 1373	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))))
22		simpr 484	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℚ)
23		simplr 768	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑝 ∈ ℚ)
24		qsubdrg 21336	. . . . . . . . . . . . . . . . . . 19 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) ∧ (ℂ_fld ↾_s ℚ) ∈ DivRing)
25	24	simpli 483	. . . . . . . . . . . . . . . . . 18 ⊢ ℚ ∈ (SubRing‘ℂ_fld)
26		subrgsubg 20486	. . . . . . . . . . . . . . . . . 18 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) → ℚ ∈ (SubGrp‘ℂ_fld))
27	25, 26	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ ℚ ∈ (SubGrp‘ℂ_fld)
28		cnfldsub 21309	. . . . . . . . . . . . . . . . . 18 ⊢ − = (-_g‘ℂ_fld)
29		qqhucn.q	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
30		eqid 2729	. . . . . . . . . . . . . . . . . 18 ⊢ (-_g‘𝑄) = (-_g‘𝑄)
31	28, 29, 30	subgsub 19070	. . . . . . . . . . . . . . . . 17 ⊢ ((ℚ ∈ (SubGrp‘ℂ_fld) ∧ 𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
32	27, 31	mp3an1 1450	. . . . . . . . . . . . . . . 16 ⊢ ((𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
33	22, 23, 32	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
34	33	fveq2d 6862	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞 − 𝑝)) = ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)))
35	3, 4, 5, 29	qqhghm 33978	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
36	1, 2, 35	syl2anc 584	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
37	36	ad2antrr 726	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
38	29	qrngbas 27530	. . . . . . . . . . . . . . . 16 ⊢ ℚ = (Base‘𝑄)
39	38, 30, 18	ghmsub 19156	. . . . . . . . . . . . . . 15 ⊢ (((ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅) ∧ 𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)))
40	37, 22, 23, 39	syl3anc 1373	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)))
41	34, 40	eqtr2d 2765	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)) = ((ℚHom‘𝑅)‘(𝑞 − 𝑝)))
42	41	fveq2d 6862	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))))
43	9, 1	elind 4163	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ (NrmRing ∩ DivRing))
44	43	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ (NrmRing ∩ DivRing))
45		qqhucn.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑍 ∈ NrmMod)
46	45	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑍 ∈ NrmMod)
47	2	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (chr‘𝑅) = 0)
48		qsubcl 12927	. . . . . . . . . . . . . 14 ⊢ ((𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) ∈ ℚ)
49	22, 23, 48	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑞 − 𝑝) ∈ ℚ)
50		qqhucn.z	. . . . . . . . . . . . . 14 ⊢ 𝑍 = (ℤMod‘𝑅)
51	17, 50	qqhnm 33980	. . . . . . . . . . . . 13 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ (𝑞 − 𝑝) ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))) = (abs‘(𝑞 − 𝑝)))
52	44, 46, 47, 49, 51	syl31anc 1375	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))) = (abs‘(𝑞 − 𝑝)))
53	21, 42, 52	3eqtrd 2768	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = (abs‘(𝑞 − 𝑝)))
54	14, 16	ovresd 7556	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) = (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)))
55		qsscn 12919	. . . . . . . . . . . . . 14 ⊢ ℚ ⊆ ℂ
56	55, 23	sselid 3944	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑝 ∈ ℂ)
57	55, 22	sselid 3944	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℂ)
58		eqid 2729	. . . . . . . . . . . . . 14 ⊢ (abs ∘ − ) = (abs ∘ − )
59	58	cnmetdval 24658	. . . . . . . . . . . . 13 ⊢ ((𝑝 ∈ ℂ ∧ 𝑞 ∈ ℂ) → (𝑝(abs ∘ − )𝑞) = (abs‘(𝑝 − 𝑞)))
60	56, 57, 59	syl2anc 584	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝(abs ∘ − )𝑞) = (abs‘(𝑝 − 𝑞)))
61	23, 22	ovresd 7556	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (𝑝(abs ∘ − )𝑞))
62	57, 56	abssubd 15422	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (abs‘(𝑞 − 𝑝)) = (abs‘(𝑝 − 𝑞)))
63	60, 61, 62	3eqtr4d 2774	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (abs‘(𝑞 − 𝑝)))
64	53, 54, 63	3eqtr4rd 2775	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)))
65	64	breq1d 5117	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 ↔ (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
66	65	biimpd 229	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
67	66	ralrimiva 3125	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
68	67	ralrimiva 3125	. . . . . 6 ⊢ (𝜑 → ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
69	68	adantr 480	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
70		breq2 5111	. . . . . . . 8 ⊢ (𝑑 = 𝑒 → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 ↔ (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒))
71	70	imbi1d 341	. . . . . . 7 ⊢ (𝑑 = 𝑒 → (((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒) ↔ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)))
72	71	2ralbidv 3201	. . . . . 6 ⊢ (𝑑 = 𝑒 → (∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒) ↔ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)))
73	72	rspcev 3588	. . . . 5 ⊢ ((𝑒 ∈ ℝ⁺ ∧ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)) → ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
74	8, 69, 73	syl2anc 584	. . . 4 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
75	74	ralrimiva 3125	. . 3 ⊢ (𝜑 → ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
76		eqid 2729	. . . 4 ⊢ (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
77		qqhucn.v	. . . 4 ⊢ 𝑉 = (metUnif‘((dist‘𝑅) ↾ (𝐵 × 𝐵)))
78		0z 12540	. . . . . 6 ⊢ 0 ∈ ℤ
79		zq 12913	. . . . . 6 ⊢ (0 ∈ ℤ → 0 ∈ ℚ)
80		ne0i 4304	. . . . . 6 ⊢ (0 ∈ ℚ → ℚ ≠ ∅)
81	78, 79, 80	mp2b 10	. . . . 5 ⊢ ℚ ≠ ∅
82	81	a1i 11	. . . 4 ⊢ (𝜑 → ℚ ≠ ∅)
83		drngring 20645	. . . . 5 ⊢ (𝑅 ∈ DivRing → 𝑅 ∈ Ring)
84		eqid 2729	. . . . . 6 ⊢ (1_r‘𝑅) = (1_r‘𝑅)
85	3, 84	ringidcl 20174	. . . . 5 ⊢ (𝑅 ∈ Ring → (1_r‘𝑅) ∈ 𝐵)
86		ne0i 4304	. . . . 5 ⊢ ((1_r‘𝑅) ∈ 𝐵 → 𝐵 ≠ ∅)
87	1, 83, 85, 86	4syl 19	. . . 4 ⊢ (𝜑 → 𝐵 ≠ ∅)
88		cnfldxms 24664	. . . . . . . 8 ⊢ ℂ_fld ∈ ∞MetSp
89		qex 12920	. . . . . . . 8 ⊢ ℚ ∈ V
90		ressxms 24413	. . . . . . . 8 ⊢ ((ℂ_fld ∈ ∞MetSp ∧ ℚ ∈ V) → (ℂ_fld ↾_s ℚ) ∈ ∞MetSp)
91	88, 89, 90	mp2an 692	. . . . . . 7 ⊢ (ℂ_fld ↾_s ℚ) ∈ ∞MetSp
92	29, 91	eqeltri 2824	. . . . . 6 ⊢ 𝑄 ∈ ∞MetSp
93		cnfldds 21276	. . . . . . . . 9 ⊢ (abs ∘ − ) = (dist‘ℂ_fld)
94	29, 93	ressds 17373	. . . . . . . 8 ⊢ (ℚ ∈ V → (abs ∘ − ) = (dist‘𝑄))
95	89, 94	ax-mp 5	. . . . . . 7 ⊢ (abs ∘ − ) = (dist‘𝑄)
96	38, 95	xmsxmet2 24347	. . . . . 6 ⊢ (𝑄 ∈ ∞MetSp → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
97	92, 96	mp1i 13	. . . . 5 ⊢ (𝜑 → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
98		xmetpsmet 24236	. . . . 5 ⊢ (((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ) → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (PsMet‘ℚ))
99	97, 98	syl 17	. . . 4 ⊢ (𝜑 → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (PsMet‘ℚ))
100		ngpxms 24489	. . . . . 6 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ ∞MetSp)
101	3, 19	xmsxmet2 24347	. . . . . 6 ⊢ (𝑅 ∈ ∞MetSp → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵))
102	9, 10, 100, 101	4syl 19	. . . . 5 ⊢ (𝜑 → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵))
103		xmetpsmet 24236	. . . . 5 ⊢ (((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵) → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (PsMet‘𝐵))
104	102, 103	syl 17	. . . 4 ⊢ (𝜑 → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (PsMet‘𝐵))
105	76, 77, 82, 87, 99, 104	metucn 24459	. . 3 ⊢ (𝜑 → ((ℚHom‘𝑅) ∈ ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉) ↔ ((ℚHom‘𝑅):ℚ⟶𝐵 ∧ ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))))
106	7, 75, 105	mpbir2and 713	. 2 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉))
107		qqhucn.u	. . . . . 6 ⊢ 𝑈 = (UnifSt‘𝑄)
108	29	fveq2i 6861	. . . . . 6 ⊢ (UnifSt‘𝑄) = (UnifSt‘(ℂ_fld ↾_s ℚ))
109		ressuss 24150	. . . . . . 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 2756	. . . . 5 ⊢ 𝑈 = ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ))
112		eqid 2729	. . . . . . 7 ⊢ (UnifSt‘ℂ_fld) = (UnifSt‘ℂ_fld)
113	112	cnflduss 25256	. . . . . 6 ⊢ (UnifSt‘ℂ_fld) = (metUnif‘(abs ∘ − ))
114	113	oveq1i 7397	. . . . 5 ⊢ ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ)) = ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ))
115		cnxmet 24660	. . . . . . 7 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
116		xmetpsmet 24236	. . . . . . 7 ⊢ ((abs ∘ − ) ∈ (∞Met‘ℂ) → (abs ∘ − ) ∈ (PsMet‘ℂ))
117	115, 116	ax-mp 5	. . . . . 6 ⊢ (abs ∘ − ) ∈ (PsMet‘ℂ)
118		restmetu 24458	. . . . . 6 ⊢ ((ℚ ≠ ∅ ∧ (abs ∘ − ) ∈ (PsMet‘ℂ) ∧ ℚ ⊆ ℂ) → ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ)) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))))
119	81, 117, 55, 118	mp3an 1463	. . . . 5 ⊢ ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ)) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
120	111, 114, 119	3eqtri 2756	. . . 4 ⊢ 𝑈 = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
121	120	a1i 11	. . 3 ⊢ (𝜑 → 𝑈 = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))))
122	121	oveq1d 7402	. 2 ⊢ (𝜑 → (𝑈 Cn_u𝑉) = ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉))
123	106, 122	eleqtrrd 2831	1 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ (𝑈 Cn_u𝑉))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 395 = wceq 1540 ∈ wcel 2109 ≠ wne 2925 ∀wral 3044 ∃wrex 3053 Vcvv 3447 ∩ cin 3913 ⊆ wss 3914 ∅c0 4296 class class class wbr 5107 × cxp 5636 ↾ cres 5640 ∘ ccom 5642 ⟶wf 6507 ‘cfv 6511 (class class class)co 7387 ℂcc 11066 0cc0 11068 < clt 11208 − cmin 11405 ℤcz 12529 ℚcq 12907 ℝ⁺crp 12951 abscabs 15200 Basecbs 17179 ↾_s cress 17200 distcds 17229 ↾_t crest 17383 -_gcsg 18867 SubGrpcsubg 19052 GrpHom cghm 19144 1_rcur 20090 Ringcrg 20142 /_rcdvr 20309 SubRingcsubrg 20478 DivRingcdr 20638 PsMetcpsmet 21248 ∞Metcxmet 21249 metUnifcmetu 21255 ℂ_fldccnfld 21264 ℤRHomczrh 21409 ℤModczlm 21410 chrcchr 21411 UnifStcuss 24141 Cn_ucucn 24162 ∞MetSpcxms 24205 normcnm 24464 NrmGrpcngp 24465 NrmRingcnrg 24467 NrmModcnlm 24468 ℚHomcqqh 33960

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 2008 ax-8 2111 ax-9 2119 ax-10 2142 ax-11 2158 ax-12 2178 ax-ext 2701 ax-rep 5234 ax-sep 5251 ax-nul 5261 ax-pow 5320 ax-pr 5387 ax-un 7711 ax-cnex 11124 ax-resscn 11125 ax-1cn 11126 ax-icn 11127 ax-addcl 11128 ax-addrcl 11129 ax-mulcl 11130 ax-mulrcl 11131 ax-mulcom 11132 ax-addass 11133 ax-mulass 11134 ax-distr 11135 ax-i2m1 11136 ax-1ne0 11137 ax-1rid 11138 ax-rnegex 11139 ax-rrecex 11140 ax-cnre 11141 ax-pre-lttri 11142 ax-pre-lttrn 11143 ax-pre-ltadd 11144 ax-pre-mulgt0 11145 ax-pre-sup 11146 ax-addf 11147 ax-mulf 11148

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 2066 df-mo 2533 df-eu 2562 df-clab 2708 df-cleq 2721 df-clel 2803 df-nfc 2878 df-ne 2926 df-nel 3030 df-ral 3045 df-rex 3054 df-rmo 3354 df-reu 3355 df-rab 3406 df-v 3449 df-sbc 3754 df-csb 3863 df-dif 3917 df-un 3919 df-in 3921 df-ss 3931 df-pss 3934 df-nul 4297 df-if 4489 df-pw 4565 df-sn 4590 df-pr 4592 df-tp 4594 df-op 4596 df-uni 4872 df-iun 4957 df-br 5108 df-opab 5170 df-mpt 5189 df-tr 5215 df-id 5533 df-eprel 5538 df-po 5546 df-so 5547 df-fr 5591 df-we 5593 df-xp 5644 df-rel 5645 df-cnv 5646 df-co 5647 df-dm 5648 df-rn 5649 df-res 5650 df-ima 5651 df-pred 6274 df-ord 6335 df-on 6336 df-lim 6337 df-suc 6338 df-iota 6464 df-fun 6513 df-fn 6514 df-f 6515 df-f1 6516 df-fo 6517 df-f1o 6518 df-fv 6519 df-riota 7344 df-ov 7390 df-oprab 7391 df-mpo 7392 df-om 7843 df-1st 7968 df-2nd 7969 df-tpos 8205 df-frecs 8260 df-wrecs 8291 df-recs 8340 df-rdg 8378 df-1o 8434 df-er 8671 df-map 8801 df-en 8919 df-dom 8920 df-sdom 8921 df-fin 8922 df-sup 9393 df-inf 9394 df-pnf 11210 df-mnf 11211 df-xr 11212 df-ltxr 11213 df-le 11214 df-sub 11407 df-neg 11408 df-div 11836 df-nn 12187 df-2 12249 df-3 12250 df-4 12251 df-5 12252 df-6 12253 df-7 12254 df-8 12255 df-9 12256 df-n0 12443 df-z 12530 df-dec 12650 df-uz 12794 df-q 12908 df-rp 12952 df-xneg 13072 df-xadd 13073 df-xmul 13074 df-ico 13312 df-fz 13469 df-fzo 13616 df-fl 13754 df-mod 13832 df-seq 13967 df-exp 14027 df-cj 15065 df-re 15066 df-im 15067 df-sqrt 15201 df-abs 15202 df-dvds 16223 df-gcd 16465 df-numer 16705 df-denom 16706 df-gz 16901 df-struct 17117 df-sets 17134 df-slot 17152 df-ndx 17164 df-base 17180 df-ress 17201 df-plusg 17233 df-mulr 17234 df-starv 17235 df-sca 17236 df-vsca 17237 df-ip 17238 df-tset 17239 df-ple 17240 df-ds 17242 df-unif 17243 df-rest 17385 df-topn 17386 df-0g 17404 df-topgen 17406 df-mgm 18567 df-sgrp 18646 df-mnd 18662 df-mhm 18710 df-grp 18868 df-minusg 18869 df-sbg 18870 df-mulg 19000 df-subg 19055 df-ghm 19145 df-od 19458 df-cmn 19712 df-abl 19713 df-mgp 20050 df-rng 20062 df-ur 20091 df-ring 20144 df-cring 20145 df-oppr 20246 df-dvdsr 20266 df-unit 20267 df-invr 20297 df-dvr 20310 df-rhm 20381 df-nzr 20422 df-subrng 20455 df-subrg 20479 df-drng 20640 df-abv 20718 df-lmod 20768 df-psmet 21256 df-xmet 21257 df-met 21258 df-bl 21259 df-mopn 21260 df-fbas 21261 df-fg 21262 df-metu 21263 df-cnfld 21265 df-zring 21357 df-zrh 21413 df-zlm 21414 df-chr 21415 df-top 22781 df-topon 22798 df-topsp 22820 df-bases 22833 df-fil 23733 df-ust 24088 df-uss 24144 df-ucn 24163 df-xms 24208 df-ms 24209 df-nm 24470 df-ngp 24471 df-nrg 24473 df-nlm 24474 df-qqh 33961

This theorem is referenced by: rrhcn 33987

W3C validator