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 34929

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 25853 and voliun 25902. (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 3126	. . . . 5 ⊢ (∀𝑛 ∈ ℕ (𝐴 ∈ dom vol ∧ (vol‘𝐴) ∈ ℝ) ↔ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ))
2		eqid 2763	. . . . . 6 ⊢ seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴))) = seq1( + , (𝑛 ∈ ℕ ↦ (vol‘𝐴)))
3		eqid 2763	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↦ (vol‘𝐴)) = (𝑛 ∈ ℕ ↦ (vol‘𝐴))
4	2, 3	voliun 25902	. . . . 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 3290	. . . . . . 7 ⊢ Ⅎ𝑛∀𝑛 ∈ ℕ 𝐴 ∈ dom vol
8		nfra1 3290	. . . . . . 7 ⊢ Ⅎ𝑛∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ
9	7, 8	nfan 1934	. . . . . 6 ⊢ Ⅎ𝑛(∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
10		simpr 490	. . . . . . . . . 10 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
11		rspa 3255	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → 𝐴 ∈ dom vol)
12		volf 25877	. . . . . . . . . . . 12 ⊢ vol:dom vol⟶(0[,]+∞)
13	12	ffvelcdmi 7104	. . . . . . . . . . 11 ⊢ (𝐴 ∈ dom vol → (vol‘𝐴) ∈ (0[,]+∞))
14	11, 13	syl 18	. . . . . . . . . 10 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ (0[,]+∞))
15	3	fvmpt2 7025	. . . . . . . . . 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 3264	. . . . . 6 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → ∀𝑛 ∈ ℕ ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = (vol‘𝐴))
20	9, 19	esumeq2d 34736	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → Σ^𝑛 ∈ ℕ((𝑛 ∈ ℕ ↦ (vol‘𝐴))‘𝑛) = Σ^𝑛 ∈ ℕ(vol‘𝐴))
21		simpr 490	. . . . . . . . 9 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
22	21	r19.21bi 3258	. . . . . . . 8 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ ℝ)
23	14	adantlr 728	. . . . . . . . 9 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ (0[,]+∞))
24		0xr 11380	. . . . . . . . . . 11 ⊢ 0 ∈ ℝ^*
25		pnfxr 11387	. . . . . . . . . . 11 ⊢ +∞ ∈ ℝ^*
26		elicc1 13544	. . . . . . . . . . 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 13273	. . . . . . . . 9 ⊢ ((vol‘𝐴) ∈ ℝ → (vol‘𝐴) < +∞)
31	22, 30	syl 18	. . . . . . . 8 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) < +∞)
32		0re 11334	. . . . . . . . 9 ⊢ 0 ∈ ℝ
33		elico2 13565	. . . . . . . . 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 7138	. . . . . 6 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → (𝑛 ∈ ℕ ↦ (vol‘𝐴)):ℕ⟶(0[,)+∞))
37		nfmpt1 5207	. . . . . . 7 ⊢ Ⅎ𝑛(𝑛 ∈ ℕ ↦ (vol‘𝐴))
38	37	esumfsupre 34770	. . . . . 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 2800	. . . 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 2801	. 2 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = Σ^*𝑛 ∈ ℕ(vol‘𝐴))
43		nfv 1949	. . . . . . . . 9 ⊢ Ⅎ𝑘(vol‘𝐴) = +∞
44		nfcv 2926	. . . . . . . . . . 11 ⊢ Ⅎ𝑛vol
45		nfcsb1v 3875	. . . . . . . . . . 11 ⊢ Ⅎ𝑛⦋𝑘 / 𝑛⦌𝐴
46	44, 45	nffv 6915	. . . . . . . . . 10 ⊢ Ⅎ𝑛(vol‘⦋𝑘 / 𝑛⦌𝐴)
47	46	nfeq1 2941	. . . . . . . . 9 ⊢ Ⅎ𝑛(vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞
48		csbeq1a 3865	. . . . . . . . . 10 ⊢ (𝑛 = 𝑘 → 𝐴 = ⦋𝑘 / 𝑛⦌𝐴)
49	48	fveqeq2d 6913	. . . . . . . . 9 ⊢ (𝑛 = 𝑘 → ((vol‘𝐴) = +∞ ↔ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞))
50	43, 47, 49	cbvrexw 3309	. . . . . . . 8 ⊢ (∃𝑛 ∈ ℕ (vol‘𝐴) = +∞ ↔ ∃𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞)
51	50	bilani 510	. . . . . . 7 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞)
52	45	nfel1 2942	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol
53	48	eleq1d 2849	. . . . . . . . . . . . 13 ⊢ (𝑛 = 𝑘 → (𝐴 ∈ dom vol ↔ ⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol))
54	52, 53	rspc 3568	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → ⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol))
55	54	impcom 413	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → ⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol)
56		iunmbl 25901	. . . . . . . . . . . 12 ⊢ (∀𝑛 ∈ ℕ 𝐴 ∈ dom vol → ∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol)
57	56	adantr 486	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → ∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol)
58		nfcv 2926	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛ℕ
59		nfcv 2926	. . . . . . . . . . . . 13 ⊢ Ⅎ𝑛𝑘
60	58, 59, 45, 48	ssiun2sf 33223	. . . . . . . . . . . 12 ⊢ (𝑘 ∈ ℕ → ⦋𝑘 / 𝑛⦌𝐴 ⊆ ∪ 𝑛 ∈ ℕ 𝐴)
61	60	adantl 487	. . . . . . . . . . 11 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ 𝑘 ∈ ℕ) → ⦋𝑘 / 𝑛⦌𝐴 ⊆ ∪ 𝑛 ∈ ℕ 𝐴)
62		volss 25881	. . . . . . . . . . 11 ⊢ ((⦋𝑘 / 𝑛⦌𝐴 ∈ dom vol ∧ ∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ⦋𝑘 / 𝑛⦌𝐴 ⊆ ∪ 𝑛 ∈ ℕ 𝐴) → (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
63	55, 57, 61, 62	syl3anc 1399	. . . . . . . . . 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 3158	. . . . . . 7 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∀𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
67		r19.29r 3130	. . . . . . 7 ⊢ ((∃𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ ∀𝑘 ∈ ℕ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)) → ∃𝑘 ∈ ℕ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
68	51, 66, 67	syl2anc 596	. . . . . 6 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑘 ∈ ℕ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
69		breq1 5109	. . . . . . . 8 ⊢ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ → ((vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴) ↔ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)))
70	69	biimpa 482	. . . . . . 7 ⊢ (((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)) → +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
71	70	reximi 3104	. . . . . 6 ⊢ (∃𝑘 ∈ ℕ ((vol‘⦋𝑘 / 𝑛⦌𝐴) = +∞ ∧ (vol‘⦋𝑘 / 𝑛⦌𝐴) ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴)) → ∃𝑘 ∈ ℕ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
72	68, 71	syl 18	. . . . 5 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑘 ∈ ℕ +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ 𝐴))
73		1nn 12370	. . . . . 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 13585	. . . . . . . 8 ⊢ (0[,]+∞) ⊆ ℝ^*
79	12	ffvelcdmi 7104	. . . . . . . 8 ⊢ (∪ 𝑛 ∈ ℕ 𝐴 ∈ dom vol → (vol‘∪ 𝑛 ∈ ℕ 𝐴) ∈ (0[,]+∞))
80	78, 79	sselid 3911	. . . . . . 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 13319	. . . . 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 5087	. . . . . 6 ⊢ Ⅎ𝑛Disj 𝑛 ∈ ℕ 𝐴
87	7, 86	nfan 1934	. . . . 5 ⊢ Ⅎ𝑛(∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴)
88		nfre1 3291	. . . . 5 ⊢ Ⅎ𝑛∃𝑛 ∈ ℕ (vol‘𝐴) = +∞
89	87, 88	nfan 1934	. . . 4 ⊢ Ⅎ𝑛((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞)
90		nnex 12365	. . . . 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 1382	. . . 4 ⊢ ((((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) ∧ 𝑛 ∈ ℕ) → (vol‘𝐴) ∈ (0[,]+∞))
94		simpr 490	. . . 4 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞)
95	89, 91, 93, 94	esumpinfval 34772	. . 3 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → Σ^*𝑛 ∈ ℕ(vol‘𝐴) = +∞)
96	85, 95	eqtr4d 2801	. 2 ⊢ (((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ Disj 𝑛 ∈ ℕ 𝐴) ∧ ∃𝑛 ∈ ℕ (vol‘𝐴) = +∞) → (vol‘∪ 𝑛 ∈ ℕ 𝐴) = Σ^*𝑛 ∈ ℕ(vol‘𝐴))
97		exmid 908	. . . . 5 ⊢ (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ¬ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
98		rexnal 3118	. . . . . 6 ⊢ (∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ ↔ ¬ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ)
99	98	orbi2i 926	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ) ↔ (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ¬ ∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ))
100	97, 99	mpbir 234	. . . 4 ⊢ (∀𝑛 ∈ ℕ (vol‘𝐴) ∈ ℝ ∨ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ)
101		r19.29 3129	. . . . . . 7 ⊢ ((∀𝑛 ∈ ℕ 𝐴 ∈ dom vol ∧ ∃𝑛 ∈ ℕ ¬ (vol‘𝐴) ∈ ℝ) → ∃𝑛 ∈ ℕ (𝐴 ∈ dom vol ∧ ¬ (vol‘𝐴) ∈ ℝ))
102		xrge0nre 13608	. . . . . . . . 9 ⊢ (((vol‘𝐴) ∈ (0[,]+∞) ∧ ¬ (vol‘𝐴) ∈ ℝ) → (vol‘𝐴) = +∞)
103	13, 102	sylan 592	. . . . . . . 8 ⊢ ((𝐴 ∈ dom vol ∧ ¬ (vol‘𝐴) ∈ ℝ) → (vol‘𝐴) = +∞)
104	103	reximi 3104	. . . . . . 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 2147 ≠ wne 2959 ∀wral 3080 ∃wrex 3090 Vcvv 3454 ⦋csb 3851 ⊆ wss 3900 ∅c0 4281 ∪ ciun 4954 Disj wdisj 5073 class class class wbr 5106 ↦ cmpt 5189 dom cdm 5655 ran crn 5656 ⟶wf 6551 ‘cfv 6555 (class class class)co 7440 supcsup 9456 ℝcr 11223 0cc0 11224 1c1 11225 + caddc 11227 +∞cpnf 11364 ℝ^*cxr 11366 < clt 11367 ≤ cle 11368 ℕcn 12359 [,)cico 13502 [,]cicc 13503 seqcseq 14168 volcvol 25811 Σ^*cesum 34726

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 ax-addf 11303 ax-mulf 11304

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-tp 4593 df-op 4839 df-uni 4871 df-int 4911 df-iun 4956 df-iin 4957 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-supp 8202 df-frecs 8324 df-wrecs 8355 df-recs 8404 df-rdg 8443 df-1o 8501 df-2o 8502 df-oadd 8505 df-er 8742 df-map 8874 df-pm 8875 df-ixp 8951 df-en 8999 df-dom 9000 df-sdom 9001 df-fin 9002 df-fsupp 9379 df-fi 9427 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-4 12431 df-5 12432 df-6 12433 df-7 12434 df-8 12435 df-9 12436 df-n0 12631 df-xnn0 12704 df-z 12718 df-dec 12839 df-uz 12990 df-q 13100 df-rp 13145 df-xneg 13265 df-xadd 13266 df-xmul 13267 df-ioo 13504 df-ioc 13505 df-ico 13506 df-icc 13507 df-fz 13664 df-fzo 13813 df-fl 13956 df-mod 14034 df-seq 14169 df-exp 14229 df-fac 14442 df-bc 14471 df-hash 14499 df-shft 15246 df-cj 15292 df-re 15293 df-im 15294 df-sqrt 15428 df-abs 15429 df-limsup 15664 df-clim 15681 df-rlim 15682 df-sum 15880 df-ef 16259 df-sin 16261 df-cos 16262 df-pi 16264 df-struct 17351 df-sets 17368 df-slot 17386 df-ndx 17398 df-base 17414 df-ress 17435 df-plusg 17467 df-mulr 17468 df-starv 17469 df-sca 17470 df-vsca 17471 df-ip 17472 df-tset 17473 df-ple 17474 df-ds 17476 df-unif 17477 df-hom 17478 df-cco 17479 df-rest 17619 df-topn 17620 df-0g 17638 df-gsum 17639 df-topgen 17640 df-pt 17641 df-prds 17644 df-ordt 17699 df-xrs 17700 df-qtop 17705 df-imas 17706 df-xps 17708 df-mre 17782 df-mrc 17783 df-acs 17785 df-ps 18766 df-tsr 18767 df-plusf 18841 df-mgm 18842 df-sgrp 18934 df-mnd 18950 df-mhm 19004 df-submnd 19005 df-grp 19173 df-minusg 19174 df-sbg 19175 df-mulg 19304 df-subg 19359 df-cntz 19558 df-cmn 20023 df-abl 20024 df-mgp 20388 df-rng 20402 df-ur 20435 df-ring 20488 df-cring 20489 df-subrng 20825 df-subrg 20849 df-abv 21093 df-lmod 21164 df-scaf 21165 df-sra 21475 df-rgmod 21476 df-psmet 21697 df-xmet 21698 df-met 21699 df-bl 21700 df-mopn 21701 df-fbas 21702 df-fg 21703 df-cnfld 21706 df-top 23239 df-topon 23256 df-topsp 23278 df-bases 23291 df-cld 23364 df-ntr 23365 df-cls 23366 df-nei 23443 df-lp 23481 df-perf 23482 df-cn 23572 df-cnp 23573 df-haus 23660 df-tx 23908 df-hmeo 24101 df-fil 24192 df-fm 24284 df-flim 24285 df-flf 24286 df-tmd 24418 df-tgp 24419 df-tsms 24473 df-trg 24506 df-xms 24666 df-ms 24667 df-tms 24668 df-nm 24928 df-ngp 24929 df-nrg 24931 df-nlm 24932 df-ii 25225 df-cncf 25226 df-ovol 25812 df-vol 25813 df-limc 26213 df-dv 26214 df-log 26911 df-esum 34727

This theorem is used by: volmeas 34931

W3C validator