opnvonmbllem2 - Mathbox for Glauco Siliprandi

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

Theorem opnvonmbllem2 45349

Description: An open subset of the n-dimensional Real numbers is Lebesgue measurable. This is Proposition 115G (a) of [Fremlin1] p. 32. (Contributed by Glauco Siliprandi, 24-Dec-2020.)

**Hypotheses**
Ref	Expression
opnvonmbllem2.x	⊢ (𝜑 → 𝑋 ∈ Fin)
opnvonmbllem2.n	⊢ 𝑆 = dom (voln‘𝑋)
opnvonmbllem2.g	⊢ (𝜑 → 𝐺 ∈ (TopOpen‘(ℝ^‘𝑋)))
opnvonmbl.k	⊢ 𝐾 = {ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋) ∣ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺}

**Assertion**
Ref	Expression
opnvonmbllem2	⊢ (𝜑 → 𝐺 ∈ 𝑆)

Distinct variable groups: ℎ,𝐺,𝑖 ℎ,𝐾,𝑖 𝑆,ℎ,𝑖 ℎ,𝑋,𝑖 𝜑,ℎ,𝑖

Proof of Theorem opnvonmbllem2 Dummy variables 𝑐 𝑑 𝑒 𝑥 𝑘 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		opnvonmbllem2.x	. . . . . . . . . . 11 ⊢ (𝜑 → 𝑋 ∈ Fin)
2		eqid 2733	. . . . . . . . . . . 12 ⊢ (dist‘(ℝ^‘𝑋)) = (dist‘(ℝ^‘𝑋))
3	2	rrxmetfi 24929	. . . . . . . . . . 11 ⊢ (𝑋 ∈ Fin → (dist‘(ℝ^‘𝑋)) ∈ (Met‘(ℝ ↑_m 𝑋)))
4	1, 3	syl 17	. . . . . . . . . 10 ⊢ (𝜑 → (dist‘(ℝ^‘𝑋)) ∈ (Met‘(ℝ ↑_m 𝑋)))
5		metxmet 23840	. . . . . . . . . 10 ⊢ ((dist‘(ℝ^‘𝑋)) ∈ (Met‘(ℝ ↑_m 𝑋)) → (dist‘(ℝ^‘𝑋)) ∈ (∞Met‘(ℝ ↑_m 𝑋)))
6	4, 5	syl 17	. . . . . . . . 9 ⊢ (𝜑 → (dist‘(ℝ^‘𝑋)) ∈ (∞Met‘(ℝ ↑_m 𝑋)))
7	6	adantr 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → (dist‘(ℝ^‘𝑋)) ∈ (∞Met‘(ℝ ↑_m 𝑋)))
8		opnvonmbllem2.g	. . . . . . . . . 10 ⊢ (𝜑 → 𝐺 ∈ (TopOpen‘(ℝ^‘𝑋)))
9		eqid 2733	. . . . . . . . . . . . . 14 ⊢ (ℝ^‘𝑋) = (ℝ^‘𝑋)
10	9	rrxval 24904	. . . . . . . . . . . . 13 ⊢ (𝑋 ∈ Fin → (ℝ^‘𝑋) = (toℂPreHil‘(ℝ_fld freeLMod 𝑋)))
11	1, 10	syl 17	. . . . . . . . . . . 12 ⊢ (𝜑 → (ℝ^‘𝑋) = (toℂPreHil‘(ℝ_fld freeLMod 𝑋)))
12	11	fveq2d 6896	. . . . . . . . . . 11 ⊢ (𝜑 → (TopOpen‘(ℝ^‘𝑋)) = (TopOpen‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋))))
13		ovex 7442	. . . . . . . . . . . . 13 ⊢ (ℝ_fld freeLMod 𝑋) ∈ V
14		eqid 2733	. . . . . . . . . . . . . 14 ⊢ (toℂPreHil‘(ℝ_fld freeLMod 𝑋)) = (toℂPreHil‘(ℝ_fld freeLMod 𝑋))
15		eqid 2733	. . . . . . . . . . . . . 14 ⊢ (dist‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋))) = (dist‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋)))
16		eqid 2733	. . . . . . . . . . . . . 14 ⊢ (TopOpen‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋))) = (TopOpen‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋)))
17	14, 15, 16	tcphtopn 24743	. . . . . . . . . . . . 13 ⊢ ((ℝ_fld freeLMod 𝑋) ∈ V → (TopOpen‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋))) = (MetOpen‘(dist‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋)))))
18	13, 17	ax-mp 5	. . . . . . . . . . . 12 ⊢ (TopOpen‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋))) = (MetOpen‘(dist‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋))))
19	18	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → (TopOpen‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋))) = (MetOpen‘(dist‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋)))))
20	11	eqcomd 2739	. . . . . . . . . . . . 13 ⊢ (𝜑 → (toℂPreHil‘(ℝ_fld freeLMod 𝑋)) = (ℝ^‘𝑋))
21	20	fveq2d 6896	. . . . . . . . . . . 12 ⊢ (𝜑 → (dist‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋))) = (dist‘(ℝ^‘𝑋)))
22	21	fveq2d 6896	. . . . . . . . . . 11 ⊢ (𝜑 → (MetOpen‘(dist‘(toℂPreHil‘(ℝ_fld freeLMod 𝑋)))) = (MetOpen‘(dist‘(ℝ^‘𝑋))))
23	12, 19, 22	3eqtrd 2777	. . . . . . . . . 10 ⊢ (𝜑 → (TopOpen‘(ℝ^‘𝑋)) = (MetOpen‘(dist‘(ℝ^‘𝑋))))
24	8, 23	eleqtrd 2836	. . . . . . . . 9 ⊢ (𝜑 → 𝐺 ∈ (MetOpen‘(dist‘(ℝ^‘𝑋))))
25	24	adantr 482	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → 𝐺 ∈ (MetOpen‘(dist‘(ℝ^‘𝑋))))
26		simpr 486	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → 𝑥 ∈ 𝐺)
27		eqid 2733	. . . . . . . . 9 ⊢ (MetOpen‘(dist‘(ℝ^‘𝑋))) = (MetOpen‘(dist‘(ℝ^‘𝑋)))
28	27	mopni2 24002	. . . . . . . 8 ⊢ (((dist‘(ℝ^‘𝑋)) ∈ (∞Met‘(ℝ ↑_m 𝑋)) ∧ 𝐺 ∈ (MetOpen‘(dist‘(ℝ^‘𝑋))) ∧ 𝑥 ∈ 𝐺) → ∃𝑒 ∈ ℝ⁺ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺)
29	7, 25, 26, 28	syl3anc 1372	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → ∃𝑒 ∈ ℝ⁺ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺)
30	1	ad2antrr 725	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐺) ∧ 𝑒 ∈ ℝ⁺) → 𝑋 ∈ Fin)
31		eqid 2733	. . . . . . . . . . . . . . . . . 18 ⊢ (TopOpen‘(ℝ^‘𝑋)) = (TopOpen‘(ℝ^‘𝑋))
32	31	rrxtoponfi 45007	. . . . . . . . . . . . . . . . 17 ⊢ (𝑋 ∈ Fin → (TopOpen‘(ℝ^‘𝑋)) ∈ (TopOn‘(ℝ ↑_m 𝑋)))
33	1, 32	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → (TopOpen‘(ℝ^‘𝑋)) ∈ (TopOn‘(ℝ ↑_m 𝑋)))
34		toponss 22429	. . . . . . . . . . . . . . . 16 ⊢ (((TopOpen‘(ℝ^‘𝑋)) ∈ (TopOn‘(ℝ ↑_m 𝑋)) ∧ 𝐺 ∈ (TopOpen‘(ℝ^‘𝑋))) → 𝐺 ⊆ (ℝ ↑_m 𝑋))
35	33, 8, 34	syl2anc 585	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐺 ⊆ (ℝ ↑_m 𝑋))
36	35	adantr 482	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → 𝐺 ⊆ (ℝ ↑_m 𝑋))
37	36, 26	sseldd 3984	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → 𝑥 ∈ (ℝ ↑_m 𝑋))
38	37	adantr 482	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐺) ∧ 𝑒 ∈ ℝ⁺) → 𝑥 ∈ (ℝ ↑_m 𝑋))
39		simpr 486	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐺) ∧ 𝑒 ∈ ℝ⁺) → 𝑒 ∈ ℝ⁺)
40	30, 38, 39	hoiqssbl 45341	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐺) ∧ 𝑒 ∈ ℝ⁺) → ∃𝑐 ∈ (ℚ ↑_m 𝑋)∃𝑑 ∈ (ℚ ↑_m 𝑋)(𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒)))
41	40	3adant3 1133	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐺) ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) → ∃𝑐 ∈ (ℚ ↑_m 𝑋)∃𝑑 ∈ (ℚ ↑_m 𝑋)(𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒)))
42		nfv 1918	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑖(𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺)
43		nfv 1918	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑖(𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋))
44		nfcv 2904	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑖𝑥
45		nfixp1 8912	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑖X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖))
46	44, 45	nfel 2918	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑖 𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖))
47		nfcv 2904	. . . . . . . . . . . . . . . . . 18 ⊢ Ⅎ𝑖(𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒)
48	45, 47	nfss 3975	. . . . . . . . . . . . . . . . 17 ⊢ Ⅎ𝑖X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒)
49	46, 48	nfan 1903	. . . . . . . . . . . . . . . 16 ⊢ Ⅎ𝑖(𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒))
50	42, 43, 49	nf3an 1905	. . . . . . . . . . . . . . 15 ⊢ Ⅎ𝑖((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) ∧ (𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) ∧ (𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒)))
51	1	adantr 482	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) → 𝑋 ∈ Fin)
52	51	3ad2ant1 1134	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) ∧ (𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) ∧ (𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒))) → 𝑋 ∈ Fin)
53		elmapi 8843	. . . . . . . . . . . . . . . . 17 ⊢ (𝑐 ∈ (ℚ ↑_m 𝑋) → 𝑐:𝑋⟶ℚ)
54	53	adantr 482	. . . . . . . . . . . . . . . 16 ⊢ ((𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) → 𝑐:𝑋⟶ℚ)
55	54	3ad2ant2 1135	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) ∧ (𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) ∧ (𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒))) → 𝑐:𝑋⟶ℚ)
56		elmapi 8843	. . . . . . . . . . . . . . . . 17 ⊢ (𝑑 ∈ (ℚ ↑_m 𝑋) → 𝑑:𝑋⟶ℚ)
57	56	adantl 483	. . . . . . . . . . . . . . . 16 ⊢ ((𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) → 𝑑:𝑋⟶ℚ)
58	57	3ad2ant2 1135	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) ∧ (𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) ∧ (𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒))) → 𝑑:𝑋⟶ℚ)
59		simp3r 1203	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) ∧ (𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) ∧ (𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒))) → X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒))
60		simp1r 1199	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) ∧ (𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) ∧ (𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒))) → (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺)
61		simp3l 1202	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) ∧ (𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) ∧ (𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒))) → 𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)))
62		opnvonmbl.k	. . . . . . . . . . . . . . 15 ⊢ 𝐾 = {ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋) ∣ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺}
63		eqid 2733	. . . . . . . . . . . . . . 15 ⊢ (𝑖 ∈ 𝑋 ↦ ⟨(𝑐‘𝑖), (𝑑‘𝑖)⟩) = (𝑖 ∈ 𝑋 ↦ ⟨(𝑐‘𝑖), (𝑑‘𝑖)⟩)
64	50, 52, 55, 58, 59, 60, 61, 62, 63	opnvonmbllem1 45348	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) ∧ (𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) ∧ (𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒))) → ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))
65	64	3exp 1120	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) → ((𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) → ((𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒)) → ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))))
66	65	adantlr 714	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐺) ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) → ((𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) → ((𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒)) → ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))))
67	66	3adant2 1132	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐺) ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) → ((𝑐 ∈ (ℚ ↑_m 𝑋) ∧ 𝑑 ∈ (ℚ ↑_m 𝑋)) → ((𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒)) → ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))))
68	67	rexlimdvv 3211	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐺) ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) → (∃𝑐 ∈ (ℚ ↑_m 𝑋)∃𝑑 ∈ (ℚ ↑_m 𝑋)(𝑥 ∈ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ∧ X𝑖 ∈ 𝑋 ((𝑐‘𝑖)[,)(𝑑‘𝑖)) ⊆ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒)) → ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖)))
69	41, 68	mpd 15	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑥 ∈ 𝐺) ∧ 𝑒 ∈ ℝ⁺ ∧ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺) → ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))
70	69	3exp 1120	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → (𝑒 ∈ ℝ⁺ → ((𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺 → ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))))
71	70	rexlimdv 3154	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → (∃𝑒 ∈ ℝ⁺ (𝑥(ball‘(dist‘(ℝ^‘𝑋)))𝑒) ⊆ 𝐺 → ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖)))
72	29, 71	mpd 15	. . . . . 6 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))
73		eliun 5002	. . . . . 6 ⊢ (𝑥 ∈ ∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ↔ ∃ℎ ∈ 𝐾 𝑥 ∈ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))
74	72, 73	sylibr 233	. . . . 5 ⊢ ((𝜑 ∧ 𝑥 ∈ 𝐺) → 𝑥 ∈ ∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))
75	74	ralrimiva 3147	. . . 4 ⊢ (𝜑 → ∀𝑥 ∈ 𝐺 𝑥 ∈ ∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))
76		dfss3 3971	. . . 4 ⊢ (𝐺 ⊆ ∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ↔ ∀𝑥 ∈ 𝐺 𝑥 ∈ ∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))
77	75, 76	sylibr 233	. . 3 ⊢ (𝜑 → 𝐺 ⊆ ∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))
78	62	eleq2i 2826	. . . . . . . . 9 ⊢ (ℎ ∈ 𝐾 ↔ ℎ ∈ {ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋) ∣ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺})
79	78	biimpi 215	. . . . . . . 8 ⊢ (ℎ ∈ 𝐾 → ℎ ∈ {ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋) ∣ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺})
80	79	adantl 483	. . . . . . 7 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → ℎ ∈ {ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋) ∣ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺})
81		rabid 3453	. . . . . . 7 ⊢ (ℎ ∈ {ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋) ∣ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺} ↔ (ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋) ∧ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺))
82	80, 81	sylib 217	. . . . . 6 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → (ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋) ∧ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺))
83	82	simprd 497	. . . . 5 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺)
84	83	ralrimiva 3147	. . . 4 ⊢ (𝜑 → ∀ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺)
85		iunss 5049	. . . 4 ⊢ (∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺 ↔ ∀ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺)
86	84, 85	sylibr 233	. . 3 ⊢ (𝜑 → ∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺)
87	77, 86	eqssd 4000	. 2 ⊢ (𝜑 → 𝐺 = ∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖))
88		opnvonmbllem2.n	. . . 4 ⊢ 𝑆 = dom (voln‘𝑋)
89	1, 88	dmovnsal 45328	. . 3 ⊢ (𝜑 → 𝑆 ∈ SAlg)
90		ssrab2 4078	. . . . . 6 ⊢ {ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋) ∣ X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ⊆ 𝐺} ⊆ ((ℚ × ℚ) ↑_m 𝑋)
91	62, 90	eqsstri 4017	. . . . 5 ⊢ 𝐾 ⊆ ((ℚ × ℚ) ↑_m 𝑋)
92	91	a1i 11	. . . 4 ⊢ (𝜑 → 𝐾 ⊆ ((ℚ × ℚ) ↑_m 𝑋))
93		qct 44072	. . . . . . 7 ⊢ ℚ ≼ ω
94	93	a1i 11	. . . . . 6 ⊢ (𝜑 → ℚ ≼ ω)
95		xpct 10011	. . . . . 6 ⊢ ((ℚ ≼ ω ∧ ℚ ≼ ω) → (ℚ × ℚ) ≼ ω)
96	94, 94, 95	syl2anc 585	. . . . 5 ⊢ (𝜑 → (ℚ × ℚ) ≼ ω)
97	96, 1	mpct 43900	. . . 4 ⊢ (𝜑 → ((ℚ × ℚ) ↑_m 𝑋) ≼ ω)
98		ssct 9051	. . . 4 ⊢ ((𝐾 ⊆ ((ℚ × ℚ) ↑_m 𝑋) ∧ ((ℚ × ℚ) ↑_m 𝑋) ≼ ω) → 𝐾 ≼ ω)
99	92, 97, 98	syl2anc 585	. . 3 ⊢ (𝜑 → 𝐾 ≼ ω)
100		reex 11201	. . . . . . . . . 10 ⊢ ℝ ∈ V
101	100, 100	xpex 7740	. . . . . . . . 9 ⊢ (ℝ × ℝ) ∈ V
102		qssre 12943	. . . . . . . . . 10 ⊢ ℚ ⊆ ℝ
103		xpss12 5692	. . . . . . . . . 10 ⊢ ((ℚ ⊆ ℝ ∧ ℚ ⊆ ℝ) → (ℚ × ℚ) ⊆ (ℝ × ℝ))
104	102, 102, 103	mp2an 691	. . . . . . . . 9 ⊢ (ℚ × ℚ) ⊆ (ℝ × ℝ)
105		mapss 8883	. . . . . . . . 9 ⊢ (((ℝ × ℝ) ∈ V ∧ (ℚ × ℚ) ⊆ (ℝ × ℝ)) → ((ℚ × ℚ) ↑_m 𝑋) ⊆ ((ℝ × ℝ) ↑_m 𝑋))
106	101, 104, 105	mp2an 691	. . . . . . . 8 ⊢ ((ℚ × ℚ) ↑_m 𝑋) ⊆ ((ℝ × ℝ) ↑_m 𝑋)
107	91	sseli 3979	. . . . . . . 8 ⊢ (ℎ ∈ 𝐾 → ℎ ∈ ((ℚ × ℚ) ↑_m 𝑋))
108	106, 107	sselid 3981	. . . . . . 7 ⊢ (ℎ ∈ 𝐾 → ℎ ∈ ((ℝ × ℝ) ↑_m 𝑋))
109		elmapi 8843	. . . . . . 7 ⊢ (ℎ ∈ ((ℝ × ℝ) ↑_m 𝑋) → ℎ:𝑋⟶(ℝ × ℝ))
110	108, 109	syl 17	. . . . . 6 ⊢ (ℎ ∈ 𝐾 → ℎ:𝑋⟶(ℝ × ℝ))
111	110	adantl 483	. . . . 5 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → ℎ:𝑋⟶(ℝ × ℝ))
112		2fveq3 6897	. . . . . 6 ⊢ (𝑘 = 𝑖 → (1^st ‘(ℎ‘𝑘)) = (1^st ‘(ℎ‘𝑖)))
113	112	cbvmptv 5262	. . . . 5 ⊢ (𝑘 ∈ 𝑋 ↦ (1^st ‘(ℎ‘𝑘))) = (𝑖 ∈ 𝑋 ↦ (1^st ‘(ℎ‘𝑖)))
114		2fveq3 6897	. . . . . 6 ⊢ (𝑘 = 𝑖 → (2^nd ‘(ℎ‘𝑘)) = (2^nd ‘(ℎ‘𝑖)))
115	114	cbvmptv 5262	. . . . 5 ⊢ (𝑘 ∈ 𝑋 ↦ (2^nd ‘(ℎ‘𝑘))) = (𝑖 ∈ 𝑋 ↦ (2^nd ‘(ℎ‘𝑖)))
116	111, 113, 115	hoicoto2 45321	. . . 4 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) = X𝑖 ∈ 𝑋 (((𝑘 ∈ 𝑋 ↦ (1^st ‘(ℎ‘𝑘)))‘𝑖)[,)((𝑘 ∈ 𝑋 ↦ (2^nd ‘(ℎ‘𝑘)))‘𝑖)))
117	1	adantr 482	. . . . 5 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → 𝑋 ∈ Fin)
118	111	ffvelcdmda 7087	. . . . . . 7 ⊢ (((𝜑 ∧ ℎ ∈ 𝐾) ∧ 𝑘 ∈ 𝑋) → (ℎ‘𝑘) ∈ (ℝ × ℝ))
119		xp1st 8007	. . . . . . 7 ⊢ ((ℎ‘𝑘) ∈ (ℝ × ℝ) → (1^st ‘(ℎ‘𝑘)) ∈ ℝ)
120	118, 119	syl 17	. . . . . 6 ⊢ (((𝜑 ∧ ℎ ∈ 𝐾) ∧ 𝑘 ∈ 𝑋) → (1^st ‘(ℎ‘𝑘)) ∈ ℝ)
121	120	fmpttd 7115	. . . . 5 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → (𝑘 ∈ 𝑋 ↦ (1^st ‘(ℎ‘𝑘))):𝑋⟶ℝ)
122		xp2nd 8008	. . . . . . 7 ⊢ ((ℎ‘𝑘) ∈ (ℝ × ℝ) → (2^nd ‘(ℎ‘𝑘)) ∈ ℝ)
123	118, 122	syl 17	. . . . . 6 ⊢ (((𝜑 ∧ ℎ ∈ 𝐾) ∧ 𝑘 ∈ 𝑋) → (2^nd ‘(ℎ‘𝑘)) ∈ ℝ)
124	123	fmpttd 7115	. . . . 5 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → (𝑘 ∈ 𝑋 ↦ (2^nd ‘(ℎ‘𝑘))):𝑋⟶ℝ)
125	117, 88, 121, 124	hoimbl 45347	. . . 4 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → X𝑖 ∈ 𝑋 (((𝑘 ∈ 𝑋 ↦ (1^st ‘(ℎ‘𝑘)))‘𝑖)[,)((𝑘 ∈ 𝑋 ↦ (2^nd ‘(ℎ‘𝑘)))‘𝑖)) ∈ 𝑆)
126	116, 125	eqeltrd 2834	. . 3 ⊢ ((𝜑 ∧ ℎ ∈ 𝐾) → X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ∈ 𝑆)
127	89, 99, 126	saliuncl 45039	. 2 ⊢ (𝜑 → ∪ ℎ ∈ 𝐾 X𝑖 ∈ 𝑋 (([,) ∘ ℎ)‘𝑖) ∈ 𝑆)
128	87, 127	eqeltrd 2834	1 ⊢ (𝜑 → 𝐺 ∈ 𝑆)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ∧ wa 397 ∧ w3a 1088 = wceq 1542 ∈ wcel 2107 ∀wral 3062 ∃wrex 3071 {crab 3433 Vcvv 3475 ⊆ wss 3949 ⟨cop 4635 ∪ ciun 4998 class class class wbr 5149 ↦ cmpt 5232 × cxp 5675 dom cdm 5677 ∘ ccom 5681 ⟶wf 6540 ‘cfv 6544 (class class class)co 7409 ωcom 7855 1^st c1st 7973 2^nd c2nd 7974 ↑_m cmap 8820 Xcixp 8891 ≼ cdom 8937 Fincfn 8939 ℝcr 11109 ℚcq 12932 ℝ⁺crp 12974 [,)cico 13326 distcds 17206 TopOpenctopn 17367 ∞Metcxmet 20929 Metcmet 20930 ballcbl 20931 MetOpencmopn 20934 ℝ_fldcrefld 21157 freeLMod cfrlm 21301 TopOnctopon 22412 toℂPreHilctcph 24684 ℝ^crrx 24900 volncvoln 45254

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 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5286 ax-sep 5300 ax-nul 5307 ax-pow 5364 ax-pr 5428 ax-un 7725 ax-inf2 9636 ax-cc 10430 ax-ac2 10458 ax-cnex 11166 ax-resscn 11167 ax-1cn 11168 ax-icn 11169 ax-addcl 11170 ax-addrcl 11171 ax-mulcl 11172 ax-mulrcl 11173 ax-mulcom 11174 ax-addass 11175 ax-mulass 11176 ax-distr 11177 ax-i2m1 11178 ax-1ne0 11179 ax-1rid 11180 ax-rnegex 11181 ax-rrecex 11182 ax-cnre 11183 ax-pre-lttri 11184 ax-pre-lttrn 11185 ax-pre-ltadd 11186 ax-pre-mulgt0 11187 ax-pre-sup 11188 ax-addf 11189 ax-mulf 11190

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-pss 3968 df-nul 4324 df-if 4530 df-pw 4605 df-sn 4630 df-pr 4632 df-tp 4634 df-op 4636 df-uni 4910 df-int 4952 df-iun 5000 df-iin 5001 df-disj 5115 df-br 5150 df-opab 5212 df-mpt 5233 df-tr 5267 df-id 5575 df-eprel 5581 df-po 5589 df-so 5590 df-fr 5632 df-se 5633 df-we 5634 df-xp 5683 df-rel 5684 df-cnv 5685 df-co 5686 df-dm 5687 df-rn 5688 df-res 5689 df-ima 5690 df-pred 6301 df-ord 6368 df-on 6369 df-lim 6370 df-suc 6371 df-iota 6496 df-fun 6546 df-fn 6547 df-f 6548 df-f1 6549 df-fo 6550 df-f1o 6551 df-fv 6552 df-isom 6553 df-riota 7365 df-ov 7412 df-oprab 7413 df-mpo 7414 df-of 7670 df-om 7856 df-1st 7975 df-2nd 7976 df-supp 8147 df-tpos 8211 df-frecs 8266 df-wrecs 8297 df-recs 8371 df-rdg 8410 df-1o 8466 df-2o 8467 df-oadd 8470 df-omul 8471 df-er 8703 df-map 8822 df-pm 8823 df-ixp 8892 df-en 8940 df-dom 8941 df-sdom 8942 df-fin 8943 df-fsupp 9362 df-fi 9406 df-sup 9437 df-inf 9438 df-oi 9505 df-dju 9896 df-card 9934 df-acn 9937 df-ac 10111 df-pnf 11250 df-mnf 11251 df-xr 11252 df-ltxr 11253 df-le 11254 df-sub 11446 df-neg 11447 df-div 11872 df-nn 12213 df-2 12275 df-3 12276 df-4 12277 df-5 12278 df-6 12279 df-7 12280 df-8 12281 df-9 12282 df-n0 12473 df-z 12559 df-dec 12678 df-uz 12823 df-q 12933 df-rp 12975 df-xneg 13092 df-xadd 13093 df-xmul 13094 df-ioo 13328 df-ico 13330 df-icc 13331 df-fz 13485 df-fzo 13628 df-fl 13757 df-seq 13967 df-exp 14028 df-hash 14291 df-cj 15046 df-re 15047 df-im 15048 df-sqrt 15182 df-abs 15183 df-clim 15432 df-rlim 15433 df-sum 15633 df-prod 15850 df-struct 17080 df-sets 17097 df-slot 17115 df-ndx 17127 df-base 17145 df-ress 17174 df-plusg 17210 df-mulr 17211 df-starv 17212 df-sca 17213 df-vsca 17214 df-ip 17215 df-tset 17216 df-ple 17217 df-ds 17219 df-unif 17220 df-hom 17221 df-cco 17222 df-rest 17368 df-topn 17369 df-0g 17387 df-gsum 17388 df-topgen 17389 df-prds 17393 df-pws 17395 df-mgm 18561 df-sgrp 18610 df-mnd 18626 df-mhm 18671 df-submnd 18672 df-grp 18822 df-minusg 18823 df-sbg 18824 df-subg 19003 df-ghm 19090 df-cntz 19181 df-cmn 19650 df-abl 19651 df-mgp 19988 df-ur 20005 df-ring 20058 df-cring 20059 df-oppr 20150 df-dvdsr 20171 df-unit 20172 df-invr 20202 df-dvr 20215 df-rnghom 20251 df-subrg 20317 df-drng 20359 df-field 20360 df-abv 20425 df-staf 20453 df-srng 20454 df-lmod 20473 df-lss 20543 df-lmhm 20633 df-lvec 20714 df-sra 20785 df-rgmod 20786 df-psmet 20936 df-xmet 20937 df-met 20938 df-bl 20939 df-mopn 20940 df-cnfld 20945 df-refld 21158 df-phl 21179 df-dsmm 21287 df-frlm 21302 df-top 22396 df-topon 22413 df-topsp 22435 df-bases 22449 df-cmp 22891 df-xms 23826 df-ms 23827 df-nm 24091 df-ngp 24092 df-tng 24093 df-nrg 24094 df-nlm 24095 df-clm 24579 df-cph 24685 df-tcph 24686 df-rrx 24902 df-ovol 24981 df-vol 24982 df-salg 45025 df-sumge0 45079 df-mea 45166 df-ome 45206 df-caragen 45208 df-ovoln 45253 df-voln 45255

This theorem is referenced by: opnvonmbl 45350

W3C validator