voliunlem3 - Metamath Proof Explorer

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

Theorem voliunlem3 25900

Description: Lemma for voliun 25902. (Contributed by Mario Carneiro, 20-Mar-2014.)

**Hypotheses**
Ref	Expression
voliunlem.3	⊢ (𝜑 → 𝐹:ℕ⟶dom vol)
voliunlem.5	⊢ (𝜑 → Disj 𝑖 ∈ ℕ (𝐹‘𝑖))
voliunlem.6	⊢ 𝐻 = (𝑛 ∈ ℕ ↦ (vol*‘(𝑥 ∩ (𝐹‘𝑛))))
voliunlem3.1	⊢ 𝑆 = seq1( + , 𝐺)
voliunlem3.2	⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛)))
voliunlem3.4	⊢ (𝜑 → ∀𝑖 ∈ ℕ (vol‘(𝐹‘𝑖)) ∈ ℝ)

**Assertion**
Ref	Expression
voliunlem3	⊢ (𝜑 → (vol‘∪ ran 𝐹) = sup(ran 𝑆, ℝ^*, < ))

Distinct variable groups: 𝑖,𝑛,𝑥,𝐹 𝑥,𝑆 𝜑,𝑛,𝑥 Allowed substitution hints: 𝜑(𝑖) 𝑆(𝑖, 𝑛) 𝐺(𝑥, 𝑖, 𝑛) 𝐻(𝑥, 𝑖, 𝑛)

Proof of Theorem voliunlem3 Dummy variables 𝑘 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		voliunlem.3	. . . 4 ⊢ (𝜑 → 𝐹:ℕ⟶dom vol)
2		voliunlem.5	. . . 4 ⊢ (𝜑 → Disj 𝑖 ∈ ℕ (𝐹‘𝑖))
3		voliunlem.6	. . . 4 ⊢ 𝐻 = (𝑛 ∈ ℕ ↦ (vol*‘(𝑥 ∩ (𝐹‘𝑛))))
4	1, 2, 3	voliunlem2 25899	. . 3 ⊢ (𝜑 → ∪ ran 𝐹 ∈ dom vol)
5		mblvol 25878	. . 3 ⊢ (∪ ran 𝐹 ∈ dom vol → (vol‘∪ ran 𝐹) = (vol*‘∪ ran 𝐹))
6	4, 5	syl 18	. 2 ⊢ (𝜑 → (vol‘∪ ran 𝐹) = (vol*‘∪ ran 𝐹))
7	1	frnd 6737	. . . . . 6 ⊢ (𝜑 → ran 𝐹 ⊆ dom vol)
8		mblss 25879	. . . . . . . 8 ⊢ (𝑥 ∈ dom vol → 𝑥 ⊆ ℝ)
9		reex 11315	. . . . . . . . 9 ⊢ ℝ ∈ V
10	9	elpw2 5300	. . . . . . . 8 ⊢ (𝑥 ∈ 𝒫 ℝ ↔ 𝑥 ⊆ ℝ)
11	8, 10	sylibr 237	. . . . . . 7 ⊢ (𝑥 ∈ dom vol → 𝑥 ∈ 𝒫 ℝ)
12	11	ssriv 3917	. . . . . 6 ⊢ dom vol ⊆ 𝒫 ℝ
13	7, 12	sstrdi 3925	. . . . 5 ⊢ (𝜑 → ran 𝐹 ⊆ 𝒫 ℝ)
14		sspwuni 5063	. . . . 5 ⊢ (ran 𝐹 ⊆ 𝒫 ℝ ↔ ∪ ran 𝐹 ⊆ ℝ)
15	13, 14	sylib 221	. . . 4 ⊢ (𝜑 → ∪ ran 𝐹 ⊆ ℝ)
16		ovolcl 25826	. . . 4 ⊢ (∪ ran 𝐹 ⊆ ℝ → (vol‘∪ ran 𝐹) ∈ ℝ^)
17	15, 16	syl 18	. . 3 ⊢ (𝜑 → (vol‘∪ ran 𝐹) ∈ ℝ^)
18		nnuz 13028	. . . . . . . 8 ⊢ ℕ = (ℤ_≥‘1)
19		1zzd 12751	. . . . . . . 8 ⊢ (𝜑 → 1 ∈ ℤ)
20		2fveq3 6910	. . . . . . . . . . 11 ⊢ (𝑛 = 𝑘 → (vol‘(𝐹‘𝑛)) = (vol‘(𝐹‘𝑘)))
21		voliunlem3.2	. . . . . . . . . . 11 ⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛)))
22		fvex 6918	. . . . . . . . . . 11 ⊢ (vol‘(𝐹‘𝑘)) ∈ V
23	20, 21, 22	fvmpt 7013	. . . . . . . . . 10 ⊢ (𝑘 ∈ ℕ → (𝐺‘𝑘) = (vol‘(𝐹‘𝑘)))
24	23	adantl 487	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐺‘𝑘) = (vol‘(𝐹‘𝑘)))
25		voliunlem3.4	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑖 ∈ ℕ (vol‘(𝐹‘𝑖)) ∈ ℝ)
26		2fveq3 6910	. . . . . . . . . . . 12 ⊢ (𝑖 = 𝑘 → (vol‘(𝐹‘𝑖)) = (vol‘(𝐹‘𝑘)))
27	26	eleq1d 2849	. . . . . . . . . . 11 ⊢ (𝑖 = 𝑘 → ((vol‘(𝐹‘𝑖)) ∈ ℝ ↔ (vol‘(𝐹‘𝑘)) ∈ ℝ))
28	27	rspccva 3579	. . . . . . . . . 10 ⊢ ((∀𝑖 ∈ ℕ (vol‘(𝐹‘𝑖)) ∈ ℝ ∧ 𝑘 ∈ ℕ) → (vol‘(𝐹‘𝑘)) ∈ ℝ)
29	25, 28	sylan 592	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (vol‘(𝐹‘𝑘)) ∈ ℝ)
30	24, 29	eqeltrd 2864	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐺‘𝑘) ∈ ℝ)
31	18, 19, 30	serfre 14198	. . . . . . 7 ⊢ (𝜑 → seq1( + , 𝐺):ℕ⟶ℝ)
32		voliunlem3.1	. . . . . . . 8 ⊢ 𝑆 = seq1( + , 𝐺)
33	32	feq1i 6719	. . . . . . 7 ⊢ (𝑆:ℕ⟶ℝ ↔ seq1( + , 𝐺):ℕ⟶ℝ)
34	31, 33	sylibr 237	. . . . . 6 ⊢ (𝜑 → 𝑆:ℕ⟶ℝ)
35	34	frnd 6737	. . . . 5 ⊢ (𝜑 → ran 𝑆 ⊆ ℝ)
36		ressxr 11377	. . . . 5 ⊢ ℝ ⊆ ℝ^*
37	35, 36	sstrdi 3925	. . . 4 ⊢ (𝜑 → ran 𝑆 ⊆ ℝ^*)
38		supxrcl 13469	. . . 4 ⊢ (ran 𝑆 ⊆ ℝ^* → sup(ran 𝑆, ℝ^, < ) ∈ ℝ^)
39	37, 38	syl 18	. . 3 ⊢ (𝜑 → sup(ran 𝑆, ℝ^, < ) ∈ ℝ^)
40		eqid 2763	. . . . 5 ⊢ seq1( + , (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛)))) = seq1( + , (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛))))
41		eqid 2763	. . . . 5 ⊢ (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛))) = (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛)))
42	1	ffvelcdmda 7105	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ∈ dom vol)
43		mblss 25879	. . . . . 6 ⊢ ((𝐹‘𝑛) ∈ dom vol → (𝐹‘𝑛) ⊆ ℝ)
44	42, 43	syl 18	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ⊆ ℝ)
45		mblvol 25878	. . . . . . 7 ⊢ ((𝐹‘𝑛) ∈ dom vol → (vol‘(𝐹‘𝑛)) = (vol*‘(𝐹‘𝑛)))
46	42, 45	syl 18	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol‘(𝐹‘𝑛)) = (vol*‘(𝐹‘𝑛)))
47		2fveq3 6910	. . . . . . . . 9 ⊢ (𝑖 = 𝑛 → (vol‘(𝐹‘𝑖)) = (vol‘(𝐹‘𝑛)))
48	47	eleq1d 2849	. . . . . . . 8 ⊢ (𝑖 = 𝑛 → ((vol‘(𝐹‘𝑖)) ∈ ℝ ↔ (vol‘(𝐹‘𝑛)) ∈ ℝ))
49	48	rspccva 3579	. . . . . . 7 ⊢ ((∀𝑖 ∈ ℕ (vol‘(𝐹‘𝑖)) ∈ ℝ ∧ 𝑛 ∈ ℕ) → (vol‘(𝐹‘𝑛)) ∈ ℝ)
50	25, 49	sylan 592	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol‘(𝐹‘𝑛)) ∈ ℝ)
51	46, 50	eqeltrrd 2865	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol*‘(𝐹‘𝑛)) ∈ ℝ)
52	40, 41, 44, 51	ovoliun 25853	. . . 4 ⊢ (𝜑 → (vol‘∪ 𝑛 ∈ ℕ (𝐹‘𝑛)) ≤ sup(ran seq1( + , (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛)))), ℝ^*, < ))
53	1	ffnd 6729	. . . . . 6 ⊢ (𝜑 → 𝐹 Fn ℕ)
54		fniunfv 7271	. . . . . 6 ⊢ (𝐹 Fn ℕ → ∪ 𝑛 ∈ ℕ (𝐹‘𝑛) = ∪ ran 𝐹)
55	53, 54	syl 18	. . . . 5 ⊢ (𝜑 → ∪ 𝑛 ∈ ℕ (𝐹‘𝑛) = ∪ ran 𝐹)
56	55	fveq2d 6909	. . . 4 ⊢ (𝜑 → (vol‘∪ 𝑛 ∈ ℕ (𝐹‘𝑛)) = (vol‘∪ ran 𝐹))
57	46	mpteq2dva 5201	. . . . . . . . 9 ⊢ (𝜑 → (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛))) = (𝑛 ∈ ℕ ↦ (vol*‘(𝐹‘𝑛))))
58	21, 57	eqtrid 2810	. . . . . . . 8 ⊢ (𝜑 → 𝐺 = (𝑛 ∈ ℕ ↦ (vol*‘(𝐹‘𝑛))))
59	58	seqeq3d 14176	. . . . . . 7 ⊢ (𝜑 → seq1( + , 𝐺) = seq1( + , (𝑛 ∈ ℕ ↦ (vol*‘(𝐹‘𝑛)))))
60	32, 59	eqtr2id 2811	. . . . . 6 ⊢ (𝜑 → seq1( + , (𝑛 ∈ ℕ ↦ (vol*‘(𝐹‘𝑛)))) = 𝑆)
61	60	rneqd 5926	. . . . 5 ⊢ (𝜑 → ran seq1( + , (𝑛 ∈ ℕ ↦ (vol*‘(𝐹‘𝑛)))) = ran 𝑆)
62	61	supeq1d 9462	. . . 4 ⊢ (𝜑 → sup(ran seq1( + , (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛)))), ℝ^, < ) = sup(ran 𝑆, ℝ^*, < ))
63	52, 56, 62	3brtr3d 5139	. . 3 ⊢ (𝜑 → (vol‘∪ ran 𝐹) ≤ sup(ran 𝑆, ℝ^, < ))
64		ovolge0 25829	. . . . . . . . . 10 ⊢ (∪ ran 𝐹 ⊆ ℝ → 0 ≤ (vol*‘∪ ran 𝐹))
65	15, 64	syl 18	. . . . . . . . 9 ⊢ (𝜑 → 0 ≤ (vol*‘∪ ran 𝐹))
66		mnflt0 13278	. . . . . . . . . 10 ⊢ -∞ < 0
67		mnfxr 11390	. . . . . . . . . . 11 ⊢ -∞ ∈ ℝ^*
68		0xr 11380	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ^*
69		xrltletr 13310	. . . . . . . . . . 11 ⊢ ((-∞ ∈ ℝ^* ∧ 0 ∈ ℝ^* ∧ (vol‘∪ ran 𝐹) ∈ ℝ^) → ((-∞ < 0 ∧ 0 ≤ (vol‘∪ ran 𝐹)) → -∞ < (vol‘∪ ran 𝐹)))
70	67, 68, 69	mp3an12 1481	. . . . . . . . . 10 ⊢ ((vol‘∪ ran 𝐹) ∈ ℝ^ → ((-∞ < 0 ∧ 0 ≤ (vol‘∪ ran 𝐹)) → -∞ < (vol‘∪ ran 𝐹)))
71	66, 70	mpani 709	. . . . . . . . 9 ⊢ ((vol‘∪ ran 𝐹) ∈ ℝ^ → (0 ≤ (vol‘∪ ran 𝐹) → -∞ < (vol‘∪ ran 𝐹)))
72	17, 65, 71	sylc 66	. . . . . . . 8 ⊢ (𝜑 → -∞ < (vol*‘∪ ran 𝐹))
73		xrrebnd 13322	. . . . . . . . . 10 ⊢ ((vol‘∪ ran 𝐹) ∈ ℝ^ → ((vol‘∪ ran 𝐹) ∈ ℝ ↔ (-∞ < (vol‘∪ ran 𝐹) ∧ (vol*‘∪ ran 𝐹) < +∞)))
74	17, 73	syl 18	. . . . . . . . 9 ⊢ (𝜑 → ((vol‘∪ ran 𝐹) ∈ ℝ ↔ (-∞ < (vol‘∪ ran 𝐹) ∧ (vol*‘∪ ran 𝐹) < +∞)))
75	9	elpw2 5300	. . . . . . . . . . . 12 ⊢ (∪ ran 𝐹 ∈ 𝒫 ℝ ↔ ∪ ran 𝐹 ⊆ ℝ)
76	15, 75	sylibr 237	. . . . . . . . . . 11 ⊢ (𝜑 → ∪ ran 𝐹 ∈ 𝒫 ℝ)
77		simpl 488	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ 𝜑) → 𝑥 = ∪ ran 𝐹)
78	77	sseq1d 3944	. . . . . . . . . . . . . 14 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ 𝜑) → (𝑥 ⊆ ℝ ↔ ∪ ran 𝐹 ⊆ ℝ))
79	77	fveq2d 6909	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ 𝜑) → (vol‘𝑥) = (vol‘∪ ran 𝐹))
80	79	eleq1d 2849	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ 𝜑) → ((vol‘𝑥) ∈ ℝ ↔ (vol‘∪ ran 𝐹) ∈ ℝ))
81		simpll 779	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((𝑥 = ∪ ran 𝐹 ∧ 𝜑) ∧ 𝑛 ∈ ℕ) → 𝑥 = ∪ ran 𝐹)
82	81	ineq1d 4119	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (((𝑥 = ∪ ran 𝐹 ∧ 𝜑) ∧ 𝑛 ∈ ℕ) → (𝑥 ∩ (𝐹‘𝑛)) = (∪ ran 𝐹 ∩ (𝐹‘𝑛)))
83		fnfvelrn 7101	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ⊢ ((𝐹 Fn ℕ ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ∈ ran 𝐹)
84	53, 83	sylan 592	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ∈ ran 𝐹)
85		elssuni 4902	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 ⊢ ((𝐹‘𝑛) ∈ ran 𝐹 → (𝐹‘𝑛) ⊆ ∪ ran 𝐹)
86	84, 85	syl 18	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ⊆ ∪ ran 𝐹)
87	86	adantll 727	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ (((𝑥 = ∪ ran 𝐹 ∧ 𝜑) ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ⊆ ∪ ran 𝐹)
88		sseqin2 4123	. . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ⊢ ((𝐹‘𝑛) ⊆ ∪ ran 𝐹 ↔ (∪ ran 𝐹 ∩ (𝐹‘𝑛)) = (𝐹‘𝑛))
89	87, 88	sylib 221	. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ⊢ (((𝑥 = ∪ ran 𝐹 ∧ 𝜑) ∧ 𝑛 ∈ ℕ) → (∪ ran 𝐹 ∩ (𝐹‘𝑛)) = (𝐹‘𝑛))
90	82, 89	eqtrd 2798	. . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ⊢ (((𝑥 = ∪ ran 𝐹 ∧ 𝜑) ∧ 𝑛 ∈ ℕ) → (𝑥 ∩ (𝐹‘𝑛)) = (𝐹‘𝑛))
91	90	fveq2d 6909	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑥 = ∪ ran 𝐹 ∧ 𝜑) ∧ 𝑛 ∈ ℕ) → (vol‘(𝑥 ∩ (𝐹‘𝑛))) = (vol‘(𝐹‘𝑛)))
92	46	adantll 727	. . . . . . . . . . . . . . . . . . . . . . . . . . 27 ⊢ (((𝑥 = ∪ ran 𝐹 ∧ 𝜑) ∧ 𝑛 ∈ ℕ) → (vol‘(𝐹‘𝑛)) = (vol*‘(𝐹‘𝑛)))
93	91, 92	eqtr4d 2801	. . . . . . . . . . . . . . . . . . . . . . . . . 26 ⊢ (((𝑥 = ∪ ran 𝐹 ∧ 𝜑) ∧ 𝑛 ∈ ℕ) → (vol*‘(𝑥 ∩ (𝐹‘𝑛))) = (vol‘(𝐹‘𝑛)))
94	93	mpteq2dva 5201	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ 𝜑) → (𝑛 ∈ ℕ ↦ (vol*‘(𝑥 ∩ (𝐹‘𝑛)))) = (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛))))
95	94	adantrr 730	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → (𝑛 ∈ ℕ ↦ (vol*‘(𝑥 ∩ (𝐹‘𝑛)))) = (𝑛 ∈ ℕ ↦ (vol‘(𝐹‘𝑛))))
96	95, 3, 21	3eqtr4g 2823	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → 𝐻 = 𝐺)
97	96	seqeq3d 14176	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → seq1( + , 𝐻) = seq1( + , 𝐺))
98	97, 32	eqtr4di 2816	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → seq1( + , 𝐻) = 𝑆)
99	98	fveq1d 6907	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → (seq1( + , 𝐻)‘𝑘) = (𝑆‘𝑘))
100		difeq1 4059	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑥 = ∪ ran 𝐹 → (𝑥 ∖ ∪ ran 𝐹) = (∪ ran 𝐹 ∖ ∪ ran 𝐹))
101		difid 4328	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (∪ ran 𝐹 ∖ ∪ ran 𝐹) = ∅
102	100, 101	eqtrdi 2814	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑥 = ∪ ran 𝐹 → (𝑥 ∖ ∪ ran 𝐹) = ∅)
103	102	fveq2d 6909	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑥 = ∪ ran 𝐹 → (vol‘(𝑥 ∖ ∪ ran 𝐹)) = (vol‘∅))
104		ovol0 25841	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (vol*‘∅) = 0
105	103, 104	eqtrdi 2814	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = ∪ ran 𝐹 → (vol*‘(𝑥 ∖ ∪ ran 𝐹)) = 0)
106	105	adantr 486	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → (vol*‘(𝑥 ∖ ∪ ran 𝐹)) = 0)
107	99, 106	oveq12d 7458	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝑥 ∖ ∪ ran 𝐹))) = ((𝑆‘𝑘) + 0))
108	34	ffvelcdmda 7105	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑆‘𝑘) ∈ ℝ)
109	108	adantl 487	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → (𝑆‘𝑘) ∈ ℝ)
110	109	recnd 11361	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → (𝑆‘𝑘) ∈ ℂ)
111	110	addridd 11534	. . . . . . . . . . . . . . . . . . 19 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → ((𝑆‘𝑘) + 0) = (𝑆‘𝑘))
112	107, 111	eqtrd 2798	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → ((seq1( + , 𝐻)‘𝑘) + (vol*‘(𝑥 ∖ ∪ ran 𝐹))) = (𝑆‘𝑘))
113		fveq2 6905	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 = ∪ ran 𝐹 → (vol‘𝑥) = (vol‘∪ ran 𝐹))
114	113	adantr 486	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → (vol‘𝑥) = (vol‘∪ ran 𝐹))
115	112, 114	breq12d 5119	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ (𝜑 ∧ 𝑘 ∈ ℕ)) → (((seq1( + , 𝐻)‘𝑘) + (vol‘(𝑥 ∖ ∪ ran 𝐹))) ≤ (vol‘𝑥) ↔ (𝑆‘𝑘) ≤ (vol*‘∪ ran 𝐹)))
116	115	expr 462	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ 𝜑) → (𝑘 ∈ ℕ → (((seq1( + , 𝐻)‘𝑘) + (vol‘(𝑥 ∖ ∪ ran 𝐹))) ≤ (vol‘𝑥) ↔ (𝑆‘𝑘) ≤ (vol*‘∪ ran 𝐹))))
117	116	pm5.74d 276	. . . . . . . . . . . . . . 15 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ 𝜑) → ((𝑘 ∈ ℕ → ((seq1( + , 𝐻)‘𝑘) + (vol‘(𝑥 ∖ ∪ ran 𝐹))) ≤ (vol‘𝑥)) ↔ (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol*‘∪ ran 𝐹))))
118	80, 117	imbi12d 347	. . . . . . . . . . . . . 14 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ 𝜑) → (((vol‘𝑥) ∈ ℝ → (𝑘 ∈ ℕ → ((seq1( + , 𝐻)‘𝑘) + (vol‘(𝑥 ∖ ∪ ran 𝐹))) ≤ (vol‘𝑥))) ↔ ((vol‘∪ ran 𝐹) ∈ ℝ → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol*‘∪ ran 𝐹)))))
119	78, 118	imbi12d 347	. . . . . . . . . . . . 13 ⊢ ((𝑥 = ∪ ran 𝐹 ∧ 𝜑) → ((𝑥 ⊆ ℝ → ((vol‘𝑥) ∈ ℝ → (𝑘 ∈ ℕ → ((seq1( + , 𝐻)‘𝑘) + (vol‘(𝑥 ∖ ∪ ran 𝐹))) ≤ (vol‘𝑥)))) ↔ (∪ ran 𝐹 ⊆ ℝ → ((vol‘∪ ran 𝐹) ∈ ℝ → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol*‘∪ ran 𝐹))))))
120	119	pm5.74da 816	. . . . . . . . . . . 12 ⊢ (𝑥 = ∪ ran 𝐹 → ((𝜑 → (𝑥 ⊆ ℝ → ((vol‘𝑥) ∈ ℝ → (𝑘 ∈ ℕ → ((seq1( + , 𝐻)‘𝑘) + (vol‘(𝑥 ∖ ∪ ran 𝐹))) ≤ (vol‘𝑥))))) ↔ (𝜑 → (∪ ran 𝐹 ⊆ ℝ → ((vol‘∪ ran 𝐹) ∈ ℝ → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol*‘∪ ran 𝐹)))))))
121	1	3ad2ant1 1151	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ⊆ ℝ ∧ (vol*‘𝑥) ∈ ℝ) → 𝐹:ℕ⟶dom vol)
122	2	3ad2ant1 1151	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ⊆ ℝ ∧ (vol*‘𝑥) ∈ ℝ) → Disj 𝑖 ∈ ℕ (𝐹‘𝑖))
123		simp2 1155	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ⊆ ℝ ∧ (vol*‘𝑥) ∈ ℝ) → 𝑥 ⊆ ℝ)
124		simp3 1156	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑥 ⊆ ℝ ∧ (vol‘𝑥) ∈ ℝ) → (vol‘𝑥) ∈ ℝ)
125	121, 122, 3, 123, 124	voliunlem1 25898	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑥 ⊆ ℝ ∧ (vol‘𝑥) ∈ ℝ) ∧ 𝑘 ∈ ℕ) → ((seq1( + , 𝐻)‘𝑘) + (vol‘(𝑥 ∖ ∪ ran 𝐹))) ≤ (vol*‘𝑥))
126	125	3exp1 1371	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝑥 ⊆ ℝ → ((vol‘𝑥) ∈ ℝ → (𝑘 ∈ ℕ → ((seq1( + , 𝐻)‘𝑘) + (vol‘(𝑥 ∖ ∪ ran 𝐹))) ≤ (vol*‘𝑥)))))
127	120, 126	vtoclg 3521	. . . . . . . . . . 11 ⊢ (∪ ran 𝐹 ∈ 𝒫 ℝ → (𝜑 → (∪ ran 𝐹 ⊆ ℝ → ((vol‘∪ ran 𝐹) ∈ ℝ → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹))))))
128	76, 127	mpcom 39	. . . . . . . . . 10 ⊢ (𝜑 → (∪ ran 𝐹 ⊆ ℝ → ((vol‘∪ ran 𝐹) ∈ ℝ → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹)))))
129	15, 128	mpd 16	. . . . . . . . 9 ⊢ (𝜑 → ((vol‘∪ ran 𝐹) ∈ ℝ → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹))))
130	74, 129	sylbird 263	. . . . . . . 8 ⊢ (𝜑 → ((-∞ < (vol‘∪ ran 𝐹) ∧ (vol‘∪ ran 𝐹) < +∞) → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol*‘∪ ran 𝐹))))
131	72, 130	mpand 708	. . . . . . 7 ⊢ (𝜑 → ((vol‘∪ ran 𝐹) < +∞ → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹))))
132		nltpnft 13318	. . . . . . . . 9 ⊢ ((vol‘∪ ran 𝐹) ∈ ℝ^ → ((vol‘∪ ran 𝐹) = +∞ ↔ ¬ (vol‘∪ ran 𝐹) < +∞))
133	17, 132	syl 18	. . . . . . . 8 ⊢ (𝜑 → ((vol‘∪ ran 𝐹) = +∞ ↔ ¬ (vol‘∪ ran 𝐹) < +∞))
134		rexr 11379	. . . . . . . . . . 11 ⊢ ((𝑆‘𝑘) ∈ ℝ → (𝑆‘𝑘) ∈ ℝ^*)
135		pnfge 13283	. . . . . . . . . . 11 ⊢ ((𝑆‘𝑘) ∈ ℝ^* → (𝑆‘𝑘) ≤ +∞)
136	108, 134, 135	3syl 19	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝑆‘𝑘) ≤ +∞)
137	136	ex 418	. . . . . . . . 9 ⊢ (𝜑 → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ +∞))
138		breq2 5110	. . . . . . . . . 10 ⊢ ((vol‘∪ ran 𝐹) = +∞ → ((𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹) ↔ (𝑆‘𝑘) ≤ +∞))
139	138	imbi2d 343	. . . . . . . . 9 ⊢ ((vol‘∪ ran 𝐹) = +∞ → ((𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹)) ↔ (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ +∞)))
140	137, 139	syl5ibrcom 250	. . . . . . . 8 ⊢ (𝜑 → ((vol‘∪ ran 𝐹) = +∞ → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹))))
141	133, 140	sylbird 263	. . . . . . 7 ⊢ (𝜑 → (¬ (vol‘∪ ran 𝐹) < +∞ → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹))))
142	131, 141	pm2.61d 181	. . . . . 6 ⊢ (𝜑 → (𝑘 ∈ ℕ → (𝑆‘𝑘) ≤ (vol*‘∪ ran 𝐹)))
143	142	ralrimiv 3157	. . . . 5 ⊢ (𝜑 → ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ (vol*‘∪ ran 𝐹))
144	34	ffnd 6729	. . . . . 6 ⊢ (𝜑 → 𝑆 Fn ℕ)
145		breq1 5109	. . . . . . 7 ⊢ (𝑧 = (𝑆‘𝑘) → (𝑧 ≤ (vol‘∪ ran 𝐹) ↔ (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹)))
146	145	ralrn 7109	. . . . . 6 ⊢ (𝑆 Fn ℕ → (∀𝑧 ∈ ran 𝑆 𝑧 ≤ (vol‘∪ ran 𝐹) ↔ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹)))
147	144, 146	syl 18	. . . . 5 ⊢ (𝜑 → (∀𝑧 ∈ ran 𝑆 𝑧 ≤ (vol‘∪ ran 𝐹) ↔ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ (vol‘∪ ran 𝐹)))
148	143, 147	mpbird 260	. . . 4 ⊢ (𝜑 → ∀𝑧 ∈ ran 𝑆 𝑧 ≤ (vol*‘∪ ran 𝐹))
149		supxrleub 13480	. . . . 5 ⊢ ((ran 𝑆 ⊆ ℝ^* ∧ (vol‘∪ ran 𝐹) ∈ ℝ^) → (sup(ran 𝑆, ℝ^, < ) ≤ (vol‘∪ ran 𝐹) ↔ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ (vol*‘∪ ran 𝐹)))
150	37, 17, 149	syl2anc 596	. . . 4 ⊢ (𝜑 → (sup(ran 𝑆, ℝ^, < ) ≤ (vol‘∪ ran 𝐹) ↔ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ (vol*‘∪ ran 𝐹)))
151	148, 150	mpbird 260	. . 3 ⊢ (𝜑 → sup(ran 𝑆, ℝ^, < ) ≤ (vol‘∪ ran 𝐹))
152	17, 39, 63, 151	xrletrid 13308	. 2 ⊢ (𝜑 → (vol‘∪ ran 𝐹) = sup(ran 𝑆, ℝ^, < ))
153	6, 152	eqtrd 2798	1 ⊢ (𝜑 → (vol‘∪ ran 𝐹) = sup(ran 𝑆, ℝ^*, < ))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∧ w3a 1103 = wceq 1570 ∈ wcel 2147 ∀wral 3080 ⊆ wss 3900 ∖ cdif 4048 ∩ cin 4092 ∅c0 4281 𝒫 cpw 4560 ∪ cuni 4870 ∪ ciun 4954 Disj wdisj 5073 class class class wbr 5106 ↦ cmpt 5189 dom cdm 5655 ran crn 5656 Fn wfn 6550 ⟶wf 6551 ‘cfv 6555 (class class class)co 7440 supcsup 9456 ℝcr 11223 0cc0 11224 1c1 11225 + caddc 11227 +∞cpnf 11364 -∞cmnf 11365 ℝ^*cxr 11366 < clt 11367 ≤ cle 11368 ℕcn 12359 seqcseq 14168 vol*covol 25810 volcvol 25811

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 1945 ax-6 2002 ax-7 2043 ax-8 2149 ax-9 2157 ax-10 2180 ax-11 2197 ax-12 2216 ax-ext 2735 ax-rep 5235 ax-sep 5252 ax-nul 5263 ax-pow 5331 ax-pr 5395 ax-un 7772 ax-inf2 9666 ax-cc 10537 ax-cnex 11280 ax-resscn 11281 ax-1cn 11282 ax-icn 11283 ax-addcl 11284 ax-addrcl 11285 ax-mulcl 11286 ax-mulrcl 11287 ax-mulcom 11288 ax-addass 11289 ax-mulass 11290 ax-distr 11291 ax-i2m1 11292 ax-1ne0 11293 ax-1rid 11294 ax-rnegex 11295 ax-rrecex 11296 ax-cnre 11297 ax-pre-lttri 11298 ax-pre-lttrn 11299 ax-pre-ltadd 11300 ax-pre-mulgt0 11301 ax-pre-sup 11302

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 2102 df-mo 2567 df-eu 2597 df-clab 2742 df-cleq 2755 df-clel 2839 df-nfc 2913 df-ne 2960 df-nel 3066 df-ral 3081 df-rex 3091 df-rmo 3369 df-reu 3370 df-rab 3417 df-v 3456 df-sbc 3743 df-csb 3852 df-ss 3901 df-pss 4017 df-dif 4050 df-in 4094 df-un 4154 df-nul 4282 df-if 4486 df-pw 4562 df-sn 4589 df-pr 4591 df-op 4839 df-uni 4871 df-int 4911 df-iun 4956 df-disj 5074 df-br 5107 df-opab 5171 df-mpt 5190 df-tr 5216 df-id 5550 df-eprel 5555 df-po 5563 df-so 5564 df-fr 5608 df-se 5609 df-we 5610 df-xp 5661 df-rel 5662 df-cnv 5663 df-co 5664 df-dm 5665 df-rn 5666 df-res 5667 df-ima 5668 df-pred 6319 df-ord 6380 df-on 6381 df-lim 6382 df-suc 6383 df-iota 6509 df-fun 6557 df-fn 6558 df-f 6559 df-f1 6560 df-fo 6561 df-f1o 6562 df-fv 6563 df-isom 6564 df-riota 7397 df-ov 7443 df-oprab 7444 df-mpo 7445 df-of 7714 df-om 7899 df-1st 8022 df-2nd 8023 df-frecs 8324 df-wrecs 8355 df-recs 8404 df-rdg 8443 df-1o 8501 df-2o 8502 df-er 8742 df-map 8874 df-pm 8875 df-en 8999 df-dom 9000 df-sdom 9001 df-fin 9002 df-sup 9458 df-inf 9459 df-oi 9528 df-dju 10006 df-card 10044 df-pnf 11369 df-mnf 11370 df-xr 11371 df-ltxr 11372 df-le 11373 df-sub 11567 df-neg 11568 df-div 11998 df-nn 12360 df-2 12429 df-3 12430 df-n0 12631 df-z 12718 df-uz 12990 df-q 13100 df-rp 13145 df-xadd 13266 df-ioo 13504 df-ico 13506 df-icc 13507 df-fz 13664 df-fzo 13813 df-fl 13956 df-seq 14169 df-exp 14229 df-hash 14499 df-cj 15292 df-re 15293 df-im 15294 df-sqrt 15428 df-abs 15429 df-clim 15681 df-rlim 15682 df-sum 15880 df-xmet 21698 df-met 21699 df-ovol 25812 df-vol 25813

This theorem is used by: voliun 25902

W3C validator