qndenserrnopnlem - Mathbox for Glauco Siliprandi

	Mathbox for Glauco Siliprandi		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > qndenserrnopnlem		Structured version Visualization version GIF version

Theorem qndenserrnopnlem 45312

Description: n-dimensional rational numbers are dense in the space of n-dimensional real numbers, with respect to the n-dimensional standard topology. (Contributed by Glauco Siliprandi, 24-Dec-2020.)

**Hypotheses**
Ref	Expression
qndenserrnopnlem.i	⊢ (𝜑 → 𝐼 ∈ Fin)
qndenserrnopnlem.j	⊢ 𝐽 = (TopOpen‘(ℝ^‘𝐼))
qndenserrnopnlem.v	⊢ (𝜑 → 𝑉 ∈ 𝐽)
qndenserrnopnlem.x	⊢ (𝜑 → 𝑋 ∈ 𝑉)
qndenserrnopnlem.d	⊢ 𝐷 = (dist‘(ℝ^‘𝐼))

**Assertion**
Ref	Expression
qndenserrnopnlem	⊢ (𝜑 → ∃𝑦 ∈ (ℚ ↑_m 𝐼)𝑦 ∈ 𝑉)

Distinct variable groups: 𝑦,𝐷 𝑦,𝐼 𝑦,𝑉 𝑦,𝑋 𝜑,𝑦 Allowed substitution hint: 𝐽(𝑦)

Proof of Theorem qndenserrnopnlem Dummy variables 𝑒 𝑓 𝑔 𝑘 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		qndenserrnopnlem.i	. . . . 5 ⊢ (𝜑 → 𝐼 ∈ Fin)
2		qndenserrnopnlem.d	. . . . . 6 ⊢ 𝐷 = (dist‘(ℝ^‘𝐼))
3	2	rrxmetfi 25161	. . . . 5 ⊢ (𝐼 ∈ Fin → 𝐷 ∈ (Met‘(ℝ ↑_m 𝐼)))
4	1, 3	syl 17	. . . 4 ⊢ (𝜑 → 𝐷 ∈ (Met‘(ℝ ↑_m 𝐼)))
5		metxmet 24061	. . . 4 ⊢ (𝐷 ∈ (Met‘(ℝ ↑_m 𝐼)) → 𝐷 ∈ (∞Met‘(ℝ ↑_m 𝐼)))
6	4, 5	syl 17	. . 3 ⊢ (𝜑 → 𝐷 ∈ (∞Met‘(ℝ ↑_m 𝐼)))
7		qndenserrnopnlem.v	. . . . 5 ⊢ (𝜑 → 𝑉 ∈ 𝐽)
8		qndenserrnopnlem.j	. . . . 5 ⊢ 𝐽 = (TopOpen‘(ℝ^‘𝐼))
9	7, 8	eleqtrdi 2842	. . . 4 ⊢ (𝜑 → 𝑉 ∈ (TopOpen‘(ℝ^‘𝐼)))
10	1	rrxtopnfi 45302	. . . . 5 ⊢ (𝜑 → (TopOpen‘(ℝ^‘𝐼)) = (MetOpen‘(𝑓 ∈ (ℝ ↑_m 𝐼), 𝑔 ∈ (ℝ ↑_m 𝐼) ↦ (√‘Σ𝑘 ∈ 𝐼 (((𝑓‘𝑘) − (𝑔‘𝑘))↑2)))))
11	2	a1i 11	. . . . . . 7 ⊢ (𝜑 → 𝐷 = (dist‘(ℝ^‘𝐼)))
12		eqid 2731	. . . . . . . . 9 ⊢ (ℝ^‘𝐼) = (ℝ^‘𝐼)
13		eqid 2731	. . . . . . . . 9 ⊢ (ℝ ↑_m 𝐼) = (ℝ ↑_m 𝐼)
14	12, 13	rrxdsfi 25160	. . . . . . . 8 ⊢ (𝐼 ∈ Fin → (dist‘(ℝ^‘𝐼)) = (𝑓 ∈ (ℝ ↑_m 𝐼), 𝑔 ∈ (ℝ ↑_m 𝐼) ↦ (√‘Σ𝑘 ∈ 𝐼 (((𝑓‘𝑘) − (𝑔‘𝑘))↑2))))
15	1, 14	syl 17	. . . . . . 7 ⊢ (𝜑 → (dist‘(ℝ^‘𝐼)) = (𝑓 ∈ (ℝ ↑_m 𝐼), 𝑔 ∈ (ℝ ↑_m 𝐼) ↦ (√‘Σ𝑘 ∈ 𝐼 (((𝑓‘𝑘) − (𝑔‘𝑘))↑2))))
16	11, 15	eqtr2d 2772	. . . . . 6 ⊢ (𝜑 → (𝑓 ∈ (ℝ ↑_m 𝐼), 𝑔 ∈ (ℝ ↑_m 𝐼) ↦ (√‘Σ𝑘 ∈ 𝐼 (((𝑓‘𝑘) − (𝑔‘𝑘))↑2))) = 𝐷)
17	16	fveq2d 6895	. . . . 5 ⊢ (𝜑 → (MetOpen‘(𝑓 ∈ (ℝ ↑_m 𝐼), 𝑔 ∈ (ℝ ↑_m 𝐼) ↦ (√‘Σ𝑘 ∈ 𝐼 (((𝑓‘𝑘) − (𝑔‘𝑘))↑2)))) = (MetOpen‘𝐷))
18	10, 17	eqtrd 2771	. . . 4 ⊢ (𝜑 → (TopOpen‘(ℝ^‘𝐼)) = (MetOpen‘𝐷))
19	9, 18	eleqtrd 2834	. . 3 ⊢ (𝜑 → 𝑉 ∈ (MetOpen‘𝐷))
20		qndenserrnopnlem.x	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝑉)
21		eqid 2731	. . . 4 ⊢ (MetOpen‘𝐷) = (MetOpen‘𝐷)
22	21	mopni2 24223	. . 3 ⊢ ((𝐷 ∈ (∞Met‘(ℝ ↑_m 𝐼)) ∧ 𝑉 ∈ (MetOpen‘𝐷) ∧ 𝑋 ∈ 𝑉) → ∃𝑒 ∈ ℝ⁺ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉)
23	6, 19, 20, 22	syl3anc 1370	. 2 ⊢ (𝜑 → ∃𝑒 ∈ ℝ⁺ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉)
24	1	3ad2ant1 1132	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉) → 𝐼 ∈ Fin)
25		rrxtps 45301	. . . . . . . . . . . 12 ⊢ (𝐼 ∈ Fin → (ℝ^‘𝐼) ∈ TopSp)
26	1, 25	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (ℝ^‘𝐼) ∈ TopSp)
27		eqid 2731	. . . . . . . . . . . 12 ⊢ (Base‘(ℝ^‘𝐼)) = (Base‘(ℝ^‘𝐼))
28	27, 8	istps 22657	. . . . . . . . . . 11 ⊢ ((ℝ^‘𝐼) ∈ TopSp ↔ 𝐽 ∈ (TopOn‘(Base‘(ℝ^‘𝐼))))
29	26, 28	sylib 217	. . . . . . . . . 10 ⊢ (𝜑 → 𝐽 ∈ (TopOn‘(Base‘(ℝ^‘𝐼))))
30	1, 12, 27	rrxbasefi 25159	. . . . . . . . . . 11 ⊢ (𝜑 → (Base‘(ℝ^‘𝐼)) = (ℝ ↑_m 𝐼))
31	30	fveq2d 6895	. . . . . . . . . 10 ⊢ (𝜑 → (TopOn‘(Base‘(ℝ^‘𝐼))) = (TopOn‘(ℝ ↑_m 𝐼)))
32	29, 31	eleqtrd 2834	. . . . . . . . 9 ⊢ (𝜑 → 𝐽 ∈ (TopOn‘(ℝ ↑_m 𝐼)))
33		toponss 22650	. . . . . . . . 9 ⊢ ((𝐽 ∈ (TopOn‘(ℝ ↑_m 𝐼)) ∧ 𝑉 ∈ 𝐽) → 𝑉 ⊆ (ℝ ↑_m 𝐼))
34	32, 7, 33	syl2anc 583	. . . . . . . 8 ⊢ (𝜑 → 𝑉 ⊆ (ℝ ↑_m 𝐼))
35	34, 20	sseldd 3983	. . . . . . 7 ⊢ (𝜑 → 𝑋 ∈ (ℝ ↑_m 𝐼))
36	35	3ad2ant1 1132	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉) → 𝑋 ∈ (ℝ ↑_m 𝐼))
37		simp2 1136	. . . . . 6 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉) → 𝑒 ∈ ℝ⁺)
38	24, 36, 2, 37	qndenserrnbl 45310	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉) → ∃𝑦 ∈ (ℚ ↑_m 𝐼)𝑦 ∈ (𝑋(ball‘𝐷)𝑒))
39		ssel 3975	. . . . . . . 8 ⊢ ((𝑋(ball‘𝐷)𝑒) ⊆ 𝑉 → (𝑦 ∈ (𝑋(ball‘𝐷)𝑒) → 𝑦 ∈ 𝑉))
40	39	adantr 480	. . . . . . 7 ⊢ (((𝑋(ball‘𝐷)𝑒) ⊆ 𝑉 ∧ 𝑦 ∈ (ℚ ↑_m 𝐼)) → (𝑦 ∈ (𝑋(ball‘𝐷)𝑒) → 𝑦 ∈ 𝑉))
41	40	3ad2antl3 1186	. . . . . 6 ⊢ (((𝜑 ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉) ∧ 𝑦 ∈ (ℚ ↑_m 𝐼)) → (𝑦 ∈ (𝑋(ball‘𝐷)𝑒) → 𝑦 ∈ 𝑉))
42	41	reximdva 3167	. . . . 5 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉) → (∃𝑦 ∈ (ℚ ↑_m 𝐼)𝑦 ∈ (𝑋(ball‘𝐷)𝑒) → ∃𝑦 ∈ (ℚ ↑_m 𝐼)𝑦 ∈ 𝑉))
43	38, 42	mpd 15	. . . 4 ⊢ ((𝜑 ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉) → ∃𝑦 ∈ (ℚ ↑_m 𝐼)𝑦 ∈ 𝑉)
44	43	3exp 1118	. . 3 ⊢ (𝜑 → (𝑒 ∈ ℝ⁺ → ((𝑋(ball‘𝐷)𝑒) ⊆ 𝑉 → ∃𝑦 ∈ (ℚ ↑_m 𝐼)𝑦 ∈ 𝑉)))
45	44	rexlimdv 3152	. 2 ⊢ (𝜑 → (∃𝑒 ∈ ℝ⁺ (𝑋(ball‘𝐷)𝑒) ⊆ 𝑉 → ∃𝑦 ∈ (ℚ ↑_m 𝐼)𝑦 ∈ 𝑉))
46	23, 45	mpd 15	1 ⊢ (𝜑 → ∃𝑦 ∈ (ℚ ↑_m 𝐼)𝑦 ∈ 𝑉)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ w3a 1086 = wceq 1540 ∈ wcel 2105 ∃wrex 3069 ⊆ wss 3948 ‘cfv 6543 (class class class)co 7412 ∈ cmpo 7414 ↑_m cmap 8824 Fincfn 8943 ℝcr 11113 − cmin 11449 2c2 12272 ℚcq 12937 ℝ⁺crp 12979 ↑cexp 14032 √csqrt 15185 Σcsu 15637 Basecbs 17149 distcds 17211 TopOpenctopn 17372 ∞Metcxmet 21130 Metcmet 21131 ballcbl 21132 MetOpencmopn 21135 TopOnctopon 22633 TopSpctps 22655 ℝ^crrx 25132

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1912 ax-6 1970 ax-7 2010 ax-8 2107 ax-9 2115 ax-10 2136 ax-11 2153 ax-12 2170 ax-ext 2702 ax-rep 5285 ax-sep 5299 ax-nul 5306 ax-pow 5363 ax-pr 5427 ax-un 7729 ax-inf2 9640 ax-cnex 11170 ax-resscn 11171 ax-1cn 11172 ax-icn 11173 ax-addcl 11174 ax-addrcl 11175 ax-mulcl 11176 ax-mulrcl 11177 ax-mulcom 11178 ax-addass 11179 ax-mulass 11180 ax-distr 11181 ax-i2m1 11182 ax-1ne0 11183 ax-1rid 11184 ax-rnegex 11185 ax-rrecex 11186 ax-cnre 11187 ax-pre-lttri 11188 ax-pre-lttrn 11189 ax-pre-ltadd 11190 ax-pre-mulgt0 11191 ax-pre-sup 11192 ax-addf 11193 ax-mulf 11194

This theorem depends on definitions: df-bi 206 df-an 396 df-or 845 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1781 df-nf 1785 df-sb 2067 df-mo 2533 df-eu 2562 df-clab 2709 df-cleq 2723 df-clel 2809 df-nfc 2884 df-ne 2940 df-nel 3046 df-ral 3061 df-rex 3070 df-rmo 3375 df-reu 3376 df-rab 3432 df-v 3475 df-sbc 3778 df-csb 3894 df-dif 3951 df-un 3953 df-in 3955 df-ss 3965 df-pss 3967 df-nul 4323 df-if 4529 df-pw 4604 df-sn 4629 df-pr 4631 df-tp 4633 df-op 4635 df-uni 4909 df-int 4951 df-iun 4999 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5574 df-eprel 5580 df-po 5588 df-so 5589 df-fr 5631 df-se 5632 df-we 5633 df-xp 5682 df-rel 5683 df-cnv 5684 df-co 5685 df-dm 5686 df-rn 5687 df-res 5688 df-ima 5689 df-pred 6300 df-ord 6367 df-on 6368 df-lim 6369 df-suc 6370 df-iota 6495 df-fun 6545 df-fn 6546 df-f 6547 df-f1 6548 df-fo 6549 df-f1o 6550 df-fv 6551 df-isom 6552 df-riota 7368 df-ov 7415 df-oprab 7416 df-mpo 7417 df-of 7674 df-om 7860 df-1st 7979 df-2nd 7980 df-supp 8151 df-tpos 8215 df-frecs 8270 df-wrecs 8301 df-recs 8375 df-rdg 8414 df-1o 8470 df-er 8707 df-map 8826 df-ixp 8896 df-en 8944 df-dom 8945 df-sdom 8946 df-fin 8947 df-fsupp 9366 df-sup 9441 df-inf 9442 df-oi 9509 df-card 9938 df-pnf 11255 df-mnf 11256 df-xr 11257 df-ltxr 11258 df-le 11259 df-sub 11451 df-neg 11452 df-div 11877 df-nn 12218 df-2 12280 df-3 12281 df-4 12282 df-5 12283 df-6 12284 df-7 12285 df-8 12286 df-9 12287 df-n0 12478 df-z 12564 df-dec 12683 df-uz 12828 df-q 12938 df-rp 12980 df-xneg 13097 df-xadd 13098 df-xmul 13099 df-ioo 13333 df-ico 13335 df-fz 13490 df-fzo 13633 df-seq 13972 df-exp 14033 df-hash 14296 df-cj 15051 df-re 15052 df-im 15053 df-sqrt 15187 df-abs 15188 df-clim 15437 df-sum 15638 df-struct 17085 df-sets 17102 df-slot 17120 df-ndx 17132 df-base 17150 df-ress 17179 df-plusg 17215 df-mulr 17216 df-starv 17217 df-sca 17218 df-vsca 17219 df-ip 17220 df-tset 17221 df-ple 17222 df-ds 17224 df-unif 17225 df-hom 17226 df-cco 17227 df-rest 17373 df-topn 17374 df-0g 17392 df-gsum 17393 df-topgen 17394 df-prds 17398 df-pws 17400 df-mgm 18566 df-sgrp 18645 df-mnd 18661 df-mhm 18706 df-submnd 18707 df-grp 18859 df-minusg 18860 df-sbg 18861 df-subg 19040 df-ghm 19129 df-cntz 19223 df-cmn 19692 df-abl 19693 df-mgp 20030 df-rng 20048 df-ur 20077 df-ring 20130 df-cring 20131 df-oppr 20226 df-dvdsr 20249 df-unit 20250 df-invr 20280 df-dvr 20293 df-rhm 20364 df-subrng 20435 df-subrg 20460 df-drng 20503 df-field 20504 df-abv 20569 df-staf 20597 df-srng 20598 df-lmod 20617 df-lss 20688 df-lmhm 20778 df-lvec 20859 df-sra 20931 df-rgmod 20932 df-psmet 21137 df-xmet 21138 df-met 21139 df-bl 21140 df-mopn 21141 df-cnfld 21146 df-refld 21378 df-phl 21399 df-dsmm 21507 df-frlm 21522 df-top 22617 df-topon 22634 df-topsp 22656 df-bases 22670 df-xms 24047 df-ms 24048 df-nm 24312 df-ngp 24313 df-tng 24314 df-nrg 24315 df-nlm 24316 df-clm 24811 df-cph 24917 df-tcph 24918 df-rrx 25134

This theorem is referenced by: qndenserrnopn 45313

W3C validator