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 31942

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 2738	. . . . 5 ⊢ (/_r‘𝑅) = (/_r‘𝑅)
5		eqid 2738	. . . . 5 ⊢ (ℤRHom‘𝑅) = (ℤRHom‘𝑅)
6	3, 4, 5	qqhf 31936	. . . 4 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶𝐵)
7	1, 2, 6	syl2anc 584	. . 3 ⊢ (𝜑 → (ℚHom‘𝑅):ℚ⟶𝐵)
8		simpr 485	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → 𝑒 ∈ ℝ⁺)
9		qqhucn.1	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ NrmRing)
10		nrgngp 23826	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ NrmGrp)
11	9, 10	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ NrmGrp)
12	11	ad2antrr 723	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmGrp)
13	7	ffvelrnda 6961	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵)
14	13	adantr 481	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵)
15	7	adantr 481	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → (ℚHom‘𝑅):ℚ⟶𝐵)
16	15	ffvelrnda 6961	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑞) ∈ 𝐵)
17		eqid 2738	. . . . . . . . . . . . . 14 ⊢ (norm‘𝑅) = (norm‘𝑅)
18		eqid 2738	. . . . . . . . . . . . . 14 ⊢ (-_g‘𝑅) = (-_g‘𝑅)
19		eqid 2738	. . . . . . . . . . . . . 14 ⊢ (dist‘𝑅) = (dist‘𝑅)
20	17, 3, 18, 19	ngpdsr 23761	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ NrmGrp ∧ ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵 ∧ ((ℚHom‘𝑅)‘𝑞) ∈ 𝐵) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))))
21	12, 14, 16, 20	syl3anc 1370	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))))
22		simpr 485	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℚ)
23		simplr 766	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑝 ∈ ℚ)
24		qsubdrg 20650	. . . . . . . . . . . . . . . . . . 19 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) ∧ (ℂ_fld ↾_s ℚ) ∈ DivRing)
25	24	simpli 484	. . . . . . . . . . . . . . . . . 18 ⊢ ℚ ∈ (SubRing‘ℂ_fld)
26		subrgsubg 20030	. . . . . . . . . . . . . . . . . 18 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) → ℚ ∈ (SubGrp‘ℂ_fld))
27	25, 26	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ ℚ ∈ (SubGrp‘ℂ_fld)
28		cnfldsub 20626	. . . . . . . . . . . . . . . . . 18 ⊢ − = (-_g‘ℂ_fld)
29		qqhucn.q	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
30		eqid 2738	. . . . . . . . . . . . . . . . . 18 ⊢ (-_g‘𝑄) = (-_g‘𝑄)
31	28, 29, 30	subgsub 18767	. . . . . . . . . . . . . . . . 17 ⊢ ((ℚ ∈ (SubGrp‘ℂ_fld) ∧ 𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
32	27, 31	mp3an1 1447	. . . . . . . . . . . . . . . 16 ⊢ ((𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
33	22, 23, 32	syl2anc 584	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
34	33	fveq2d 6778	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞 − 𝑝)) = ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)))
35	3, 4, 5, 29	qqhghm 31938	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
36	1, 2, 35	syl2anc 584	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
37	36	ad2antrr 723	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
38	29	qrngbas 26767	. . . . . . . . . . . . . . . 16 ⊢ ℚ = (Base‘𝑄)
39	38, 30, 18	ghmsub 18842	. . . . . . . . . . . . . . 15 ⊢ (((ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅) ∧ 𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)))
40	37, 22, 23, 39	syl3anc 1370	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)))
41	34, 40	eqtr2d 2779	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)) = ((ℚHom‘𝑅)‘(𝑞 − 𝑝)))
42	41	fveq2d 6778	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))))
43	9, 1	elind 4128	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ (NrmRing ∩ DivRing))
44	43	ad2antrr 723	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ (NrmRing ∩ DivRing))
45		qqhucn.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑍 ∈ NrmMod)
46	45	ad2antrr 723	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑍 ∈ NrmMod)
47	2	ad2antrr 723	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (chr‘𝑅) = 0)
48		qsubcl 12708	. . . . . . . . . . . . . 14 ⊢ ((𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) ∈ ℚ)
49	22, 23, 48	syl2anc 584	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑞 − 𝑝) ∈ ℚ)
50		qqhucn.z	. . . . . . . . . . . . . 14 ⊢ 𝑍 = (ℤMod‘𝑅)
51	17, 50	qqhnm 31940	. . . . . . . . . . . . 13 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ (𝑞 − 𝑝) ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))) = (abs‘(𝑞 − 𝑝)))
52	44, 46, 47, 49, 51	syl31anc 1372	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))) = (abs‘(𝑞 − 𝑝)))
53	21, 42, 52	3eqtrd 2782	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = (abs‘(𝑞 − 𝑝)))
54	14, 16	ovresd 7439	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) = (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)))
55		qsscn 12700	. . . . . . . . . . . . . 14 ⊢ ℚ ⊆ ℂ
56	55, 23	sselid 3919	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑝 ∈ ℂ)
57	55, 22	sselid 3919	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℂ)
58		eqid 2738	. . . . . . . . . . . . . 14 ⊢ (abs ∘ − ) = (abs ∘ − )
59	58	cnmetdval 23934	. . . . . . . . . . . . 13 ⊢ ((𝑝 ∈ ℂ ∧ 𝑞 ∈ ℂ) → (𝑝(abs ∘ − )𝑞) = (abs‘(𝑝 − 𝑞)))
60	56, 57, 59	syl2anc 584	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝(abs ∘ − )𝑞) = (abs‘(𝑝 − 𝑞)))
61	23, 22	ovresd 7439	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (𝑝(abs ∘ − )𝑞))
62	57, 56	abssubd 15165	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (abs‘(𝑞 − 𝑝)) = (abs‘(𝑝 − 𝑞)))
63	60, 61, 62	3eqtr4d 2788	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (abs‘(𝑞 − 𝑝)))
64	53, 54, 63	3eqtr4rd 2789	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)))
65	64	breq1d 5084	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 ↔ (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
66	65	biimpd 228	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
67	66	ralrimiva 3103	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
68	67	ralrimiva 3103	. . . . . 6 ⊢ (𝜑 → ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
69	68	adantr 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
70		breq2 5078	. . . . . . . 8 ⊢ (𝑑 = 𝑒 → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 ↔ (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒))
71	70	imbi1d 342	. . . . . . 7 ⊢ (𝑑 = 𝑒 → (((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒) ↔ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)))
72	71	2ralbidv 3129	. . . . . 6 ⊢ (𝑑 = 𝑒 → (∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒) ↔ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)))
73	72	rspcev 3561	. . . . 5 ⊢ ((𝑒 ∈ ℝ⁺ ∧ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)) → ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
74	8, 69, 73	syl2anc 584	. . . 4 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
75	74	ralrimiva 3103	. . 3 ⊢ (𝜑 → ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
76		eqid 2738	. . . 4 ⊢ (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
77		qqhucn.v	. . . 4 ⊢ 𝑉 = (metUnif‘((dist‘𝑅) ↾ (𝐵 × 𝐵)))
78		0z 12330	. . . . . 6 ⊢ 0 ∈ ℤ
79		zq 12694	. . . . . 6 ⊢ (0 ∈ ℤ → 0 ∈ ℚ)
80		ne0i 4268	. . . . . 6 ⊢ (0 ∈ ℚ → ℚ ≠ ∅)
81	78, 79, 80	mp2b 10	. . . . 5 ⊢ ℚ ≠ ∅
82	81	a1i 11	. . . 4 ⊢ (𝜑 → ℚ ≠ ∅)
83		drngring 19998	. . . . 5 ⊢ (𝑅 ∈ DivRing → 𝑅 ∈ Ring)
84		eqid 2738	. . . . . 6 ⊢ (1_r‘𝑅) = (1_r‘𝑅)
85	3, 84	ringidcl 19807	. . . . 5 ⊢ (𝑅 ∈ Ring → (1_r‘𝑅) ∈ 𝐵)
86		ne0i 4268	. . . . 5 ⊢ ((1_r‘𝑅) ∈ 𝐵 → 𝐵 ≠ ∅)
87	1, 83, 85, 86	4syl 19	. . . 4 ⊢ (𝜑 → 𝐵 ≠ ∅)
88		cnfldxms 23940	. . . . . . . 8 ⊢ ℂ_fld ∈ ∞MetSp
89		qex 12701	. . . . . . . 8 ⊢ ℚ ∈ V
90		ressxms 23681	. . . . . . . 8 ⊢ ((ℂ_fld ∈ ∞MetSp ∧ ℚ ∈ V) → (ℂ_fld ↾_s ℚ) ∈ ∞MetSp)
91	88, 89, 90	mp2an 689	. . . . . . 7 ⊢ (ℂ_fld ↾_s ℚ) ∈ ∞MetSp
92	29, 91	eqeltri 2835	. . . . . 6 ⊢ 𝑄 ∈ ∞MetSp
93		cnfldds 20607	. . . . . . . . 9 ⊢ (abs ∘ − ) = (dist‘ℂ_fld)
94	29, 93	ressds 17120	. . . . . . . 8 ⊢ (ℚ ∈ V → (abs ∘ − ) = (dist‘𝑄))
95	89, 94	ax-mp 5	. . . . . . 7 ⊢ (abs ∘ − ) = (dist‘𝑄)
96	38, 95	xmsxmet2 23612	. . . . . 6 ⊢ (𝑄 ∈ ∞MetSp → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
97	92, 96	mp1i 13	. . . . 5 ⊢ (𝜑 → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
98		xmetpsmet 23501	. . . . 5 ⊢ (((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ) → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (PsMet‘ℚ))
99	97, 98	syl 17	. . . 4 ⊢ (𝜑 → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (PsMet‘ℚ))
100		ngpxms 23757	. . . . . 6 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ ∞MetSp)
101	3, 19	xmsxmet2 23612	. . . . . 6 ⊢ (𝑅 ∈ ∞MetSp → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵))
102	9, 10, 100, 101	4syl 19	. . . . 5 ⊢ (𝜑 → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵))
103		xmetpsmet 23501	. . . . 5 ⊢ (((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵) → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (PsMet‘𝐵))
104	102, 103	syl 17	. . . 4 ⊢ (𝜑 → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (PsMet‘𝐵))
105	76, 77, 82, 87, 99, 104	metucn 23727	. . 3 ⊢ (𝜑 → ((ℚHom‘𝑅) ∈ ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉) ↔ ((ℚHom‘𝑅):ℚ⟶𝐵 ∧ ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))))
106	7, 75, 105	mpbir2and 710	. 2 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉))
107		qqhucn.u	. . . . . 6 ⊢ 𝑈 = (UnifSt‘𝑄)
108	29	fveq2i 6777	. . . . . 6 ⊢ (UnifSt‘𝑄) = (UnifSt‘(ℂ_fld ↾_s ℚ))
109		ressuss 23414	. . . . . . 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 2770	. . . . 5 ⊢ 𝑈 = ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ))
112		eqid 2738	. . . . . . 7 ⊢ (UnifSt‘ℂ_fld) = (UnifSt‘ℂ_fld)
113	112	cnflduss 24520	. . . . . 6 ⊢ (UnifSt‘ℂ_fld) = (metUnif‘(abs ∘ − ))
114	113	oveq1i 7285	. . . . 5 ⊢ ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ)) = ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ))
115		cnxmet 23936	. . . . . . 7 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
116		xmetpsmet 23501	. . . . . . 7 ⊢ ((abs ∘ − ) ∈ (∞Met‘ℂ) → (abs ∘ − ) ∈ (PsMet‘ℂ))
117	115, 116	ax-mp 5	. . . . . 6 ⊢ (abs ∘ − ) ∈ (PsMet‘ℂ)
118		restmetu 23726	. . . . . 6 ⊢ ((ℚ ≠ ∅ ∧ (abs ∘ − ) ∈ (PsMet‘ℂ) ∧ ℚ ⊆ ℂ) → ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ)) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))))
119	81, 117, 55, 118	mp3an 1460	. . . . 5 ⊢ ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ)) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
120	111, 114, 119	3eqtri 2770	. . . 4 ⊢ 𝑈 = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
121	120	a1i 11	. . 3 ⊢ (𝜑 → 𝑈 = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))))
122	121	oveq1d 7290	. 2 ⊢ (𝜑 → (𝑈 Cn_u𝑉) = ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉))
123	106, 122	eleqtrrd 2842	1 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ (𝑈 Cn_u𝑉))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 396 = wceq 1539 ∈ wcel 2106 ≠ wne 2943 ∀wral 3064 ∃wrex 3065 Vcvv 3432 ∩ cin 3886 ⊆ wss 3887 ∅c0 4256 class class class wbr 5074 × cxp 5587 ↾ cres 5591 ∘ ccom 5593 ⟶wf 6429 ‘cfv 6433 (class class class)co 7275 ℂcc 10869 0cc0 10871 < clt 11009 − cmin 11205 ℤcz 12319 ℚcq 12688 ℝ⁺crp 12730 abscabs 14945 Basecbs 16912 ↾_s cress 16941 distcds 16971 ↾_t crest 17131 -_gcsg 18579 SubGrpcsubg 18749 GrpHom cghm 18831 1_rcur 19737 Ringcrg 19783 /_rcdvr 19924 DivRingcdr 19991 SubRingcsubrg 20020 PsMetcpsmet 20581 ∞Metcxmet 20582 metUnifcmetu 20588 ℂ_fldccnfld 20597 ℤRHomczrh 20701 ℤModczlm 20702 chrcchr 20703 UnifStcuss 23405 Cn_ucucn 23427 ∞MetSpcxms 23470 normcnm 23732 NrmGrpcngp 23733 NrmRingcnrg 23735 NrmModcnlm 23736 ℚHomcqqh 31922

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1913 ax-6 1971 ax-7 2011 ax-8 2108 ax-9 2116 ax-10 2137 ax-11 2154 ax-12 2171 ax-ext 2709 ax-rep 5209 ax-sep 5223 ax-nul 5230 ax-pow 5288 ax-pr 5352 ax-un 7588 ax-cnex 10927 ax-resscn 10928 ax-1cn 10929 ax-icn 10930 ax-addcl 10931 ax-addrcl 10932 ax-mulcl 10933 ax-mulrcl 10934 ax-mulcom 10935 ax-addass 10936 ax-mulass 10937 ax-distr 10938 ax-i2m1 10939 ax-1ne0 10940 ax-1rid 10941 ax-rnegex 10942 ax-rrecex 10943 ax-cnre 10944 ax-pre-lttri 10945 ax-pre-lttrn 10946 ax-pre-ltadd 10947 ax-pre-mulgt0 10948 ax-pre-sup 10949 ax-addf 10950 ax-mulf 10951

This theorem depends on definitions: df-bi 206 df-an 397 df-or 845 df-3or 1087 df-3an 1088 df-tru 1542 df-fal 1552 df-ex 1783 df-nf 1787 df-sb 2068 df-mo 2540 df-eu 2569 df-clab 2716 df-cleq 2730 df-clel 2816 df-nfc 2889 df-ne 2944 df-nel 3050 df-ral 3069 df-rex 3070 df-rmo 3071 df-reu 3072 df-rab 3073 df-v 3434 df-sbc 3717 df-csb 3833 df-dif 3890 df-un 3892 df-in 3894 df-ss 3904 df-pss 3906 df-nul 4257 df-if 4460 df-pw 4535 df-sn 4562 df-pr 4564 df-tp 4566 df-op 4568 df-uni 4840 df-iun 4926 df-br 5075 df-opab 5137 df-mpt 5158 df-tr 5192 df-id 5489 df-eprel 5495 df-po 5503 df-so 5504 df-fr 5544 df-we 5546 df-xp 5595 df-rel 5596 df-cnv 5597 df-co 5598 df-dm 5599 df-rn 5600 df-res 5601 df-ima 5602 df-pred 6202 df-ord 6269 df-on 6270 df-lim 6271 df-suc 6272 df-iota 6391 df-fun 6435 df-fn 6436 df-f 6437 df-f1 6438 df-fo 6439 df-f1o 6440 df-fv 6441 df-riota 7232 df-ov 7278 df-oprab 7279 df-mpo 7280 df-om 7713 df-1st 7831 df-2nd 7832 df-tpos 8042 df-frecs 8097 df-wrecs 8128 df-recs 8202 df-rdg 8241 df-1o 8297 df-er 8498 df-map 8617 df-en 8734 df-dom 8735 df-sdom 8736 df-fin 8737 df-sup 9201 df-inf 9202 df-pnf 11011 df-mnf 11012 df-xr 11013 df-ltxr 11014 df-le 11015 df-sub 11207 df-neg 11208 df-div 11633 df-nn 11974 df-2 12036 df-3 12037 df-4 12038 df-5 12039 df-6 12040 df-7 12041 df-8 12042 df-9 12043 df-n0 12234 df-z 12320 df-dec 12438 df-uz 12583 df-q 12689 df-rp 12731 df-xneg 12848 df-xadd 12849 df-xmul 12850 df-ico 13085 df-fz 13240 df-fzo 13383 df-fl 13512 df-mod 13590 df-seq 13722 df-exp 13783 df-cj 14810 df-re 14811 df-im 14812 df-sqrt 14946 df-abs 14947 df-dvds 15964 df-gcd 16202 df-numer 16439 df-denom 16440 df-gz 16631 df-struct 16848 df-sets 16865 df-slot 16883 df-ndx 16895 df-base 16913 df-ress 16942 df-plusg 16975 df-mulr 16976 df-starv 16977 df-sca 16978 df-vsca 16979 df-ip 16980 df-tset 16981 df-ple 16982 df-ds 16984 df-unif 16985 df-rest 17133 df-topn 17134 df-0g 17152 df-topgen 17154 df-mgm 18326 df-sgrp 18375 df-mnd 18386 df-mhm 18430 df-grp 18580 df-minusg 18581 df-sbg 18582 df-mulg 18701 df-subg 18752 df-ghm 18832 df-od 19136 df-cmn 19388 df-abl 19389 df-mgp 19721 df-ur 19738 df-ring 19785 df-cring 19786 df-oppr 19862 df-dvdsr 19883 df-unit 19884 df-invr 19914 df-dvr 19925 df-rnghom 19959 df-drng 19993 df-subrg 20022 df-abv 20077 df-lmod 20125 df-nzr 20529 df-psmet 20589 df-xmet 20590 df-met 20591 df-bl 20592 df-mopn 20593 df-fbas 20594 df-fg 20595 df-metu 20596 df-cnfld 20598 df-zring 20671 df-zrh 20705 df-zlm 20706 df-chr 20707 df-top 22043 df-topon 22060 df-topsp 22082 df-bases 22096 df-fil 22997 df-ust 23352 df-uss 23408 df-ucn 23428 df-xms 23473 df-ms 23474 df-nm 23738 df-ngp 23739 df-nrg 23741 df-nlm 23742 df-qqh 31923

This theorem is referenced by: rrhcn 31947

W3C validator