dyadmbl - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > dyadmbl		Structured version Visualization version GIF version

Theorem dyadmbl 24179

Description: Any union of dyadic rational intervals is measurable. (Contributed by Mario Carneiro, 26-Mar-2015.)

**Hypotheses**
Ref	Expression
dyadmbl.1	⊢ 𝐹 = (𝑥 ∈ ℤ, 𝑦 ∈ ℕ₀ ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)
dyadmbl.2	⊢ 𝐺 = {𝑧 ∈ 𝐴 ∣ ∀𝑤 ∈ 𝐴 (([,]‘𝑧) ⊆ ([,]‘𝑤) → 𝑧 = 𝑤)}
dyadmbl.3	⊢ (𝜑 → 𝐴 ⊆ ran 𝐹)

**Assertion**
Ref	Expression
dyadmbl	⊢ (𝜑 → ∪ ([,] “ 𝐴) ∈ dom vol)

Distinct variable groups: 𝑥,𝑦 𝑧,𝑤,𝜑 𝑥,𝑤,𝑦,𝐴,𝑧 𝑧,𝐺 𝑤,𝐹,𝑥,𝑦,𝑧 Allowed substitution hints: 𝜑(𝑥,𝑦) 𝐺(𝑥,𝑦,𝑤)

Proof of Theorem dyadmbl Dummy variables 𝑓 𝑎 𝑏 𝑛 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		dyadmbl.1	. . 3 ⊢ 𝐹 = (𝑥 ∈ ℤ, 𝑦 ∈ ℕ₀ ↦ ⟨(𝑥 / (2↑𝑦)), ((𝑥 + 1) / (2↑𝑦))⟩)
2		dyadmbl.2	. . 3 ⊢ 𝐺 = {𝑧 ∈ 𝐴 ∣ ∀𝑤 ∈ 𝐴 (([,]‘𝑧) ⊆ ([,]‘𝑤) → 𝑧 = 𝑤)}
3		dyadmbl.3	. . 3 ⊢ (𝜑 → 𝐴 ⊆ ran 𝐹)
4	1, 2, 3	dyadmbllem 24178	. 2 ⊢ (𝜑 → ∪ ([,] “ 𝐴) = ∪ ([,] “ 𝐺))
5		isfinite 9096	. . . 4 ⊢ (𝐺 ∈ Fin ↔ 𝐺 ≺ ω)
6		iccf 12818	. . . . . 6 ⊢ [,]:(ℝ^* × ℝ^)⟶𝒫 ℝ^
7		ffun 6498	. . . . . 6 ⊢ ([,]:(ℝ^* × ℝ^)⟶𝒫 ℝ^ → Fun [,])
8		funiunfv 6988	. . . . . 6 ⊢ (Fun [,] → ∪ 𝑛 ∈ 𝐺 ([,]‘𝑛) = ∪ ([,] “ 𝐺))
9	6, 7, 8	mp2b 10	. . . . 5 ⊢ ∪ 𝑛 ∈ 𝐺 ([,]‘𝑛) = ∪ ([,] “ 𝐺)
10		simpr 487	. . . . . 6 ⊢ ((𝜑 ∧ 𝐺 ∈ Fin) → 𝐺 ∈ Fin)
11	2	ssrab3 4040	. . . . . . . . . . . . . . 15 ⊢ 𝐺 ⊆ 𝐴
12	11, 3	sstrid 3961	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐺 ⊆ ran 𝐹)
13	1	dyadf 24170	. . . . . . . . . . . . . . . 16 ⊢ 𝐹:(ℤ × ℕ₀)⟶( ≤ ∩ (ℝ × ℝ))
14		frn 6501	. . . . . . . . . . . . . . . 16 ⊢ (𝐹:(ℤ × ℕ₀)⟶( ≤ ∩ (ℝ × ℝ)) → ran 𝐹 ⊆ ( ≤ ∩ (ℝ × ℝ)))
15	13, 14	ax-mp 5	. . . . . . . . . . . . . . 15 ⊢ ran 𝐹 ⊆ ( ≤ ∩ (ℝ × ℝ))
16		inss2 4189	. . . . . . . . . . . . . . 15 ⊢ ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ × ℝ)
17	15, 16	sstri 3959	. . . . . . . . . . . . . 14 ⊢ ran 𝐹 ⊆ (ℝ × ℝ)
18	12, 17	sstrdi 3962	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐺 ⊆ (ℝ × ℝ))
19	18	adantr 483	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝐺 ∈ Fin) → 𝐺 ⊆ (ℝ × ℝ))
20	19	sselda 3950	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝐺 ∈ Fin) ∧ 𝑛 ∈ 𝐺) → 𝑛 ∈ (ℝ × ℝ))
21		1st2nd2 7709	. . . . . . . . . . 11 ⊢ (𝑛 ∈ (ℝ × ℝ) → 𝑛 = ⟨(1^st ‘𝑛), (2^nd ‘𝑛)⟩)
22	20, 21	syl 17	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝐺 ∈ Fin) ∧ 𝑛 ∈ 𝐺) → 𝑛 = ⟨(1^st ‘𝑛), (2^nd ‘𝑛)⟩)
23	22	fveq2d 6655	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝐺 ∈ Fin) ∧ 𝑛 ∈ 𝐺) → ([,]‘𝑛) = ([,]‘⟨(1^st ‘𝑛), (2^nd ‘𝑛)⟩))
24		df-ov 7140	. . . . . . . . 9 ⊢ ((1^st ‘𝑛)[,](2^nd ‘𝑛)) = ([,]‘⟨(1^st ‘𝑛), (2^nd ‘𝑛)⟩)
25	23, 24	syl6eqr 2873	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐺 ∈ Fin) ∧ 𝑛 ∈ 𝐺) → ([,]‘𝑛) = ((1^st ‘𝑛)[,](2^nd ‘𝑛)))
26		xp1st 7702	. . . . . . . . . 10 ⊢ (𝑛 ∈ (ℝ × ℝ) → (1^st ‘𝑛) ∈ ℝ)
27	20, 26	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝐺 ∈ Fin) ∧ 𝑛 ∈ 𝐺) → (1^st ‘𝑛) ∈ ℝ)
28		xp2nd 7703	. . . . . . . . . 10 ⊢ (𝑛 ∈ (ℝ × ℝ) → (2^nd ‘𝑛) ∈ ℝ)
29	20, 28	syl 17	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝐺 ∈ Fin) ∧ 𝑛 ∈ 𝐺) → (2^nd ‘𝑛) ∈ ℝ)
30		iccmbl 24145	. . . . . . . . 9 ⊢ (((1^st ‘𝑛) ∈ ℝ ∧ (2^nd ‘𝑛) ∈ ℝ) → ((1^st ‘𝑛)[,](2^nd ‘𝑛)) ∈ dom vol)
31	27, 29, 30	syl2anc 586	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝐺 ∈ Fin) ∧ 𝑛 ∈ 𝐺) → ((1^st ‘𝑛)[,](2^nd ‘𝑛)) ∈ dom vol)
32	25, 31	eqeltrd 2911	. . . . . . 7 ⊢ (((𝜑 ∧ 𝐺 ∈ Fin) ∧ 𝑛 ∈ 𝐺) → ([,]‘𝑛) ∈ dom vol)
33	32	ralrimiva 3177	. . . . . 6 ⊢ ((𝜑 ∧ 𝐺 ∈ Fin) → ∀𝑛 ∈ 𝐺 ([,]‘𝑛) ∈ dom vol)
34		finiunmbl 24123	. . . . . 6 ⊢ ((𝐺 ∈ Fin ∧ ∀𝑛 ∈ 𝐺 ([,]‘𝑛) ∈ dom vol) → ∪ 𝑛 ∈ 𝐺 ([,]‘𝑛) ∈ dom vol)
35	10, 33, 34	syl2anc 586	. . . . 5 ⊢ ((𝜑 ∧ 𝐺 ∈ Fin) → ∪ 𝑛 ∈ 𝐺 ([,]‘𝑛) ∈ dom vol)
36	9, 35	eqeltrrid 2916	. . . 4 ⊢ ((𝜑 ∧ 𝐺 ∈ Fin) → ∪ ([,] “ 𝐺) ∈ dom vol)
37	5, 36	sylan2br 596	. . 3 ⊢ ((𝜑 ∧ 𝐺 ≺ ω) → ∪ ([,] “ 𝐺) ∈ dom vol)
38		rnco2 6087	. . . . . . . . 9 ⊢ ran ([,] ∘ 𝑓) = ([,] “ ran 𝑓)
39		f1ofo 6603	. . . . . . . . . . . 12 ⊢ (𝑓:ℕ–1-1-onto→𝐺 → 𝑓:ℕ–onto→𝐺)
40	39	adantl 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → 𝑓:ℕ–onto→𝐺)
41		forn 6574	. . . . . . . . . . 11 ⊢ (𝑓:ℕ–onto→𝐺 → ran 𝑓 = 𝐺)
42	40, 41	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → ran 𝑓 = 𝐺)
43	42	imaeq2d 5910	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → ([,] “ ran 𝑓) = ([,] “ 𝐺))
44	38, 43	syl5eq 2867	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → ran ([,] ∘ 𝑓) = ([,] “ 𝐺))
45	44	unieqd 4833	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → ∪ ran ([,] ∘ 𝑓) = ∪ ([,] “ 𝐺))
46		f1of 6596	. . . . . . . . 9 ⊢ (𝑓:ℕ–1-1-onto→𝐺 → 𝑓:ℕ⟶𝐺)
47	12, 15	sstrdi 3962	. . . . . . . . 9 ⊢ (𝜑 → 𝐺 ⊆ ( ≤ ∩ (ℝ × ℝ)))
48		fss 6508	. . . . . . . . 9 ⊢ ((𝑓:ℕ⟶𝐺 ∧ 𝐺 ⊆ ( ≤ ∩ (ℝ × ℝ))) → 𝑓:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
49	46, 47, 48	syl2anr 598	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → 𝑓:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
50		fss 6508	. . . . . . . . . . . . . 14 ⊢ ((𝑓:ℕ⟶𝐺 ∧ 𝐺 ⊆ ran 𝐹) → 𝑓:ℕ⟶ran 𝐹)
51	46, 12, 50	syl2anr 598	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → 𝑓:ℕ⟶ran 𝐹)
52		simpl 485	. . . . . . . . . . . . 13 ⊢ ((𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ) → 𝑎 ∈ ℕ)
53		ffvelrn 6830	. . . . . . . . . . . . 13 ⊢ ((𝑓:ℕ⟶ran 𝐹 ∧ 𝑎 ∈ ℕ) → (𝑓‘𝑎) ∈ ran 𝐹)
54	51, 52, 53	syl2an 597	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (𝑓‘𝑎) ∈ ran 𝐹)
55		simpr 487	. . . . . . . . . . . . 13 ⊢ ((𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ) → 𝑏 ∈ ℕ)
56		ffvelrn 6830	. . . . . . . . . . . . 13 ⊢ ((𝑓:ℕ⟶ran 𝐹 ∧ 𝑏 ∈ ℕ) → (𝑓‘𝑏) ∈ ran 𝐹)
57	51, 55, 56	syl2an 597	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (𝑓‘𝑏) ∈ ran 𝐹)
58	1	dyaddisj 24175	. . . . . . . . . . . 12 ⊢ (((𝑓‘𝑎) ∈ ran 𝐹 ∧ (𝑓‘𝑏) ∈ ran 𝐹) → (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘(𝑓‘𝑏)) ∨ ([,]‘(𝑓‘𝑏)) ⊆ ([,]‘(𝑓‘𝑎)) ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅))
59	54, 57, 58	syl2anc 586	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘(𝑓‘𝑏)) ∨ ([,]‘(𝑓‘𝑏)) ⊆ ([,]‘(𝑓‘𝑎)) ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅))
60		fveq2 6651	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = (𝑓‘𝑏) → ([,]‘𝑤) = ([,]‘(𝑓‘𝑏)))
61	60	sseq2d 3982	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = (𝑓‘𝑏) → (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘𝑤) ↔ ([,]‘(𝑓‘𝑎)) ⊆ ([,]‘(𝑓‘𝑏))))
62		eqeq2 2832	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = (𝑓‘𝑏) → ((𝑓‘𝑎) = 𝑤 ↔ (𝑓‘𝑎) = (𝑓‘𝑏)))
63	61, 62	imbi12d 347	. . . . . . . . . . . . . 14 ⊢ (𝑤 = (𝑓‘𝑏) → ((([,]‘(𝑓‘𝑎)) ⊆ ([,]‘𝑤) → (𝑓‘𝑎) = 𝑤) ↔ (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘(𝑓‘𝑏)) → (𝑓‘𝑎) = (𝑓‘𝑏))))
64	46	adantl 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → 𝑓:ℕ⟶𝐺)
65		ffvelrn 6830	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:ℕ⟶𝐺 ∧ 𝑎 ∈ ℕ) → (𝑓‘𝑎) ∈ 𝐺)
66	64, 52, 65	syl2an 597	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (𝑓‘𝑎) ∈ 𝐺)
67		fveq2 6651	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 = (𝑓‘𝑎) → ([,]‘𝑧) = ([,]‘(𝑓‘𝑎)))
68	67	sseq1d 3981	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = (𝑓‘𝑎) → (([,]‘𝑧) ⊆ ([,]‘𝑤) ↔ ([,]‘(𝑓‘𝑎)) ⊆ ([,]‘𝑤)))
69		eqeq1 2824	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = (𝑓‘𝑎) → (𝑧 = 𝑤 ↔ (𝑓‘𝑎) = 𝑤))
70	68, 69	imbi12d 347	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = (𝑓‘𝑎) → ((([,]‘𝑧) ⊆ ([,]‘𝑤) → 𝑧 = 𝑤) ↔ (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘𝑤) → (𝑓‘𝑎) = 𝑤)))
71	70	ralbidv 3192	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = (𝑓‘𝑎) → (∀𝑤 ∈ 𝐴 (([,]‘𝑧) ⊆ ([,]‘𝑤) → 𝑧 = 𝑤) ↔ ∀𝑤 ∈ 𝐴 (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘𝑤) → (𝑓‘𝑎) = 𝑤)))
72	71, 2	elrab2 3669	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓‘𝑎) ∈ 𝐺 ↔ ((𝑓‘𝑎) ∈ 𝐴 ∧ ∀𝑤 ∈ 𝐴 (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘𝑤) → (𝑓‘𝑎) = 𝑤)))
73	72	simprbi 499	. . . . . . . . . . . . . . 15 ⊢ ((𝑓‘𝑎) ∈ 𝐺 → ∀𝑤 ∈ 𝐴 (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘𝑤) → (𝑓‘𝑎) = 𝑤))
74	66, 73	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → ∀𝑤 ∈ 𝐴 (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘𝑤) → (𝑓‘𝑎) = 𝑤))
75		ffvelrn 6830	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓:ℕ⟶𝐺 ∧ 𝑏 ∈ ℕ) → (𝑓‘𝑏) ∈ 𝐺)
76	64, 55, 75	syl2an 597	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (𝑓‘𝑏) ∈ 𝐺)
77	11, 76	sseldi 3948	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (𝑓‘𝑏) ∈ 𝐴)
78	63, 74, 77	rspcdva 3612	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘(𝑓‘𝑏)) → (𝑓‘𝑎) = (𝑓‘𝑏)))
79		f1of1 6595	. . . . . . . . . . . . . . . 16 ⊢ (𝑓:ℕ–1-1-onto→𝐺 → 𝑓:ℕ–1-1→𝐺)
80	79	adantl 484	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → 𝑓:ℕ–1-1→𝐺)
81		f1fveq 7001	. . . . . . . . . . . . . . 15 ⊢ ((𝑓:ℕ–1-1→𝐺 ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → ((𝑓‘𝑎) = (𝑓‘𝑏) ↔ 𝑎 = 𝑏))
82	80, 81	sylan 582	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → ((𝑓‘𝑎) = (𝑓‘𝑏) ↔ 𝑎 = 𝑏))
83		orc 863	. . . . . . . . . . . . . 14 ⊢ (𝑎 = 𝑏 → (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅))
84	82, 83	syl6bi 255	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → ((𝑓‘𝑎) = (𝑓‘𝑏) → (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅)))
85	78, 84	syld 47	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (([,]‘(𝑓‘𝑎)) ⊆ ([,]‘(𝑓‘𝑏)) → (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅)))
86		fveq2 6651	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = (𝑓‘𝑎) → ([,]‘𝑤) = ([,]‘(𝑓‘𝑎)))
87	86	sseq2d 3982	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = (𝑓‘𝑎) → (([,]‘(𝑓‘𝑏)) ⊆ ([,]‘𝑤) ↔ ([,]‘(𝑓‘𝑏)) ⊆ ([,]‘(𝑓‘𝑎))))
88		eqeq2 2832	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = (𝑓‘𝑎) → ((𝑓‘𝑏) = 𝑤 ↔ (𝑓‘𝑏) = (𝑓‘𝑎)))
89		eqcom 2827	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓‘𝑏) = (𝑓‘𝑎) ↔ (𝑓‘𝑎) = (𝑓‘𝑏))
90	88, 89	syl6bb 289	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = (𝑓‘𝑎) → ((𝑓‘𝑏) = 𝑤 ↔ (𝑓‘𝑎) = (𝑓‘𝑏)))
91	87, 90	imbi12d 347	. . . . . . . . . . . . . 14 ⊢ (𝑤 = (𝑓‘𝑎) → ((([,]‘(𝑓‘𝑏)) ⊆ ([,]‘𝑤) → (𝑓‘𝑏) = 𝑤) ↔ (([,]‘(𝑓‘𝑏)) ⊆ ([,]‘(𝑓‘𝑎)) → (𝑓‘𝑎) = (𝑓‘𝑏))))
92		fveq2 6651	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 = (𝑓‘𝑏) → ([,]‘𝑧) = ([,]‘(𝑓‘𝑏)))
93	92	sseq1d 3981	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = (𝑓‘𝑏) → (([,]‘𝑧) ⊆ ([,]‘𝑤) ↔ ([,]‘(𝑓‘𝑏)) ⊆ ([,]‘𝑤)))
94		eqeq1 2824	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑧 = (𝑓‘𝑏) → (𝑧 = 𝑤 ↔ (𝑓‘𝑏) = 𝑤))
95	93, 94	imbi12d 347	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑧 = (𝑓‘𝑏) → ((([,]‘𝑧) ⊆ ([,]‘𝑤) → 𝑧 = 𝑤) ↔ (([,]‘(𝑓‘𝑏)) ⊆ ([,]‘𝑤) → (𝑓‘𝑏) = 𝑤)))
96	95	ralbidv 3192	. . . . . . . . . . . . . . . . 17 ⊢ (𝑧 = (𝑓‘𝑏) → (∀𝑤 ∈ 𝐴 (([,]‘𝑧) ⊆ ([,]‘𝑤) → 𝑧 = 𝑤) ↔ ∀𝑤 ∈ 𝐴 (([,]‘(𝑓‘𝑏)) ⊆ ([,]‘𝑤) → (𝑓‘𝑏) = 𝑤)))
97	96, 2	elrab2 3669	. . . . . . . . . . . . . . . 16 ⊢ ((𝑓‘𝑏) ∈ 𝐺 ↔ ((𝑓‘𝑏) ∈ 𝐴 ∧ ∀𝑤 ∈ 𝐴 (([,]‘(𝑓‘𝑏)) ⊆ ([,]‘𝑤) → (𝑓‘𝑏) = 𝑤)))
98	97	simprbi 499	. . . . . . . . . . . . . . 15 ⊢ ((𝑓‘𝑏) ∈ 𝐺 → ∀𝑤 ∈ 𝐴 (([,]‘(𝑓‘𝑏)) ⊆ ([,]‘𝑤) → (𝑓‘𝑏) = 𝑤))
99	76, 98	syl 17	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → ∀𝑤 ∈ 𝐴 (([,]‘(𝑓‘𝑏)) ⊆ ([,]‘𝑤) → (𝑓‘𝑏) = 𝑤))
100	11, 66	sseldi 3948	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (𝑓‘𝑎) ∈ 𝐴)
101	91, 99, 100	rspcdva 3612	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (([,]‘(𝑓‘𝑏)) ⊆ ([,]‘(𝑓‘𝑎)) → (𝑓‘𝑎) = (𝑓‘𝑏)))
102	101, 84	syld 47	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (([,]‘(𝑓‘𝑏)) ⊆ ([,]‘(𝑓‘𝑎)) → (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅)))
103		olc 864	. . . . . . . . . . . . 13 ⊢ ((((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅ → (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅))
104	103	a1i 11	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → ((((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅ → (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅)))
105	85, 102, 104	3jaod 1424	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → ((([,]‘(𝑓‘𝑎)) ⊆ ([,]‘(𝑓‘𝑏)) ∨ ([,]‘(𝑓‘𝑏)) ⊆ ([,]‘(𝑓‘𝑎)) ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅) → (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅)))
106	59, 105	mpd 15	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) ∧ (𝑎 ∈ ℕ ∧ 𝑏 ∈ ℕ)) → (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅))
107	106	ralrimivva 3186	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → ∀𝑎 ∈ ℕ ∀𝑏 ∈ ℕ (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅))
108		2fveq3 6656	. . . . . . . . . 10 ⊢ (𝑎 = 𝑏 → ((,)‘(𝑓‘𝑎)) = ((,)‘(𝑓‘𝑏)))
109	108	disjor 5027	. . . . . . . . 9 ⊢ (Disj 𝑎 ∈ ℕ ((,)‘(𝑓‘𝑎)) ↔ ∀𝑎 ∈ ℕ ∀𝑏 ∈ ℕ (𝑎 = 𝑏 ∨ (((,)‘(𝑓‘𝑎)) ∩ ((,)‘(𝑓‘𝑏))) = ∅))
110	107, 109	sylibr 236	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → Disj 𝑎 ∈ ℕ ((,)‘(𝑓‘𝑎)))
111		eqid 2820	. . . . . . . 8 ⊢ seq1( + , ((abs ∘ − ) ∘ 𝑓)) = seq1( + , ((abs ∘ − ) ∘ 𝑓))
112	49, 110, 111	uniiccmbl 24169	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → ∪ ran ([,] ∘ 𝑓) ∈ dom vol)
113	45, 112	eqeltrrd 2912	. . . . . 6 ⊢ ((𝜑 ∧ 𝑓:ℕ–1-1-onto→𝐺) → ∪ ([,] “ 𝐺) ∈ dom vol)
114	113	ex 415	. . . . 5 ⊢ (𝜑 → (𝑓:ℕ–1-1-onto→𝐺 → ∪ ([,] “ 𝐺) ∈ dom vol))
115	114	exlimdv 1934	. . . 4 ⊢ (𝜑 → (∃𝑓 𝑓:ℕ–1-1-onto→𝐺 → ∪ ([,] “ 𝐺) ∈ dom vol))
116		nnenom 13333	. . . . . 6 ⊢ ℕ ≈ ω
117		ensym 8539	. . . . . 6 ⊢ (𝐺 ≈ ω → ω ≈ 𝐺)
118		entr 8542	. . . . . 6 ⊢ ((ℕ ≈ ω ∧ ω ≈ 𝐺) → ℕ ≈ 𝐺)
119	116, 117, 118	sylancr 589	. . . . 5 ⊢ (𝐺 ≈ ω → ℕ ≈ 𝐺)
120		bren 8499	. . . . 5 ⊢ (ℕ ≈ 𝐺 ↔ ∃𝑓 𝑓:ℕ–1-1-onto→𝐺)
121	119, 120	sylib 220	. . . 4 ⊢ (𝐺 ≈ ω → ∃𝑓 𝑓:ℕ–1-1-onto→𝐺)
122	115, 121	impel 508	. . 3 ⊢ ((𝜑 ∧ 𝐺 ≈ ω) → ∪ ([,] “ 𝐺) ∈ dom vol)
123		reex 10609	. . . . . . . . 9 ⊢ ℝ ∈ V
124	123, 123	xpex 7457	. . . . . . . 8 ⊢ (ℝ × ℝ) ∈ V
125	124	inex2 5203	. . . . . . 7 ⊢ ( ≤ ∩ (ℝ × ℝ)) ∈ V
126	125, 15	ssexi 5207	. . . . . 6 ⊢ ran 𝐹 ∈ V
127		ssdomg 8536	. . . . . 6 ⊢ (ran 𝐹 ∈ V → (𝐺 ⊆ ran 𝐹 → 𝐺 ≼ ran 𝐹))
128	126, 12, 127	mpsyl 68	. . . . 5 ⊢ (𝜑 → 𝐺 ≼ ran 𝐹)
129		omelon 9090	. . . . . . . 8 ⊢ ω ∈ On
130		znnen 15545	. . . . . . . . . . . 12 ⊢ ℤ ≈ ℕ
131	130, 116	entri 8544	. . . . . . . . . . 11 ⊢ ℤ ≈ ω
132		nn0ennn 13332	. . . . . . . . . . . 12 ⊢ ℕ₀ ≈ ℕ
133	132, 116	entri 8544	. . . . . . . . . . 11 ⊢ ℕ₀ ≈ ω
134		xpen 8661	. . . . . . . . . . 11 ⊢ ((ℤ ≈ ω ∧ ℕ₀ ≈ ω) → (ℤ × ℕ₀) ≈ (ω × ω))
135	131, 133, 134	mp2an 690	. . . . . . . . . 10 ⊢ (ℤ × ℕ₀) ≈ (ω × ω)
136		xpomen 9422	. . . . . . . . . 10 ⊢ (ω × ω) ≈ ω
137	135, 136	entri 8544	. . . . . . . . 9 ⊢ (ℤ × ℕ₀) ≈ ω
138	137	ensymi 8540	. . . . . . . 8 ⊢ ω ≈ (ℤ × ℕ₀)
139		isnumi 9356	. . . . . . . 8 ⊢ ((ω ∈ On ∧ ω ≈ (ℤ × ℕ₀)) → (ℤ × ℕ₀) ∈ dom card)
140	129, 138, 139	mp2an 690	. . . . . . 7 ⊢ (ℤ × ℕ₀) ∈ dom card
141		ffn 6495	. . . . . . . . 9 ⊢ (𝐹:(ℤ × ℕ₀)⟶( ≤ ∩ (ℝ × ℝ)) → 𝐹 Fn (ℤ × ℕ₀))
142	13, 141	ax-mp 5	. . . . . . . 8 ⊢ 𝐹 Fn (ℤ × ℕ₀)
143		dffn4 6577	. . . . . . . 8 ⊢ (𝐹 Fn (ℤ × ℕ₀) ↔ 𝐹:(ℤ × ℕ₀)–onto→ran 𝐹)
144	142, 143	mpbi 232	. . . . . . 7 ⊢ 𝐹:(ℤ × ℕ₀)–onto→ran 𝐹
145		fodomnum 9464	. . . . . . 7 ⊢ ((ℤ × ℕ₀) ∈ dom card → (𝐹:(ℤ × ℕ₀)–onto→ran 𝐹 → ran 𝐹 ≼ (ℤ × ℕ₀)))
146	140, 144, 145	mp2 9	. . . . . 6 ⊢ ran 𝐹 ≼ (ℤ × ℕ₀)
147		domentr 8549	. . . . . 6 ⊢ ((ran 𝐹 ≼ (ℤ × ℕ₀) ∧ (ℤ × ℕ₀) ≈ ω) → ran 𝐹 ≼ ω)
148	146, 137, 147	mp2an 690	. . . . 5 ⊢ ran 𝐹 ≼ ω
149		domtr 8543	. . . . 5 ⊢ ((𝐺 ≼ ran 𝐹 ∧ ran 𝐹 ≼ ω) → 𝐺 ≼ ω)
150	128, 148, 149	sylancl 588	. . . 4 ⊢ (𝜑 → 𝐺 ≼ ω)
151		brdom2 8520	. . . 4 ⊢ (𝐺 ≼ ω ↔ (𝐺 ≺ ω ∨ 𝐺 ≈ ω))
152	150, 151	sylib 220	. . 3 ⊢ (𝜑 → (𝐺 ≺ ω ∨ 𝐺 ≈ ω))
153	37, 122, 152	mpjaodan 955	. 2 ⊢ (𝜑 → ∪ ([,] “ 𝐺) ∈ dom vol)
154	4, 153	eqeltrd 2911	1 ⊢ (𝜑 → ∪ ([,] “ 𝐴) ∈ dom vol)

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 208 ∧ wa 398 ∨ wo 843 ∨ w3o 1082 = wceq 1537 ∃wex 1780 ∈ wcel 2114 ∀wral 3133 {crab 3137 Vcvv 3481 ∩ cin 3918 ⊆ wss 3919 ∅c0 4274 𝒫 cpw 4520 ⟨cop 4554 ∪ cuni 4819 ∪ ciun 4900 Disj wdisj 5012 class class class wbr 5047 × cxp 5534 dom cdm 5536 ran crn 5537 “ cima 5539 ∘ ccom 5540 Oncon0 6172 Fun wfun 6330 Fn wfn 6331 ⟶wf 6332 –1-1→wf1 6333 –onto→wfo 6334 –1-1-onto→wf1o 6335 ‘cfv 6336 (class class class)co 7137 ∈ cmpo 7139 ωcom 7561 1^st c1st 7668 2^nd c2nd 7669 ≈ cen 8487 ≼ cdom 8488 ≺ csdm 8489 Fincfn 8490 cardccrd 9345 ℝcr 10517 1c1 10519 + caddc 10521 ℝ^*cxr 10655 ≤ cle 10657 − cmin 10851 / cdiv 11278 ℕcn 11619 2c2 11674 ℕ₀cn0 11879 ℤcz 11963 (,)cioo 12720 [,]cicc 12723 seqcseq 13354 ↑cexp 13414 abscabs 14573 volcvol 24042

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 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2792 ax-rep 5171 ax-sep 5184 ax-nul 5191 ax-pow 5247 ax-pr 5311 ax-un 7442 ax-inf2 9085 ax-cnex 10574 ax-resscn 10575 ax-1cn 10576 ax-icn 10577 ax-addcl 10578 ax-addrcl 10579 ax-mulcl 10580 ax-mulrcl 10581 ax-mulcom 10582 ax-addass 10583 ax-mulass 10584 ax-distr 10585 ax-i2m1 10586 ax-1ne0 10587 ax-1rid 10588 ax-rnegex 10589 ax-rrecex 10590 ax-cnre 10591 ax-pre-lttri 10592 ax-pre-lttrn 10593 ax-pre-ltadd 10594 ax-pre-mulgt0 10595 ax-pre-sup 10596

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-fal 1550 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2653 df-clab 2799 df-cleq 2813 df-clel 2891 df-nfc 2959 df-ne 3012 df-nel 3119 df-ral 3138 df-rex 3139 df-reu 3140 df-rmo 3141 df-rab 3142 df-v 3483 df-sbc 3759 df-csb 3867 df-dif 3922 df-un 3924 df-in 3926 df-ss 3935 df-pss 3937 df-nul 4275 df-if 4449 df-pw 4522 df-sn 4549 df-pr 4551 df-tp 4553 df-op 4555 df-uni 4820 df-int 4858 df-iun 4902 df-disj 5013 df-br 5048 df-opab 5110 df-mpt 5128 df-tr 5154 df-id 5441 df-eprel 5446 df-po 5455 df-so 5456 df-fr 5495 df-se 5496 df-we 5497 df-xp 5542 df-rel 5543 df-cnv 5544 df-co 5545 df-dm 5546 df-rn 5547 df-res 5548 df-ima 5549 df-pred 6129 df-ord 6175 df-on 6176 df-lim 6177 df-suc 6178 df-iota 6295 df-fun 6338 df-fn 6339 df-f 6340 df-f1 6341 df-fo 6342 df-f1o 6343 df-fv 6344 df-isom 6345 df-riota 7095 df-ov 7140 df-oprab 7141 df-mpo 7142 df-of 7390 df-om 7562 df-1st 7670 df-2nd 7671 df-wrecs 7928 df-recs 7989 df-rdg 8027 df-1o 8083 df-2o 8084 df-oadd 8087 df-omul 8088 df-er 8270 df-map 8389 df-pm 8390 df-en 8491 df-dom 8492 df-sdom 8493 df-fin 8494 df-fi 8856 df-sup 8887 df-inf 8888 df-oi 8955 df-dju 9311 df-card 9349 df-acn 9352 df-pnf 10658 df-mnf 10659 df-xr 10660 df-ltxr 10661 df-le 10662 df-sub 10853 df-neg 10854 df-div 11279 df-nn 11620 df-2 11682 df-3 11683 df-4 11684 df-n0 11880 df-z 11964 df-uz 12226 df-q 12331 df-rp 12372 df-xneg 12489 df-xadd 12490 df-xmul 12491 df-ioo 12724 df-ico 12726 df-icc 12727 df-fz 12878 df-fzo 13019 df-fl 13147 df-seq 13355 df-exp 13415 df-hash 13676 df-cj 14438 df-re 14439 df-im 14440 df-sqrt 14574 df-abs 14575 df-clim 14825 df-rlim 14826 df-sum 15023 df-rest 16674 df-topgen 16695 df-psmet 20515 df-xmet 20516 df-met 20517 df-bl 20518 df-mopn 20519 df-top 21480 df-topon 21497 df-bases 21532 df-cmp 21973 df-ovol 24043 df-vol 24044

This theorem is referenced by: opnmbllem 24180

W3C validator