voliune - Mathbox for Thierry Arnoux

	Mathbox for Thierry Arnoux		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > voliune		Structured version Visualization version GIF version

Theorem voliune 34781

Description: The Lebesgue measure function is countably additive. This formulation on the extended reals, allows for +∞ for the measure of any set in the sum. Cf. ovoliun 25773 and voliun 25822. (Contributed by Thierry Arnoux, 16-Oct-2017.)

**Assertion**
Ref	Expression
voliune	⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = Σ^*𝑛 ∈ ℕ(vol‘𝐴))

Proof of Theorem voliune Dummy variable 𝑘 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		r19.26 3122	. . . . 5 ⊢ (∀𝑛 ∈ ℕ (𝐴 ∈ dom vol ∧ (vol‘𝐴) ∈ ℝ) ↔ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ))
2		eqid 2760	. . . . . 6 ⊢ seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))) = seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴)))
3		eqid 2760	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↦ (vol‘𝐴)) = (𝑛 ∈ ℕ ↦ (vol‘𝐴))
4	2, 3	voliun 25822	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ (𝐴 ∈ dom vol ∧ (vol‘𝐴) ∈ ℝ) ∧ Disj 𝑛 ∈ ℕ 𝐴) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = sup(ran seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))), ℝ^*, < ))
5	1, 4	sylanbr 594	. . . 4 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ Disj 𝑛 ∈ ℕ 𝐴) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = sup(ran seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))), ℝ^*, < ))
6	5	an32s 665	. . 3 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = sup(ran seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))), ℝ^*, < ))
7		nfra1 3286	. . . . . . 7 ⊢ Ⅎ𝑛∀𝑛 ∈ ℕ 𝐴 ∈ dom vol
8		nfra1 3286	. . . . . . 7 ⊢ Ⅎ𝑛∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ
9	7, 8	nfan 1932	. . . . . 6 ⊢ Ⅎ𝑛(∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
10		simpr 490	. . . . . . . . . 10 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
11		rspa 3251	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → 𝐴 ∈ dom vol)
12		volf 25797	. . . . . . . . . . . 12 ⊢ vol:dom vol⟶(0[,]+∞)
13	12	ffvelcdmi 7072	. . . . . . . . . . 11 ⊢ (𝐴 ∈ dom vol → (vol‘𝐴) ∈ (0[,]+∞))
14	11, 13	syl 18	. . . . . . . . . 10 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ (0[,]+∞))
15	3	fvmpt2 6994	. . . . . . . . . 10 ⊢ ((𝑛 ∈ ℕ ∧ (vol‘𝐴) ∈ (0[,]+∞)) → ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = (vol‘𝐴))
16	10, 14, 15	syl2anc 596	. . . . . . . . 9 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = (vol‘𝐴))
17	16	adantlr 728	. . . . . . . 8 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = (vol‘𝐴))
18	17	ex 418	. . . . . . 7 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → (𝑛 ∈ ℕ → ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = (vol‘𝐴)))
19	9, 18	ralrimi 3260	. . . . . 6 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → ∀𝑛 ∈ ℕ ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = (vol‘𝐴))
20	9, 19	esumeq2d 34588	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → Σ^𝑛 ∈ ℕ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = Σ^𝑛 ∈ ℕ(vol‘𝐴))
21		simpr 490	. . . . . . . . 9 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
22	21	r19.21bi 3254	. . . . . . . 8 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ ℝ)
23	14	adantlr 728	. . . . . . . . 9 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ (0[,]+∞))
24		0xr 11313	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ^*
25		pnfxr 11320	. . . . . . . . . . 11 ⊢ +∞ ∈ ℝ^*
26		elicc1 13475	. . . . . . . . . . 11 ⊢ ((0 ∈ ℝ^* ∧ +∞ ∈ ℝ^) → ((vol‘𝐴) ∈ (0[,]+∞) ↔ ((vol‘𝐴) ∈ ℝ^ ∧ 0 ≤ (vol‘𝐴) ∧ (vol‘𝐴) ≤ +∞)))
27	24, 25, 26	mp2an 705	. . . . . . . . . 10 ⊢ ((vol‘𝐴) ∈ (0[,]+∞) ↔ ((vol‘𝐴) ∈ ℝ^* ∧ 0 ≤ (vol‘𝐴) ∧ (vol‘𝐴) ≤ +∞))
28	27	simp2bi 1164	. . . . . . . . 9 ⊢ ((vol‘𝐴) ∈ (0[,]+∞) → 0 ≤ (vol‘𝐴))
29	23, 28	syl 18	. . . . . . . 8 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → 0 ≤ (vol‘𝐴))
30		ltpnf 13204	. . . . . . . . 9 ⊢ ((vol‘𝐴) ∈ ℝ → (vol‘𝐴) < +∞)
31	22, 30	syl 18	. . . . . . . 8 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) < +∞)
32		0re 11267	. . . . . . . . 9 ⊢ 0 ∈ ℝ
33		elico2 13496	. . . . . . . . 9 ⊢ ((0 ∈ ℝ ∧ +∞ ∈ ℝ^*) → ((vol‘𝐴) ∈ (0[,)+∞) ↔ ((vol‘𝐴) ∈ ℝ ∧ 0 ≤ (vol‘𝐴) ∧ (vol‘𝐴) < +∞)))
34	32, 25, 33	mp2an 705	. . . . . . . 8 ⊢ ((vol‘𝐴) ∈ (0[,)+∞) ↔ ((vol‘𝐴) ∈ ℝ ∧ 0 ≤ (vol‘𝐴) ∧ (vol‘𝐴) < +∞))
35	22, 29, 31, 34	syl3anbrc 1362	. . . . . . 7 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ (0[,)+∞))
36	9, 35, 3	fmptdf 7106	. . . . . 6 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → (𝑛 ∈ ℕ ↦ (vol‘𝐴)):ℕ⟶(0[,)+∞))
37		nfmpt1 5204	. . . . . . 7 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ (vol‘𝐴))
38	37	esumfsupre 34622	. . . . . 6 ⊢ ((𝑛 ∈ ℕ ↦ (vol‘𝐴)):ℕ⟶(0[,)+∞) → Σ^𝑛 ∈ ℕ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = sup(ran seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))), ℝ^, < ))
39	36, 38	syl 18	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → Σ^𝑛 ∈ ℕ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = sup(ran seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))), ℝ^, < ))
40	20, 39	eqtr3d 2797	. . . 4 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → Σ^𝑛 ∈ ℕ(vol‘𝐴) = sup(ran seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))), ℝ^, < ))
41	40	adantlr 728	. . 3 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → Σ^𝑛 ∈ ℕ(vol‘𝐴) = sup(ran seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))), ℝ^, < ))
42	6, 41	eqtr4d 2798	. 2 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = Σ^*𝑛 ∈ ℕ(vol‘𝐴))
43		nfv 1947	. . . . . . . . 9 ⊢ Ⅎ𝑘(vol‘𝐴) = +∞
44		nfcv 2922	. . . . . . . . . . 11 ⊢ Ⅎ𝑛vol
45		nfcsb1v 3871	. . . . . . . . . . 11 ⊢ Ⅎ𝑛⦋𝑘 / 𝑛⦌𝐴
46	44, 45	nffv 6884	. . . . . . . . . 10 ⊢ Ⅎ𝑛(vol‘⦋𝑘 / 𝑛⦌𝐴)
47	46	nfeq1 2937	. . . . . . . . 9 ⊢ Ⅎ𝑛(vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞
48		csbeq1a 3861	. . . . . . . . . 10 ⊢ (𝑛 = 𝑘 → 𝐴 = ⦋𝑘 / 𝑛⦌𝐴)
49	48	fveqeq2d 6882	. . . . . . . . 9 ⊢ (𝑛 = 𝑘 → ((vol‘𝐴) = +∞ ↔ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞))
50	43, 47, 49	cbvrexw 3305	. . . . . . . 8 ⊢ (∃𝑛 ∈ ℕ (vol‘𝐴) = +∞ ↔ ∃𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞)
51	50	bilani 510	. . . . . . 7 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞)
52	45	nfel1 2938	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol
53	48	eleq1d 2845	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑘 → (𝐴 ∈ dom vol ↔ ⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol))
54	52, 53	rspc 3564	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → ⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol))
55	54	impcom 413	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → ⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol)
56		iunmbl 25821	. . . . . . . . . . . 12 ⊢ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → ∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol)
57	56	adantr 486	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → ∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol)
58		nfcv 2922	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛ℕ
59		nfcv 2922	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛𝑘
60	58, 59, 45, 48	ssiun2sf 33073	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → ⦋𝑘 / 𝑛⦌𝐴 ⊆ ∪ 𝑛 ∈ ℕ 𝐴)
61	60	adantl 487	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → ⦋𝑘 / 𝑛⦌𝐴 ⊆ ∪ 𝑛 ∈ ℕ 𝐴)
62		volss 25801	. . . . . . . . . . 11 ⊢ ((⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol ∧ ∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ⦋𝑘 / 𝑛⦌𝐴 ⊆ ∪ 𝑛 ∈ ℕ 𝐴) → (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
63	55, 57, 61, 62	syl3anc 1398	. . . . . . . . . 10 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
64	63	adantlr 728	. . . . . . . . 9 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ 𝑘 ∈ ℕ) → (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
65	64	adantlr 728	. . . . . . . 8 ⊢ ((((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) ∧ 𝑘 ∈ ℕ) → (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
66	65	ralrimiva 3154	. . . . . . 7 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∀𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
67		r19.29r 3126	. . . . . . 7 ⊢ ((∃𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ ∀𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)) → ∃𝑘 ∈ ℕ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
68	51, 66, 67	syl2anc 596	. . . . . 6 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑘 ∈ ℕ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
69		breq1 5106	. . . . . . . 8 ⊢ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ → ((vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴) ↔ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
70	69	biimpa 482	. . . . . . 7 ⊢ (((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)) → +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
71	70	reximi 3100	. . . . . 6 ⊢ (∃𝑘 ∈ ℕ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)) → ∃𝑘 ∈ ℕ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
72	68, 71	syl 18	. . . . 5 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑘 ∈ ℕ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
73		1nn 12301	. . . . . 6 ⊢ 1 ∈ ℕ
74		ne0i 4287	. . . . . 6 ⊢ (1 ∈ ℕ → ℕ ≠ ∅)
75		r19.9rzv 4461	. . . . . 6 ⊢ (ℕ ≠ ∅ → (+∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴) ↔ ∃𝑘 ∈ ℕ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
76	73, 74, 75	mp2b 10	. . . . 5 ⊢ (+∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴) ↔ ∃𝑘 ∈ ℕ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
77	72, 76	sylibr 237	. . . 4 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
78		iccssxr 13516	. . . . . . . 8 ⊢ (0[,]+∞) ⊆ ℝ^*
79	12	ffvelcdmi 7072	. . . . . . . 8 ⊢ (∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol → (vol‘∪ 𝑛 ∈ ℕ 𝐴) ∈ (0[,]+∞))
80	78, 79	sselid 3929	. . . . . . 7 ⊢ (∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol → (vol‘∪ 𝑛 ∈ ℕ 𝐴) ∈ ℝ^*)
81	56, 80	syl 18	. . . . . 6 ⊢ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → (vol‘∪ 𝑛 ∈ ℕ 𝐴) ∈ ℝ^*)
82	81	ad2antrr 739	. . . . 5 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) ∈ ℝ^*)
83		xgepnf 13250	. . . . 5 ⊢ ((vol‘∪ 𝑛 ∈ ℕ 𝐴) ∈ ℝ^* → (+∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴) ↔ (vol‘∪ 𝑛 ∈ ℕ 𝐴) = +∞))
84	82, 83	syl 18	. . . 4 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → (+∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴) ↔ (vol‘∪ 𝑛 ∈ ℕ 𝐴) = +∞))
85	77, 84	mpbid 235	. . 3 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = +∞)
86		nfdisj1 5084	. . . . . 6 ⊢ Ⅎ𝑛Disj 𝑛 ∈ ℕ 𝐴
87	7, 86	nfan 1932	. . . . 5 ⊢ Ⅎ𝑛(∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴)
88		nfre1 3287	. . . . 5 ⊢ Ⅎ𝑛∃𝑛 ∈ ℕ (vol‘𝐴) = +∞
89	87, 88	nfan 1932	. . . 4 ⊢ Ⅎ𝑛((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞)
90		nnex 12296	. . . . 5 ⊢ ℕ ∈ V
91	90	a1i 11	. . . 4 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ℕ ∈ V)
92	14	3ad2antr3 1209	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ (Disj 𝑛 ∈ ℕ 𝐴 ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞ ∧ 𝑛 ∈ ℕ)) → (vol‘𝐴) ∈ (0[,]+∞))
93	92	3anassrs 1381	. . . 4 ⊢ ((((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ (0[,]+∞))
94		simpr 490	. . . 4 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞)
95	89, 91, 93, 94	esumpinfval 34624	. . 3 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → Σ^*𝑛 ∈ ℕ(vol‘𝐴) = +∞)
96	85, 95	eqtr4d 2798	. 2 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = Σ^*𝑛 ∈ ℕ(vol‘𝐴))
97		exmid 908	. . . . 5 ⊢ (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ¬ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
98		rexnal 3114	. . . . . 6 ⊢ (∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ ↔ ¬ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
99	98	orbi2i 926	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ) ↔ (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ¬ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ))
100	97, 99	mpbir 234	. . . 4 ⊢ (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ)
101		r19.29 3125	. . . . . . 7 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ) → ∃𝑛 ∈ ℕ (𝐴 ∈ dom vol ∧ ¬ (vol‘𝐴) ∈ ℝ))
102		xrge0nre 13539	. . . . . . . . 9 ⊢ (((vol‘𝐴) ∈ (0[,]+∞) ∧ ¬ (vol‘𝐴) ∈ ℝ) → (vol‘𝐴) = +∞)
103	13, 102	sylan 592	. . . . . . . 8 ⊢ ((𝐴 ∈ dom vol ∧ ¬ (vol‘𝐴) ∈ ℝ) → (vol‘𝐴) = +∞)
104	103	reximi 3100	. . . . . . 7 ⊢ (∃𝑛 ∈ ℕ (𝐴 ∈ dom vol ∧ ¬ (vol‘𝐴) ∈ ℝ) → ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞)
105	101, 104	syl 18	. . . . . 6 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ) → ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞)
106	105	ex 418	. . . . 5 ⊢ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → (∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ → ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞))
107	106	orim2d 982	. . . 4 ⊢ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → ((∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ) → (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞)))
108	100, 107	mpi 21	. . 3 ⊢ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞))
109	108	adantr 486	. 2 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) → (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞))
110	42, 96, 109	mpjaodan 973	1 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = Σ^*𝑛 ∈ ℕ(vol‘𝐴))

Colors of variables: wff setvar class

This proof depends on syntax axioms: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 401 ∨ wo 861 ∧ w3a 1103 = wceq 1570 ∈ wcel 2145 ≠ wne 2955 ∀wral 3076 ∃wrex 3086 Vcvv 3450 ⦋csb 3847 ⊆ wss 3899 ∅c0 4279 ∪ ciun 4951 Disj wdisj 5070 class class class wbr 5103 ↦ cmpt 5186 dom cdm 5648 ran crn 5649 ⟶wf 6524 ‘cfv 6528 (class class class)co 7409 supcsup 9410 ℝcr 11156 0cc0 11157 1c1 11158 + caddc 11160 +∞cpnf 11297 ℝ^*cxr 11299 < clt 11300 ≤ cle 11301 ℕcn 12290 [,)cico 13433 [,]cicc 13434 seqcseq 14098 volcvol 25731 Σ^*cesum 34578

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 1943 ax-6 2000 ax-7 2041 ax-8 2147 ax-9 2155 ax-10 2178 ax-11 2194 ax-12 2213 ax-ext 2732 ax-rep 5232 ax-sep 5249 ax-nul 5260 ax-pow 5327 ax-pr 5391 ax-un 7735 ax-inf2 9620 ax-cc 10470 ax-cnex 11213 ax-resscn 11214 ax-1cn 11215 ax-icn 11216 ax-addcl 11217 ax-addrcl 11218 ax-mulcl 11219 ax-mulrcl 11220 ax-mulcom 11221 ax-addass 11222 ax-mulass 11223 ax-distr 11224 ax-i2m1 11225 ax-1ne0 11226 ax-1rid 11227 ax-rnegex 11228 ax-rrecex 11229 ax-cnre 11230 ax-pre-lttri 11231 ax-pre-lttrn 11232 ax-pre-ltadd 11233 ax-pre-mulgt0 11234 ax-pre-sup 11235 ax-addf 11236 ax-mulf 11237

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 2100 df-mo 2564 df-eu 2594 df-clab 2739 df-cleq 2752 df-clel 2835 df-nfc 2909 df-ne 2956 df-nel 3062 df-ral 3077 df-rex 3087 df-rmo 3365 df-reu 3366 df-rab 3413 df-v 3452 df-sbc 3740 df-csb 3848 df-dif 3902 df-un 3904 df-in 3906 df-ss 3916 df-pss 3919 df-nul 4280 df-if 4483 df-pw 4559 df-sn 4585 df-pr 4587 df-tp 4589 df-op 4591 df-uni 4868 df-int 4908 df-iun 4953 df-iin 4954 df-disj 5071 df-br 5104 df-opab 5168 df-mpt 5187 df-tr 5213 df-id 5543 df-eprel 5548 df-po 5556 df-so 5557 df-fr 5601 df-se 5602 df-we 5603 df-xp 5654 df-rel 5655 df-cnv 5656 df-co 5657 df-dm 5658 df-rn 5659 df-res 5660 df-ima 5661 df-pred 6294 df-ord 6355 df-on 6356 df-lim 6357 df-suc 6358 df-iota 6484 df-fun 6530 df-fn 6531 df-f 6532 df-f1 6533 df-fo 6534 df-f1o 6535 df-fv 6536 df-isom 6537 df-riota 7366 df-ov 7412 df-oprab 7413 df-mpo 7414 df-of 7677 df-om 7862 df-1st 7985 df-2nd 7986 df-supp 8157 df-frecs 8278 df-wrecs 8309 df-recs 8358 df-rdg 8397 df-1o 8455 df-2o 8456 df-oadd 8459 df-er 8696 df-map 8828 df-pm 8829 df-ixp 8905 df-en 8953 df-dom 8954 df-sdom 8955 df-fin 8956 df-fsupp 9332 df-fi 9381 df-sup 9412 df-inf 9413 df-oi 9482 df-dju 9939 df-card 9977 df-pnf 11302 df-mnf 11303 df-xr 11304 df-ltxr 11305 df-le 11306 df-sub 11500 df-neg 11501 df-div 11929 df-nn 12291 df-2 12360 df-3 12361 df-4 12362 df-5 12363 df-6 12364 df-7 12365 df-8 12366 df-9 12367 df-n0 12562 df-xnn0 12635 df-z 12649 df-dec 12770 df-uz 12921 df-q 13031 df-rp 13076 df-xneg 13196 df-xadd 13197 df-xmul 13198 df-ioo 13435 df-ioc 13436 df-ico 13437 df-icc 13438 df-fz 13595 df-fzo 13743 df-fl 13886 df-mod 13964 df-seq 14099 df-exp 14159 df-fac 14371 df-bc 14400 df-hash 14428 df-shft 15173 df-cj 15219 df-re 15220 df-im 15221 df-sqrt 15355 df-abs 15356 df-limsup 15591 df-clim 15608 df-rlim 15609 df-sum 15807 df-ef 16186 df-sin 16188 df-cos 16189 df-pi 16191 df-struct 17272 df-sets 17289 df-slot 17307 df-ndx 17319 df-base 17335 df-ress 17356 df-plusg 17388 df-mulr 17389 df-starv 17390 df-sca 17391 df-vsca 17392 df-ip 17393 df-tset 17394 df-ple 17395 df-ds 17397 df-unif 17398 df-hom 17399 df-cco 17400 df-rest 17540 df-topn 17541 df-0g 17559 df-gsum 17560 df-topgen 17561 df-pt 17562 df-prds 17565 df-ordt 17620 df-xrs 17621 df-qtop 17626 df-imas 17627 df-xps 17629 df-mre 17703 df-mrc 17704 df-acs 17706 df-ps 18687 df-tsr 18688 df-plusf 18762 df-mgm 18763 df-sgrp 18855 df-mnd 18871 df-mhm 18925 df-submnd 18926 df-grp 19094 df-minusg 19095 df-sbg 19096 df-mulg 19225 df-subg 19280 df-cntz 19478 df-cmn 19943 df-abl 19944 df-mgp 20308 df-rng 20322 df-ur 20355 df-ring 20408 df-cring 20409 df-subrng 20745 df-subrg 20769 df-abv 21013 df-lmod 21084 df-scaf 21085 df-sra 21395 df-rgmod 21396 df-psmet 21617 df-xmet 21618 df-met 21619 df-bl 21620 df-mopn 21621 df-fbas 21622 df-fg 21623 df-cnfld 21626 df-top 23159 df-topon 23176 df-topsp 23198 df-bases 23211 df-cld 23284 df-ntr 23285 df-cls 23286 df-nei 23363 df-lp 23401 df-perf 23402 df-cn 23492 df-cnp 23493 df-haus 23580 df-tx 23828 df-hmeo 24021 df-fil 24112 df-fm 24204 df-flim 24205 df-flf 24206 df-tmd 24338 df-tgp 24339 df-tsms 24393 df-trg 24426 df-xms 24586 df-ms 24587 df-tms 24588 df-nm 24848 df-ngp 24849 df-nrg 24851 df-nlm 24852 df-ii 25145 df-cncf 25146 df-ovol 25732 df-vol 25733 df-limc 26133 df-dv 26134 df-log 26833 df-esum 34579

This theorem is used by: volmeas 34783

W3C validator