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 34510

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 2762	. . . . 5 ⊢ (/_r‘𝑅) = (/_r‘𝑅)
5		eqid 2762	. . . . 5 ⊢ (ℤRHom‘𝑅) = (ℤRHom‘𝑅)
6	3, 4, 5	qqhf 34504	. . . 4 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅):ℚ⟶𝐵)
7	1, 2, 6	syl2anc 596	. . 3 ⊢ (𝜑 → (ℚHom‘𝑅):ℚ⟶𝐵)
8		simpr 490	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → 𝑒 ∈ ℝ⁺)
9		qqhucn.1	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝑅 ∈ NrmRing)
10		nrgngp 24894	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ NrmRing → 𝑅 ∈ NrmGrp)
11	9, 10	syl 18	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ NrmGrp)
12	11	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ NrmGrp)
13	7	ffvelcdmda 7081	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵)
14	13	adantr 486	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵)
15	7	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → (ℚHom‘𝑅):ℚ⟶𝐵)
16	15	ffvelcdmda 7081	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘𝑞) ∈ 𝐵)
17		eqid 2762	. . . . . . . . . . . . . 14 ⊢ (norm‘𝑅) = (norm‘𝑅)
18		eqid 2762	. . . . . . . . . . . . . 14 ⊢ (-_g‘𝑅) = (-_g‘𝑅)
19		eqid 2762	. . . . . . . . . . . . . 14 ⊢ (dist‘𝑅) = (dist‘𝑅)
20	17, 3, 18, 19	ngpdsr 24837	. . . . . . . . . . . . 13 ⊢ ((𝑅 ∈ NrmGrp ∧ ((ℚHom‘𝑅)‘𝑝) ∈ 𝐵 ∧ ((ℚHom‘𝑅)‘𝑞) ∈ 𝐵) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))))
21	12, 14, 16, 20	syl3anc 1398	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))))
22		simpr 490	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℚ)
23		simplr 781	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑝 ∈ ℚ)
24		qsubdrg 21638	. . . . . . . . . . . . . . . . . . 19 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) ∧ (ℂ_fld ↾_s ℚ) ∈ DivRing)
25	24	simpli 489	. . . . . . . . . . . . . . . . . 18 ⊢ ℚ ∈ (SubRing‘ℂ_fld)
26		subrgsubg 20745	. . . . . . . . . . . . . . . . . 18 ⊢ (ℚ ∈ (SubRing‘ℂ_fld) → ℚ ∈ (SubGrp‘ℂ_fld))
27	25, 26	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ ℚ ∈ (SubGrp‘ℂ_fld)
28		cnfldsub 21619	. . . . . . . . . . . . . . . . . 18 ⊢ − = (-_g‘ℂ_fld)
29		qqhucn.q	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑄 = (ℂ_fld ↾_s ℚ)
30		eqid 2762	. . . . . . . . . . . . . . . . . 18 ⊢ (-_g‘𝑄) = (-_g‘𝑄)
31	28, 29, 30	subgsub 19268	. . . . . . . . . . . . . . . . 17 ⊢ ((ℚ ∈ (SubGrp‘ℂ_fld) ∧ 𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
32	27, 31	mp3an1 1477	. . . . . . . . . . . . . . . 16 ⊢ ((𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
33	22, 23, 32	syl2anc 596	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑞 − 𝑝) = (𝑞(-_g‘𝑄)𝑝))
34	33	fveq2d 6886	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞 − 𝑝)) = ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)))
35	3, 4, 5, 29	qqhghm 34506	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑅 ∈ DivRing ∧ (chr‘𝑅) = 0) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
36	1, 2, 35	syl2anc 596	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
37	36	ad2antrr 739	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅))
38	29	qrngbas 27863	. . . . . . . . . . . . . . . 16 ⊢ ℚ = (Base‘𝑄)
39	38, 30, 18	ghmsub 19357	. . . . . . . . . . . . . . 15 ⊢ (((ℚHom‘𝑅) ∈ (𝑄 GrpHom 𝑅) ∧ 𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)))
40	37, 22, 23, 39	syl3anc 1398	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((ℚHom‘𝑅)‘(𝑞(-_g‘𝑄)𝑝)) = (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)))
41	34, 40	eqtr2d 2798	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝)) = ((ℚHom‘𝑅)‘(𝑞 − 𝑝)))
42	41	fveq2d 6886	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘(((ℚHom‘𝑅)‘𝑞)(-_g‘𝑅)((ℚHom‘𝑅)‘𝑝))) = ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))))
43	9, 1	elind 4149	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑅 ∈ (NrmRing ∩ DivRing))
44	43	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑅 ∈ (NrmRing ∩ DivRing))
45		qqhucn.3	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝑍 ∈ NrmMod)
46	45	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑍 ∈ NrmMod)
47	2	ad2antrr 739	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (chr‘𝑅) = 0)
48		qsubcl 13022	. . . . . . . . . . . . . 14 ⊢ ((𝑞 ∈ ℚ ∧ 𝑝 ∈ ℚ) → (𝑞 − 𝑝) ∈ ℚ)
49	22, 23, 48	syl2anc 596	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑞 − 𝑝) ∈ ℚ)
50		qqhucn.z	. . . . . . . . . . . . . 14 ⊢ 𝑍 = (ℤMod‘𝑅)
51	17, 50	qqhnm 34508	. . . . . . . . . . . . 13 ⊢ (((𝑅 ∈ (NrmRing ∩ DivRing) ∧ 𝑍 ∈ NrmMod ∧ (chr‘𝑅) = 0) ∧ (𝑞 − 𝑝) ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))) = (abs‘(𝑞 − 𝑝)))
52	44, 46, 47, 49, 51	syl31anc 1400	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((norm‘𝑅)‘((ℚHom‘𝑅)‘(𝑞 − 𝑝))) = (abs‘(𝑞 − 𝑝)))
53	21, 42, 52	3eqtrd 2801	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)) = (abs‘(𝑞 − 𝑝)))
54	14, 16	ovresd 7584	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) = (((ℚHom‘𝑅)‘𝑝)(dist‘𝑅)((ℚHom‘𝑅)‘𝑞)))
55		qsscn 13013	. . . . . . . . . . . . . 14 ⊢ ℚ ⊆ ℂ
56	55, 23	sselid 3932	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑝 ∈ ℂ)
57	55, 22	sselid 3932	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → 𝑞 ∈ ℂ)
58		eqid 2762	. . . . . . . . . . . . . 14 ⊢ (abs ∘ − ) = (abs ∘ − )
59	58	cnmetdval 25002	. . . . . . . . . . . . 13 ⊢ ((𝑝 ∈ ℂ ∧ 𝑞 ∈ ℂ) → (𝑝(abs ∘ − )𝑞) = (abs‘(𝑝 − 𝑞)))
60	56, 57, 59	syl2anc 596	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝(abs ∘ − )𝑞) = (abs‘(𝑝 − 𝑞)))
61	23, 22	ovresd 7584	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (𝑝(abs ∘ − )𝑞))
62	57, 56	abssubd 15547	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (abs‘(𝑞 − 𝑝)) = (abs‘(𝑝 − 𝑞)))
63	60, 61, 62	3eqtr4d 2807	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (abs‘(𝑞 − 𝑝)))
64	53, 54, 63	3eqtr4rd 2808	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) = (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)))
65	64	breq1d 5117	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 ↔ (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
66	65	biimpd 232	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑝 ∈ ℚ) ∧ 𝑞 ∈ ℚ) → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
67	66	ralrimiva 3156	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑝 ∈ ℚ) → ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
68	67	ralrimiva 3156	. . . . . 6 ⊢ (𝜑 → ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
69	68	adantr 486	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
70		breq2 5111	. . . . . . . 8 ⊢ (𝑑 = 𝑒 → ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 ↔ (𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒))
71	70	imbi1d 344	. . . . . . 7 ⊢ (𝑑 = 𝑒 → (((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒) ↔ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)))
72	71	2ralbidv 3228	. . . . . 6 ⊢ (𝑑 = 𝑒 → (∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒) ↔ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)))
73	72	rspcev 3579	. . . . 5 ⊢ ((𝑒 ∈ ℝ⁺ ∧ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑒 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒)) → ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
74	8, 69, 73	syl2anc 596	. . . 4 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺) → ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
75	74	ralrimiva 3156	. . 3 ⊢ (𝜑 → ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))
76		eqid 2762	. . . 4 ⊢ (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
77		qqhucn.v	. . . 4 ⊢ 𝑉 = (metUnif‘((dist‘𝑅) ↾ (𝐵 × 𝐵)))
78		0z 12630	. . . . . 6 ⊢ 0 ∈ ℤ
79		zq 13007	. . . . . 6 ⊢ (0 ∈ ℤ → 0 ∈ ℚ)
80		ne0i 4290	. . . . . 6 ⊢ (0 ∈ ℚ → ℚ ≠ ∅)
81	78, 79, 80	mp2b 10	. . . . 5 ⊢ ℚ ≠ ∅
82	81	a1i 11	. . . 4 ⊢ (𝜑 → ℚ ≠ ∅)
83		drngring 20903	. . . . 5 ⊢ (𝑅 ∈ DivRing → 𝑅 ∈ Ring)
84		eqid 2762	. . . . . 6 ⊢ (1_r‘𝑅) = (1_r‘𝑅)
85	3, 84	ringidcl 20412	. . . . 5 ⊢ (𝑅 ∈ Ring → (1_r‘𝑅) ∈ 𝐵)
86		ne0i 4290	. . . . 5 ⊢ ((1_r‘𝑅) ∈ 𝐵 → 𝐵 ≠ ∅)
87	1, 83, 85, 86	4syl 20	. . . 4 ⊢ (𝜑 → 𝐵 ≠ ∅)
88		cnfldxms 25008	. . . . . . . 8 ⊢ ℂ_fld ∈ ∞MetSp
89		qex 13014	. . . . . . . 8 ⊢ ℚ ∈ V
90		ressxms 24757	. . . . . . . 8 ⊢ ((ℂ_fld ∈ ∞MetSp ∧ ℚ ∈ V) → (ℂ_fld ↾_s ℚ) ∈ ∞MetSp)
91	88, 89, 90	mp2an 705	. . . . . . 7 ⊢ (ℂ_fld ↾_s ℚ) ∈ ∞MetSp
92	29, 91	eqeltri 2858	. . . . . 6 ⊢ 𝑄 ∈ ∞MetSp
93		cnfldds 21603	. . . . . . . . 9 ⊢ (abs ∘ − ) = (dist‘ℂ_fld)
94	29, 93	ressds 17501	. . . . . . . 8 ⊢ (ℚ ∈ V → (abs ∘ − ) = (dist‘𝑄))
95	89, 94	ax-mp 5	. . . . . . 7 ⊢ (abs ∘ − ) = (dist‘𝑄)
96	38, 95	xmsxmet2 24691	. . . . . 6 ⊢ (𝑄 ∈ ∞MetSp → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
97	92, 96	mp1i 14	. . . . 5 ⊢ (𝜑 → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ))
98		xmetpsmet 24580	. . . . 5 ⊢ (((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (∞Met‘ℚ) → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (PsMet‘ℚ))
99	97, 98	syl 18	. . . 4 ⊢ (𝜑 → ((abs ∘ − ) ↾ (ℚ × ℚ)) ∈ (PsMet‘ℚ))
100		ngpxms 24833	. . . . . 6 ⊢ (𝑅 ∈ NrmGrp → 𝑅 ∈ ∞MetSp)
101	3, 19	xmsxmet2 24691	. . . . . 6 ⊢ (𝑅 ∈ ∞MetSp → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵))
102	9, 10, 100, 101	4syl 20	. . . . 5 ⊢ (𝜑 → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵))
103		xmetpsmet 24580	. . . . 5 ⊢ (((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (∞Met‘𝐵) → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (PsMet‘𝐵))
104	102, 103	syl 18	. . . 4 ⊢ (𝜑 → ((dist‘𝑅) ↾ (𝐵 × 𝐵)) ∈ (PsMet‘𝐵))
105	76, 77, 82, 87, 99, 104	metucn 24803	. . 3 ⊢ (𝜑 → ((ℚHom‘𝑅) ∈ ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉) ↔ ((ℚHom‘𝑅):ℚ⟶𝐵 ∧ ∀𝑒 ∈ ℝ⁺ ∃𝑑 ∈ ℝ⁺ ∀𝑝 ∈ ℚ ∀𝑞 ∈ ℚ ((𝑝((abs ∘ − ) ↾ (ℚ × ℚ))𝑞) < 𝑑 → (((ℚHom‘𝑅)‘𝑝)((dist‘𝑅) ↾ (𝐵 × 𝐵))((ℚHom‘𝑅)‘𝑞)) < 𝑒))))
106	7, 75, 105	mpbir2and 726	. 2 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉))
107		qqhucn.u	. . . . . 6 ⊢ 𝑈 = (UnifSt‘𝑄)
108	29	fveq2i 6885	. . . . . 6 ⊢ (UnifSt‘𝑄) = (UnifSt‘(ℂ_fld ↾_s ℚ))
109		ressuss 24494	. . . . . . 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 2789	. . . . 5 ⊢ 𝑈 = ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ))
112		eqid 2762	. . . . . . 7 ⊢ (UnifSt‘ℂ_fld) = (UnifSt‘ℂ_fld)
113	112	cnflduss 25590	. . . . . 6 ⊢ (UnifSt‘ℂ_fld) = (metUnif‘(abs ∘ − ))
114	113	oveq1i 7427	. . . . 5 ⊢ ((UnifSt‘ℂ_fld) ↾_t (ℚ × ℚ)) = ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ))
115		cnxmet 25004	. . . . . . 7 ⊢ (abs ∘ − ) ∈ (∞Met‘ℂ)
116		xmetpsmet 24580	. . . . . . 7 ⊢ ((abs ∘ − ) ∈ (∞Met‘ℂ) → (abs ∘ − ) ∈ (PsMet‘ℂ))
117	115, 116	ax-mp 5	. . . . . 6 ⊢ (abs ∘ − ) ∈ (PsMet‘ℂ)
118		restmetu 24802	. . . . . 6 ⊢ ((ℚ ≠ ∅ ∧ (abs ∘ − ) ∈ (PsMet‘ℂ) ∧ ℚ ⊆ ℂ) → ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ)) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))))
119	81, 117, 55, 118	mp3an 1490	. . . . 5 ⊢ ((metUnif‘(abs ∘ − )) ↾_t (ℚ × ℚ)) = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
120	111, 114, 119	3eqtri 2789	. . . 4 ⊢ 𝑈 = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ)))
121	120	a1i 11	. . 3 ⊢ (𝜑 → 𝑈 = (metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))))
122	121	oveq1d 7432	. 2 ⊢ (𝜑 → (𝑈 Cn_u𝑉) = ((metUnif‘((abs ∘ − ) ↾ (ℚ × ℚ))) Cn_u𝑉))
123	106, 122	eleqtrrd 2865	1 ⊢ (𝜑 → (ℚHom‘𝑅) ∈ (𝑈 Cn_u𝑉))

Colors of variables: wff setvar class

This proof depends on syntax axioms: → wi 4 ∧ wa 401 = wceq 1570 ∈ wcel 2145 ≠ wne 2957 ∀wral 3078 ∃wrex 3088 Vcvv 3453 ∩ cin 3901 ⊆ wss 3902 ∅c0 4282 class class class wbr 5107 × cxp 5657 ↾ cres 5661 ∘ ccom 5663 ⟶wf 6533 ‘cfv 6537 (class class class)co 7417 ℂcc 11126 0cc0 11128 < clt 11271 − cmin 11469 ℤcz 12619 ℚcq 13001 ℝ⁺crp 13046 abscabs 15325 Basecbs 17307 ↾_s cress 17328 distcds 17357 ↾_t crest 17511 -_gcsg 19065 SubGrpcsubg 19249 GrpHom cghm 19346 1_rcur 20326 Ringcrg 20378 /_rcdvr 20547 SubRingcsubrg 20737 DivRingcdr 20896 PsMetcpsmet 21575 ∞Metcxmet 21576 metUnifcmetu 21582 ℂ_fldccnfld 21591 ℤRHomczrh 21718 ℤModczlm 21719 chrcchr 21720 UnifStcuss 24485 Cn_ucucn 24506 ∞MetSpcxms 24549 normcnm 24808 NrmGrpcngp 24809 NrmRingcnrg 24811 NrmModcnlm 24812 ℚHomcqqh 34488

This proof depends on axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1828 ax-4 1842 ax-5 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2215 ax-ext 2734 ax-rep 5236 ax-sep 5255 ax-nul 5267 ax-pow 5334 ax-pr 5402 ax-un 7740 ax-cnex 11184 ax-resscn 11185 ax-1cn 11186 ax-icn 11187 ax-addcl 11188 ax-addrcl 11189 ax-mulcl 11190 ax-mulrcl 11191 ax-mulcom 11192 ax-addass 11193 ax-mulass 11194 ax-distr 11195 ax-i2m1 11196 ax-1ne0 11197 ax-1rid 11198 ax-rnegex 11199 ax-rrecex 11200 ax-cnre 11201 ax-pre-lttri 11202 ax-pre-lttrn 11203 ax-pre-ltadd 11204 ax-pre-mulgt0 11205 ax-pre-sup 11206 ax-addf 11207 ax-mulf 11208

This proof depends on definitions: df-bi 210 df-an 402 df-or 862 df-3or 1104 df-3an 1105 df-tru 1573 df-fal 1583 df-ex 1813 df-nf 1817 df-sb 2100 df-mo 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-nel 3064 df-ral 3079 df-rex 3089 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3455 df-sbc 3743 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4283 df-if 4486 df-pw 4562 df-sn 4588 df-pr 4590 df-tp 4592 df-op 4594 df-uni 4871 df-iun 4956 df-br 5108 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5554 df-eprel 5559 df-po 5567 df-so 5568 df-fr 5612 df-we 5614 df-xp 5665 df-rel 5666 df-cnv 5667 df-co 5668 df-dm 5669 df-rn 5670 df-res 5671 df-ima 5672 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-riota 7374 df-ov 7420 df-oprab 7421 df-mpo 7422 df-om 7867 df-1st 7990 df-2nd 7991 df-tpos 8228 df-frecs 8284 df-wrecs 8315 df-recs 8364 df-rdg 8403 df-1o 8459 df-er 8700 df-map 8832 df-en 8957 df-dom 8958 df-sdom 8959 df-fin 8960 df-sup 9416 df-inf 9417 df-pnf 11273 df-mnf 11274 df-xr 11275 df-ltxr 11276 df-le 11277 df-sub 11471 df-neg 11472 df-div 11900 df-nn 12262 df-2 12331 df-3 12332 df-4 12333 df-5 12334 df-6 12335 df-7 12336 df-8 12337 df-9 12338 df-n0 12533 df-z 12620 df-dec 12741 df-uz 12892 df-q 13002 df-rp 13047 df-xneg 13167 df-xadd 13168 df-xmul 13169 df-ico 13408 df-fz 13566 df-fzo 13714 df-fl 13857 df-mod 13935 df-seq 14070 df-exp 14130 df-cj 15190 df-re 15191 df-im 15192 df-sqrt 15326 df-abs 15327 df-dvds 16349 df-gcd 16591 df-numer 16832 df-denom 16833 df-gz 17028 df-struct 17245 df-sets 17262 df-slot 17280 df-ndx 17292 df-base 17308 df-ress 17329 df-plusg 17361 df-mulr 17362 df-starv 17363 df-sca 17364 df-vsca 17365 df-ip 17366 df-tset 17367 df-ple 17368 df-ds 17370 df-unif 17371 df-rest 17513 df-topn 17514 df-0g 17532 df-topgen 17534 df-mgm 18736 df-sgrp 18827 df-mnd 18843 df-mhm 18897 df-grp 19066 df-minusg 19067 df-sbg 19068 df-mulg 19197 df-subg 19252 df-ghm 19347 df-od 19661 df-cmn 19915 df-abl 19916 df-mgp 20280 df-rng 20294 df-ur 20327 df-ring 20380 df-cring 20381 df-oppr 20484 df-dvdsr 20504 df-unit 20505 df-invr 20535 df-dvr 20548 df-rhm 20619 df-nzr 20679 df-subrng 20714 df-subrg 20738 df-drng 20898 df-abv 20981 df-lmod 21052 df-psmet 21583 df-xmet 21584 df-met 21585 df-bl 21586 df-mopn 21587 df-fbas 21588 df-fg 21589 df-metu 21590 df-cnfld 21592 df-zring 21666 df-zrh 21722 df-zlm 21723 df-chr 21724 df-top 23125 df-topon 23142 df-topsp 23164 df-bases 23177 df-fil 24078 df-ust 24433 df-uss 24488 df-ucn 24507 df-xms 24552 df-ms 24553 df-nm 24814 df-ngp 24815 df-nrg 24817 df-nlm 24818 df-qqh 34489

This theorem is used by: rrhcn 34515

W3C validator