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 34727

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 25734 and voliun 25783. (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 3124	. . . . 5 ⊢ (∀𝑛 ∈ ℕ (𝐴 ∈ dom vol ∧ (vol‘𝐴) ∈ ℝ) ↔ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ))
2		eqid 2762	. . . . . 6 ⊢ seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))) = seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴)))
3		eqid 2762	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↦ (vol‘𝐴)) = (𝑛 ∈ ℕ ↦ (vol‘𝐴))
4	2, 3	voliun 25783	. . . . 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 3288	. . . . . . 7 ⊢ Ⅎ𝑛∀𝑛 ∈ ℕ 𝐴 ∈ dom vol
8		nfra1 3288	. . . . . . 7 ⊢ Ⅎ𝑛∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ
9	7, 8	nfan 1932	. . . . . 6 ⊢ Ⅎ𝑛(∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
10		simpr 490	. . . . . . . . . 10 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
11		rspa 3253	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → 𝐴 ∈ dom vol)
12		volf 25758	. . . . . . . . . . . 12 ⊢ vol:dom vol⟶(0[,]+∞)
13	12	ffvelcdmi 7079	. . . . . . . . . . 11 ⊢ (𝐴 ∈ dom vol → (vol‘𝐴) ∈ (0[,]+∞))
14	11, 13	syl 18	. . . . . . . . . 10 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ (0[,]+∞))
15	3	fvmpt2 7002	. . . . . . . . . 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 3262	. . . . . 6 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → ∀𝑛 ∈ ℕ ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = (vol‘𝐴))
20	9, 19	esumeq2d 34534	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → Σ^𝑛 ∈ ℕ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = Σ^𝑛 ∈ ℕ(vol‘𝐴))
21		simpr 490	. . . . . . . . 9 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
22	21	r19.21bi 3256	. . . . . . . 8 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ ℝ)
23	14	adantlr 728	. . . . . . . . 9 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ (0[,]+∞))
24		0xr 11283	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ^*
25		pnfxr 11290	. . . . . . . . . . 11 ⊢ +∞ ∈ ℝ^*
26		elicc1 13444	. . . . . . . . . . 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 13173	. . . . . . . . 9 ⊢ ((vol‘𝐴) ∈ ℝ → (vol‘𝐴) < +∞)
31	22, 30	syl 18	. . . . . . . 8 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) < +∞)
32		0re 11237	. . . . . . . . 9 ⊢ 0 ∈ ℝ
33		elico2 13465	. . . . . . . . 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 7113	. . . . . 6 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → (𝑛 ∈ ℕ ↦ (vol‘𝐴)):ℕ⟶(0[,)+∞))
37		nfmpt1 5208	. . . . . . 7 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ (vol‘𝐴))
38	37	esumfsupre 34568	. . . . . 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 2799	. . . 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 2800	. 2 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = Σ^*𝑛 ∈ ℕ(vol‘𝐴))
43		nfv 1947	. . . . . . . . 9 ⊢ Ⅎ𝑘(vol‘𝐴) = +∞
44		nfcv 2924	. . . . . . . . . . 11 ⊢ Ⅎ𝑛vol
45		nfcsb1v 3874	. . . . . . . . . . 11 ⊢ Ⅎ𝑛⦋𝑘 / 𝑛⦌𝐴
46	44, 45	nffv 6892	. . . . . . . . . 10 ⊢ Ⅎ𝑛(vol‘⦋𝑘 / 𝑛⦌𝐴)
47	46	nfeq1 2939	. . . . . . . . 9 ⊢ Ⅎ𝑛(vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞
48		csbeq1a 3864	. . . . . . . . . 10 ⊢ (𝑛 = 𝑘 → 𝐴 = ⦋𝑘 / 𝑛⦌𝐴)
49	48	fveqeq2d 6890	. . . . . . . . 9 ⊢ (𝑛 = 𝑘 → ((vol‘𝐴) = +∞ ↔ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞))
50	43, 47, 49	cbvrexw 3307	. . . . . . . 8 ⊢ (∃𝑛 ∈ ℕ (vol‘𝐴) = +∞ ↔ ∃𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞)
51	50	bilani 510	. . . . . . 7 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞)
52	45	nfel1 2940	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol
53	48	eleq1d 2847	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑘 → (𝐴 ∈ dom vol ↔ ⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol))
54	52, 53	rspc 3567	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → ⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol))
55	54	impcom 413	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → ⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol)
56		iunmbl 25782	. . . . . . . . . . . 12 ⊢ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → ∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol)
57	56	adantr 486	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → ∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol)
58		nfcv 2924	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛ℕ
59		nfcv 2924	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛𝑘
60	58, 59, 45, 48	ssiun2sf 33019	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → ⦋𝑘 / 𝑛⦌𝐴 ⊆ ∪ 𝑛 ∈ ℕ 𝐴)
61	60	adantl 487	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → ⦋𝑘 / 𝑛⦌𝐴 ⊆ ∪ 𝑛 ∈ ℕ 𝐴)
62		volss 25762	. . . . . . . . . . 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 3156	. . . . . . 7 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∀𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
67		r19.29r 3128	. . . . . . 7 ⊢ ((∃𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ ∀𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)) → ∃𝑘 ∈ ℕ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
68	51, 66, 67	syl2anc 596	. . . . . 6 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑘 ∈ ℕ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
69		breq1 5110	. . . . . . . 8 ⊢ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ → ((vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴) ↔ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
70	69	biimpa 482	. . . . . . 7 ⊢ (((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)) → +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
71	70	reximi 3102	. . . . . 6 ⊢ (∃𝑘 ∈ ℕ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)) → ∃𝑘 ∈ ℕ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
72	68, 71	syl 18	. . . . 5 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑘 ∈ ℕ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
73		1nn 12271	. . . . . 6 ⊢ 1 ∈ ℕ
74		ne0i 4290	. . . . . 6 ⊢ (1 ∈ ℕ → ℕ ≠ ∅)
75		r19.9rzv 4464	. . . . . 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 13485	. . . . . . . 8 ⊢ (0[,]+∞) ⊆ ℝ^*
79	12	ffvelcdmi 7079	. . . . . . . 8 ⊢ (∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol → (vol‘∪ 𝑛 ∈ ℕ 𝐴) ∈ (0[,]+∞))
80	78, 79	sselid 3932	. . . . . . 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 13219	. . . . 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 5088	. . . . . 6 ⊢ Ⅎ𝑛Disj 𝑛 ∈ ℕ 𝐴
87	7, 86	nfan 1932	. . . . 5 ⊢ Ⅎ𝑛(∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴)
88		nfre1 3289	. . . . 5 ⊢ Ⅎ𝑛∃𝑛 ∈ ℕ (vol‘𝐴) = +∞
89	87, 88	nfan 1932	. . . 4 ⊢ Ⅎ𝑛((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞)
90		nnex 12266	. . . . 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 34570	. . 3 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → Σ^*𝑛 ∈ ℕ(vol‘𝐴) = +∞)
96	85, 95	eqtr4d 2800	. 2 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = Σ^*𝑛 ∈ ℕ(vol‘𝐴))
97		exmid 908	. . . . 5 ⊢ (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ¬ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
98		rexnal 3116	. . . . . 6 ⊢ (∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ ↔ ¬ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
99	98	orbi2i 926	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ) ↔ (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ¬ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ))
100	97, 99	mpbir 234	. . . 4 ⊢ (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ)
101		r19.29 3127	. . . . . . 7 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ) → ∃𝑛 ∈ ℕ (𝐴 ∈ dom vol ∧ ¬ (vol‘𝐴) ∈ ℝ))
102		xrge0nre 13508	. . . . . . . . 9 ⊢ (((vol‘𝐴) ∈ (0[,]+∞) ∧ ¬ (vol‘𝐴) ∈ ℝ) → (vol‘𝐴) = +∞)
103	13, 102	sylan 592	. . . . . . . 8 ⊢ ((𝐴 ∈ dom vol ∧ ¬ (vol‘𝐴) ∈ ℝ) → (vol‘𝐴) = +∞)
104	103	reximi 3102	. . . . . . 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 2957 ∀wral 3078 ∃wrex 3088 Vcvv 3453 ⦋csb 3850 ⊆ wss 3902 ∅c0 4282 ∪ ciun 4954 Disj wdisj 5074 class class class wbr 5107 ↦ cmpt 5190 dom cdm 5659 ran crn 5660 ⟶wf 6533 ‘cfv 6537 (class class class)co 7416 supcsup 9413 ℝcr 11126 0cc0 11127 1c1 11128 + caddc 11130 +∞cpnf 11267 ℝ^*cxr 11269 < clt 11270 ≤ cle 11271 ℕcn 12260 [,)cico 13402 [,]cicc 13403 seqcseq 14067 volcvol 25692 Σ^*cesum 34524

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 2215 ax-ext 2734 ax-rep 5236 ax-sep 5255 ax-nul 5267 ax-pow 5334 ax-pr 5402 ax-un 7739 ax-inf2 9623 ax-cc 10440 ax-cnex 11183 ax-resscn 11184 ax-1cn 11185 ax-icn 11186 ax-addcl 11187 ax-addrcl 11188 ax-mulcl 11189 ax-mulrcl 11190 ax-mulcom 11191 ax-addass 11192 ax-mulass 11193 ax-distr 11194 ax-i2m1 11195 ax-1ne0 11196 ax-1rid 11197 ax-rnegex 11198 ax-rrecex 11199 ax-cnre 11200 ax-pre-lttri 11201 ax-pre-lttrn 11202 ax-pre-ltadd 11203 ax-pre-mulgt0 11204 ax-pre-sup 11205 ax-addf 11206 ax-mulf 11207

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 2566 df-eu 2596 df-clab 2741 df-cleq 2754 df-clel 2837 df-nfc 2911 df-ne 2958 df-nel 3064 df-ral 3079 df-rex 3089 df-rmo 3367 df-reu 3368 df-rab 3415 df-v 3455 df-sbc 3743 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4283 df-if 4486 df-pw 4562 df-sn 4588 df-pr 4590 df-tp 4592 df-op 4594 df-uni 4871 df-int 4911 df-iun 4956 df-iin 4957 df-disj 5075 df-br 5108 df-opab 5172 df-mpt 5191 df-tr 5217 df-id 5554 df-eprel 5559 df-po 5567 df-so 5568 df-fr 5612 df-se 5613 df-we 5614 df-xp 5665 df-rel 5666 df-cnv 5667 df-co 5668 df-dm 5669 df-rn 5670 df-res 5671 df-ima 5672 df-pred 6303 df-ord 6364 df-on 6365 df-lim 6366 df-suc 6367 df-iota 6493 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-isom 6546 df-riota 7373 df-ov 7419 df-oprab 7420 df-mpo 7421 df-of 7681 df-om 7866 df-1st 7989 df-2nd 7990 df-supp 8162 df-frecs 8283 df-wrecs 8314 df-recs 8363 df-rdg 8402 df-1o 8458 df-2o 8459 df-oadd 8462 df-er 8699 df-map 8831 df-pm 8832 df-ixp 8908 df-en 8956 df-dom 8957 df-sdom 8958 df-fin 8959 df-fsupp 9335 df-fi 9384 df-sup 9415 df-inf 9416 df-oi 9485 df-dju 9909 df-card 9947 df-pnf 11272 df-mnf 11273 df-xr 11274 df-ltxr 11275 df-le 11276 df-sub 11470 df-neg 11471 df-div 11899 df-nn 12261 df-2 12330 df-3 12331 df-4 12332 df-5 12333 df-6 12334 df-7 12335 df-8 12336 df-9 12337 df-n0 12532 df-xnn0 12605 df-z 12619 df-dec 12740 df-uz 12891 df-q 13001 df-rp 13045 df-xneg 13165 df-xadd 13166 df-xmul 13167 df-ioo 13404 df-ioc 13405 df-ico 13406 df-icc 13407 df-fz 13564 df-fzo 13712 df-fl 13855 df-mod 13933 df-seq 14068 df-exp 14128 df-fac 14340 df-bc 14369 df-hash 14397 df-shft 15142 df-cj 15188 df-re 15189 df-im 15190 df-sqrt 15324 df-abs 15325 df-limsup 15560 df-clim 15577 df-rlim 15578 df-sum 15776 df-ef 16157 df-sin 16159 df-cos 16160 df-pi 16162 df-struct 17243 df-sets 17260 df-slot 17278 df-ndx 17290 df-base 17306 df-ress 17327 df-plusg 17359 df-mulr 17360 df-starv 17361 df-sca 17362 df-vsca 17363 df-ip 17364 df-tset 17365 df-ple 17366 df-ds 17368 df-unif 17369 df-hom 17370 df-cco 17371 df-rest 17511 df-topn 17512 df-0g 17530 df-gsum 17531 df-topgen 17532 df-pt 17533 df-prds 17536 df-ordt 17591 df-xrs 17592 df-qtop 17597 df-imas 17598 df-xps 17600 df-mre 17674 df-mrc 17675 df-acs 17677 df-ps 18658 df-tsr 18659 df-plusf 18733 df-mgm 18734 df-sgrp 18823 df-mnd 18839 df-mhm 18892 df-submnd 18893 df-grp 19061 df-minusg 19062 df-sbg 19063 df-mulg 19192 df-subg 19247 df-cntz 19445 df-cmn 19910 df-abl 19911 df-mgp 20275 df-rng 20289 df-ur 20322 df-ring 20375 df-cring 20376 df-subrng 20709 df-subrg 20733 df-abv 20976 df-lmod 21047 df-scaf 21048 df-sra 21358 df-rgmod 21359 df-psmet 21578 df-xmet 21579 df-met 21580 df-bl 21581 df-mopn 21582 df-fbas 21583 df-fg 21584 df-cnfld 21587 df-top 23120 df-topon 23137 df-topsp 23159 df-bases 23172 df-cld 23245 df-ntr 23246 df-cls 23247 df-nei 23324 df-lp 23362 df-perf 23363 df-cn 23453 df-cnp 23454 df-haus 23541 df-tx 23789 df-hmeo 23982 df-fil 24073 df-fm 24165 df-flim 24166 df-flf 24167 df-tmd 24299 df-tgp 24300 df-tsms 24354 df-trg 24387 df-xms 24547 df-ms 24548 df-tms 24549 df-nm 24809 df-ngp 24810 df-nrg 24812 df-nlm 24813 df-ii 25106 df-cncf 25107 df-ovol 25693 df-vol 25694 df-limc 26095 df-dv 26096 df-log 26791 df-esum 34525

This theorem is used by: volmeas 34729

W3C validator