Theorem uniioovol 24180

Description: A disjoint union of open intervals has volume equal to the sum of the volume of the intervals. (This proof does not use countable choice, unlike voliun 24155.) Lemma 565Ca of [Fremlin5] p. 213. (Contributed by Mario Carneiro, 26-Mar-2015.)

Hypotheses

Ref	Expression
uniioombl.1	⊢ (𝜑 → 𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
uniioombl.2	⊢ (𝜑 → Disj 𝑥 ∈ ℕ ((,)‘(𝐹‘𝑥)))
uniioombl.3	⊢ 𝑆 = seq1( + , ((abs ∘ − ) ∘ 𝐹))

Assertion

Ref	Expression
uniioovol	⊢ (𝜑 → (vol*‘∪ ran ((,) ∘ 𝐹)) = sup(ran 𝑆, ℝ*, < ))

Distinct variable groups:   𝑥,𝐹   𝜑,𝑥

Allowed substitution hint:   𝑆(𝑥)

Proof of Theorem uniioovol

Dummy variables 𝑛 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ioof 12836	. . . . . 6 ⊢ (,):(ℝ* × ℝ*)⟶𝒫 ℝ
2		uniioombl.1	. . . . . . 7 ⊢ (𝜑 → 𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
3		inss2 4206	. . . . . . . 8 ⊢ ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ × ℝ)
4		rexpssxrxp 10686	. . . . . . . 8 ⊢ (ℝ × ℝ) ⊆ (ℝ* × ℝ*)
5	3, 4	sstri 3976	. . . . . . 7 ⊢ ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ* × ℝ*)
6		fss 6527	. . . . . . 7 ⊢ ((𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ ( ≤ ∩ (ℝ × ℝ)) ⊆ (ℝ* × ℝ*)) → 𝐹:ℕ⟶(ℝ* × ℝ*))
7	2, 5, 6	sylancl 588	. . . . . 6 ⊢ (𝜑 → 𝐹:ℕ⟶(ℝ* × ℝ*))
8		fco 6531	. . . . . 6 ⊢ (((,):(ℝ* × ℝ*)⟶𝒫 ℝ ∧ 𝐹:ℕ⟶(ℝ* × ℝ*)) → ((,) ∘ 𝐹):ℕ⟶𝒫 ℝ)
9	1, 7, 8	sylancr 589	. . . . 5 ⊢ (𝜑 → ((,) ∘ 𝐹):ℕ⟶𝒫 ℝ)
10	9	frnd 6521	. . . 4 ⊢ (𝜑 → ran ((,) ∘ 𝐹) ⊆ 𝒫 ℝ)
11		sspwuni 5022	. . . 4 ⊢ (ran ((,) ∘ 𝐹) ⊆ 𝒫 ℝ ↔ ∪ ran ((,) ∘ 𝐹) ⊆ ℝ)
12	10, 11	sylib 220	. . 3 ⊢ (𝜑 → ∪ ran ((,) ∘ 𝐹) ⊆ ℝ)
13		ovolcl 24079	. . 3 ⊢ (∪ ran ((,) ∘ 𝐹) ⊆ ℝ → (vol*‘∪ ran ((,) ∘ 𝐹)) ∈ ℝ*)
14	12, 13	syl 17	. 2 ⊢ (𝜑 → (vol*‘∪ ran ((,) ∘ 𝐹)) ∈ ℝ*)
15		eqid 2821	. . . . . 6 ⊢ ((abs ∘ − ) ∘ 𝐹) = ((abs ∘ − ) ∘ 𝐹)
16		uniioombl.3	. . . . . 6 ⊢ 𝑆 = seq1( + , ((abs ∘ − ) ∘ 𝐹))
17	15, 16	ovolsf 24073	. . . . 5 ⊢ (𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑆:ℕ⟶(0[,)+∞))
18		frn 6520	. . . . 5 ⊢ (𝑆:ℕ⟶(0[,)+∞) → ran 𝑆 ⊆ (0[,)+∞))
19	2, 17, 18	3syl 18	. . . 4 ⊢ (𝜑 → ran 𝑆 ⊆ (0[,)+∞))
20		icossxr 12822	. . . 4 ⊢ (0[,)+∞) ⊆ ℝ*
21	19, 20	sstrdi 3979	. . 3 ⊢ (𝜑 → ran 𝑆 ⊆ ℝ*)
22		supxrcl 12709	. . 3 ⊢ (ran 𝑆 ⊆ ℝ* → sup(ran 𝑆, ℝ*, < ) ∈ ℝ*)
23	21, 22	syl 17	. 2 ⊢ (𝜑 → sup(ran 𝑆, ℝ*, < ) ∈ ℝ*)
24		ssid 3989	. . 3 ⊢ ∪ ran ((,) ∘ 𝐹) ⊆ ∪ ran ((,) ∘ 𝐹)
25	16	ovollb 24080	. . 3 ⊢ ((𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ ∪ ran ((,) ∘ 𝐹) ⊆ ∪ ran ((,) ∘ 𝐹)) → (vol*‘∪ ran ((,) ∘ 𝐹)) ≤ sup(ran 𝑆, ℝ*, < ))
26	2, 24, 25	sylancl 588	. 2 ⊢ (𝜑 → (vol*‘∪ ran ((,) ∘ 𝐹)) ≤ sup(ran 𝑆, ℝ*, < ))
27	2	adantr 483	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
28		elfznn 12937	. . . . . . . . . . 11 ⊢ (𝑥 ∈ (1...𝑛) → 𝑥 ∈ ℕ)
29	15	ovolfsval 24071	. . . . . . . . . . 11 ⊢ ((𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑥 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐹)‘𝑥) = ((2nd ‘(𝐹‘𝑥)) − (1st ‘(𝐹‘𝑥))))
30	27, 28, 29	syl2an 597	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (((abs ∘ − ) ∘ 𝐹)‘𝑥) = ((2nd ‘(𝐹‘𝑥)) − (1st ‘(𝐹‘𝑥))))
31		fvco3 6760	. . . . . . . . . . . . . . 15 ⊢ ((𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑥 ∈ ℕ) → (((,) ∘ 𝐹)‘𝑥) = ((,)‘(𝐹‘𝑥)))
32	27, 28, 31	syl2an 597	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (((,) ∘ 𝐹)‘𝑥) = ((,)‘(𝐹‘𝑥)))
33		ffvelrn 6849	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑥 ∈ ℕ) → (𝐹‘𝑥) ∈ ( ≤ ∩ (ℝ × ℝ)))
34	27, 28, 33	syl2an 597	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (𝐹‘𝑥) ∈ ( ≤ ∩ (ℝ × ℝ)))
35	34	elin2d 4176	. . . . . . . . . . . . . . . . 17 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (𝐹‘𝑥) ∈ (ℝ × ℝ))
36		1st2nd2 7728	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐹‘𝑥) ∈ (ℝ × ℝ) → (𝐹‘𝑥) = ⟨(1st ‘(𝐹‘𝑥)), (2nd ‘(𝐹‘𝑥))⟩)
37	35, 36	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (𝐹‘𝑥) = ⟨(1st ‘(𝐹‘𝑥)), (2nd ‘(𝐹‘𝑥))⟩)
38	37	fveq2d 6674	. . . . . . . . . . . . . . 15 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → ((,)‘(𝐹‘𝑥)) = ((,)‘⟨(1st ‘(𝐹‘𝑥)), (2nd ‘(𝐹‘𝑥))⟩))
39		df-ov 7159	. . . . . . . . . . . . . . 15 ⊢ ((1st ‘(𝐹‘𝑥))(,)(2nd ‘(𝐹‘𝑥))) = ((,)‘⟨(1st ‘(𝐹‘𝑥)), (2nd ‘(𝐹‘𝑥))⟩)
40	38, 39	syl6eqr 2874	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → ((,)‘(𝐹‘𝑥)) = ((1st ‘(𝐹‘𝑥))(,)(2nd ‘(𝐹‘𝑥))))
41	32, 40	eqtrd 2856	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (((,) ∘ 𝐹)‘𝑥) = ((1st ‘(𝐹‘𝑥))(,)(2nd ‘(𝐹‘𝑥))))
42		ioombl 24166	. . . . . . . . . . . . 13 ⊢ ((1st ‘(𝐹‘𝑥))(,)(2nd ‘(𝐹‘𝑥))) ∈ dom vol
43	41, 42	eqeltrdi 2921	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (((,) ∘ 𝐹)‘𝑥) ∈ dom vol)
44		mblvol 24131	. . . . . . . . . . . 12 ⊢ ((((,) ∘ 𝐹)‘𝑥) ∈ dom vol → (vol‘(((,) ∘ 𝐹)‘𝑥)) = (vol*‘(((,) ∘ 𝐹)‘𝑥)))
45	43, 44	syl 17	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (vol‘(((,) ∘ 𝐹)‘𝑥)) = (vol*‘(((,) ∘ 𝐹)‘𝑥)))
46	41	fveq2d 6674	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (vol*‘(((,) ∘ 𝐹)‘𝑥)) = (vol*‘((1st ‘(𝐹‘𝑥))(,)(2nd ‘(𝐹‘𝑥)))))
47		ovolfcl 24067	. . . . . . . . . . . . 13 ⊢ ((𝐹:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑥 ∈ ℕ) → ((1st ‘(𝐹‘𝑥)) ∈ ℝ ∧ (2nd ‘(𝐹‘𝑥)) ∈ ℝ ∧ (1st ‘(𝐹‘𝑥)) ≤ (2nd ‘(𝐹‘𝑥))))
48	27, 28, 47	syl2an 597	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → ((1st ‘(𝐹‘𝑥)) ∈ ℝ ∧ (2nd ‘(𝐹‘𝑥)) ∈ ℝ ∧ (1st ‘(𝐹‘𝑥)) ≤ (2nd ‘(𝐹‘𝑥))))
49		ovolioo 24169	. . . . . . . . . . . 12 ⊢ (((1st ‘(𝐹‘𝑥)) ∈ ℝ ∧ (2nd ‘(𝐹‘𝑥)) ∈ ℝ ∧ (1st ‘(𝐹‘𝑥)) ≤ (2nd ‘(𝐹‘𝑥))) → (vol*‘((1st ‘(𝐹‘𝑥))(,)(2nd ‘(𝐹‘𝑥)))) = ((2nd ‘(𝐹‘𝑥)) − (1st ‘(𝐹‘𝑥))))
50	48, 49	syl 17	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (vol*‘((1st ‘(𝐹‘𝑥))(,)(2nd ‘(𝐹‘𝑥)))) = ((2nd ‘(𝐹‘𝑥)) − (1st ‘(𝐹‘𝑥))))
51	45, 46, 50	3eqtrd 2860	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (vol‘(((,) ∘ 𝐹)‘𝑥)) = ((2nd ‘(𝐹‘𝑥)) − (1st ‘(𝐹‘𝑥))))
52	30, 51	eqtr4d 2859	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (((abs ∘ − ) ∘ 𝐹)‘𝑥) = (vol‘(((,) ∘ 𝐹)‘𝑥)))
53		simpr 487	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
54		nnuz 12282	. . . . . . . . . 10 ⊢ ℕ = (ℤ≥‘1)
55	53, 54	eleqtrdi 2923	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ (ℤ≥‘1))
56	48	simp2d 1139	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (2nd ‘(𝐹‘𝑥)) ∈ ℝ)
57	48	simp1d 1138	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (1st ‘(𝐹‘𝑥)) ∈ ℝ)
58	56, 57	resubcld 11068	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → ((2nd ‘(𝐹‘𝑥)) − (1st ‘(𝐹‘𝑥))) ∈ ℝ)
59	51, 58	eqeltrd 2913	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (vol‘(((,) ∘ 𝐹)‘𝑥)) ∈ ℝ)
60	59	recnd 10669	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → (vol‘(((,) ∘ 𝐹)‘𝑥)) ∈ ℂ)
61	52, 55, 60	fsumser 15087	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → Σ𝑥 ∈ (1...𝑛)(vol‘(((,) ∘ 𝐹)‘𝑥)) = (seq1( + , ((abs ∘ − ) ∘ 𝐹))‘𝑛))
62	16	fveq1i 6671	. . . . . . . 8 ⊢ (𝑆‘𝑛) = (seq1( + , ((abs ∘ − ) ∘ 𝐹))‘𝑛)
63	61, 62	syl6reqr 2875	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = Σ𝑥 ∈ (1...𝑛)(vol‘(((,) ∘ 𝐹)‘𝑥)))
64		fzfid 13342	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (1...𝑛) ∈ Fin)
65	43, 59	jca 514	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ 𝑥 ∈ (1...𝑛)) → ((((,) ∘ 𝐹)‘𝑥) ∈ dom vol ∧ (vol‘(((,) ∘ 𝐹)‘𝑥)) ∈ ℝ))
66	65	ralrimiva 3182	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∀𝑥 ∈ (1...𝑛)((((,) ∘ 𝐹)‘𝑥) ∈ dom vol ∧ (vol‘(((,) ∘ 𝐹)‘𝑥)) ∈ ℝ))
67		fz1ssnn 12939	. . . . . . . . 9 ⊢ (1...𝑛) ⊆ ℕ
68		uniioombl.2	. . . . . . . . . . 11 ⊢ (𝜑 → Disj 𝑥 ∈ ℕ ((,)‘(𝐹‘𝑥)))
69	2, 31	sylan 582	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑥 ∈ ℕ) → (((,) ∘ 𝐹)‘𝑥) = ((,)‘(𝐹‘𝑥)))
70	69	disjeq2dv 5036	. . . . . . . . . . 11 ⊢ (𝜑 → (Disj 𝑥 ∈ ℕ (((,) ∘ 𝐹)‘𝑥) ↔ Disj 𝑥 ∈ ℕ ((,)‘(𝐹‘𝑥))))
71	68, 70	mpbird 259	. . . . . . . . . 10 ⊢ (𝜑 → Disj 𝑥 ∈ ℕ (((,) ∘ 𝐹)‘𝑥))
72	71	adantr 483	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → Disj 𝑥 ∈ ℕ (((,) ∘ 𝐹)‘𝑥))
73		disjss1 5037	. . . . . . . . 9 ⊢ ((1...𝑛) ⊆ ℕ → (Disj 𝑥 ∈ ℕ (((,) ∘ 𝐹)‘𝑥) → Disj 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)))
74	67, 72, 73	mpsyl 68	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → Disj 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥))
75		volfiniun 24148	. . . . . . . 8 ⊢ (((1...𝑛) ∈ Fin ∧ ∀𝑥 ∈ (1...𝑛)((((,) ∘ 𝐹)‘𝑥) ∈ dom vol ∧ (vol‘(((,) ∘ 𝐹)‘𝑥)) ∈ ℝ) ∧ Disj 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)) → (vol‘∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)) = Σ𝑥 ∈ (1...𝑛)(vol‘(((,) ∘ 𝐹)‘𝑥)))
76	64, 66, 74, 75	syl3anc 1367	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol‘∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)) = Σ𝑥 ∈ (1...𝑛)(vol‘(((,) ∘ 𝐹)‘𝑥)))
77	43	ralrimiva 3182	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∀𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥) ∈ dom vol)
78		finiunmbl 24145	. . . . . . . . 9 ⊢ (((1...𝑛) ∈ Fin ∧ ∀𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥) ∈ dom vol) → ∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥) ∈ dom vol)
79	64, 77, 78	syl2anc 586	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥) ∈ dom vol)
80		mblvol 24131	. . . . . . . 8 ⊢ (∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥) ∈ dom vol → (vol‘∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)) = (vol*‘∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)))
81	79, 80	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol‘∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)) = (vol*‘∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)))
82	63, 76, 81	3eqtr2d 2862	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) = (vol*‘∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)))
83		iunss1 4933	. . . . . . . . 9 ⊢ ((1...𝑛) ⊆ ℕ → ∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥) ⊆ ∪ 𝑥 ∈ ℕ (((,) ∘ 𝐹)‘𝑥))
84	67, 83	mp1i 13	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥) ⊆ ∪ 𝑥 ∈ ℕ (((,) ∘ 𝐹)‘𝑥))
85	9	adantr 483	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((,) ∘ 𝐹):ℕ⟶𝒫 ℝ)
86		ffn 6514	. . . . . . . . 9 ⊢ (((,) ∘ 𝐹):ℕ⟶𝒫 ℝ → ((,) ∘ 𝐹) Fn ℕ)
87		fniunfv 7006	. . . . . . . . 9 ⊢ (((,) ∘ 𝐹) Fn ℕ → ∪ 𝑥 ∈ ℕ (((,) ∘ 𝐹)‘𝑥) = ∪ ran ((,) ∘ 𝐹))
88	85, 86, 87	3syl 18	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ 𝑥 ∈ ℕ (((,) ∘ 𝐹)‘𝑥) = ∪ ran ((,) ∘ 𝐹))
89	84, 88	sseqtrd 4007	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥) ⊆ ∪ ran ((,) ∘ 𝐹))
90	12	adantr 483	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ ran ((,) ∘ 𝐹) ⊆ ℝ)
91		ovolss 24086	. . . . . . 7 ⊢ ((∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥) ⊆ ∪ ran ((,) ∘ 𝐹) ∧ ∪ ran ((,) ∘ 𝐹) ⊆ ℝ) → (vol*‘∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)) ≤ (vol*‘∪ ran ((,) ∘ 𝐹)))
92	89, 90, 91	syl2anc 586	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol*‘∪ 𝑥 ∈ (1...𝑛)(((,) ∘ 𝐹)‘𝑥)) ≤ (vol*‘∪ ran ((,) ∘ 𝐹)))
93	82, 92	eqbrtrd 5088	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝑆‘𝑛) ≤ (vol*‘∪ ran ((,) ∘ 𝐹)))
94	93	ralrimiva 3182	. . . 4 ⊢ (𝜑 → ∀𝑛 ∈ ℕ (𝑆‘𝑛) ≤ (vol*‘∪ ran ((,) ∘ 𝐹)))
95	2, 17	syl 17	. . . . 5 ⊢ (𝜑 → 𝑆:ℕ⟶(0[,)+∞))
96		ffn 6514	. . . . 5 ⊢ (𝑆:ℕ⟶(0[,)+∞) → 𝑆 Fn ℕ)
97		breq1 5069	. . . . . 6 ⊢ (𝑦 = (𝑆‘𝑛) → (𝑦 ≤ (vol*‘∪ ran ((,) ∘ 𝐹)) ↔ (𝑆‘𝑛) ≤ (vol*‘∪ ran ((,) ∘ 𝐹))))
98	97	ralrn 6854	. . . . 5 ⊢ (𝑆 Fn ℕ → (∀𝑦 ∈ ran 𝑆 𝑦 ≤ (vol*‘∪ ran ((,) ∘ 𝐹)) ↔ ∀𝑛 ∈ ℕ (𝑆‘𝑛) ≤ (vol*‘∪ ran ((,) ∘ 𝐹))))
99	95, 96, 98	3syl 18	. . . 4 ⊢ (𝜑 → (∀𝑦 ∈ ran 𝑆 𝑦 ≤ (vol*‘∪ ran ((,) ∘ 𝐹)) ↔ ∀𝑛 ∈ ℕ (𝑆‘𝑛) ≤ (vol*‘∪ ran ((,) ∘ 𝐹))))
100	94, 99	mpbird 259	. . 3 ⊢ (𝜑 → ∀𝑦 ∈ ran 𝑆 𝑦 ≤ (vol*‘∪ ran ((,) ∘ 𝐹)))
101		supxrleub 12720	. . . 4 ⊢ ((ran 𝑆 ⊆ ℝ* ∧ (vol*‘∪ ran ((,) ∘ 𝐹)) ∈ ℝ*) → (sup(ran 𝑆, ℝ*, < ) ≤ (vol*‘∪ ran ((,) ∘ 𝐹)) ↔ ∀𝑦 ∈ ran 𝑆 𝑦 ≤ (vol*‘∪ ran ((,) ∘ 𝐹))))
102	21, 14, 101	syl2anc 586	. . 3 ⊢ (𝜑 → (sup(ran 𝑆, ℝ*, < ) ≤ (vol*‘∪ ran ((,) ∘ 𝐹)) ↔ ∀𝑦 ∈ ran 𝑆 𝑦 ≤ (vol*‘∪ ran ((,) ∘ 𝐹))))
103	100, 102	mpbird 259	. 2 ⊢ (𝜑 → sup(ran 𝑆, ℝ*, < ) ≤ (vol*‘∪ ran ((,) ∘ 𝐹)))
104	14, 23, 26, 103	xrletrid 12549	1 ⊢ (𝜑 → (vol*‘∪ ran ((,) ∘ 𝐹)) = sup(ran 𝑆, ℝ*, < ))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 398   ∧ w3a 1083   = wceq 1537   ∈ wcel 2114  ∀wral 3138   ∩ cin 3935   ⊆ wss 3936  𝒫 cpw 4539  ⟨cop 4573  ∪ cuni 4838  ∪ ciun 4919  Disj wdisj 5031   class class class wbr 5066   × cxp 5553  dom cdm 5555  ran crn 5556   ∘ ccom 5559   Fn wfn 6350  ⟶wf 6351  ‘cfv 6355  (class class class)co 7156  1^st c1st 7687  2^nd c2nd 7688  Fincfn 8509  supcsup 8904  ℝcr 10536  0cc0 10537  1c1 10538   + caddc 10540  +∞cpnf 10672  ℝ^*cxr 10674   < clt 10675   ≤ cle 10676   − cmin 10870  ℕcn 11638  ℤ_≥cuz 12244  (,)cioo 12739  [,)cico 12741  ...cfz 12893  seqcseq 13370  abscabs 14593  Σcsu 15042  vol*covol 24063  volcvol 24064

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 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461  ax-inf2 9104  ax-cnex 10593  ax-resscn 10594  ax-1cn 10595  ax-icn 10596  ax-addcl 10597  ax-addrcl 10598  ax-mulcl 10599  ax-mulrcl 10600  ax-mulcom 10601  ax-addass 10602  ax-mulass 10603  ax-distr 10604  ax-i2m1 10605  ax-1ne0 10606  ax-1rid 10607  ax-rnegex 10608  ax-rrecex 10609  ax-cnre 10610  ax-pre-lttri 10611  ax-pre-lttrn 10612  ax-pre-ltadd 10613  ax-pre-mulgt0 10614  ax-pre-sup 10615

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 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-nel 3124  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-pss 3954  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-tp 4572  df-op 4574  df-uni 4839  df-int 4877  df-iun 4921  df-disj 5032  df-br 5067  df-opab 5129  df-mpt 5147  df-tr 5173  df-id 5460  df-eprel 5465  df-po 5474  df-so 5475  df-fr 5514  df-se 5515  df-we 5516  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-pred 6148  df-ord 6194  df-on 6195  df-lim 6196  df-suc 6197  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-isom 6364  df-riota 7114  df-ov 7159  df-oprab 7160  df-mpo 7161  df-of 7409  df-om 7581  df-1st 7689  df-2nd 7690  df-wrecs 7947  df-recs 8008  df-rdg 8046  df-1o 8102  df-2o 8103  df-oadd 8106  df-er 8289  df-map 8408  df-pm 8409  df-en 8510  df-dom 8511  df-sdom 8512  df-fin 8513  df-fi 8875  df-sup 8906  df-inf 8907  df-oi 8974  df-dju 9330  df-card 9368  df-pnf 10677  df-mnf 10678  df-xr 10679  df-ltxr 10680  df-le 10681  df-sub 10872  df-neg 10873  df-div 11298  df-nn 11639  df-2 11701  df-3 11702  df-n0 11899  df-z 11983  df-uz 12245  df-q 12350  df-rp 12391  df-xneg 12508  df-xadd 12509  df-xmul 12510  df-ioo 12743  df-ico 12745  df-icc 12746  df-fz 12894  df-fzo 13035  df-fl 13163  df-seq 13371  df-exp 13431  df-hash 13692  df-cj 14458  df-re 14459  df-im 14460  df-sqrt 14594  df-abs 14595  df-clim 14845  df-rlim 14846  df-sum 15043  df-rest 16696  df-topgen 16717  df-psmet 20537  df-xmet 20538  df-met 20539  df-bl 20540  df-mopn 20541  df-top 21502  df-topon 21519  df-bases 21554  df-cmp 21995  df-ovol 24065  df-vol 24066

This theorem is referenced by:  uniiccvol  24181  uniioombllem2  24184