voliunsge0lem - Mathbox for Glauco Siliprandi

	Mathbox for Glauco Siliprandi		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > voliunsge0lem		Structured version Visualization version GIF version

Theorem voliunsge0lem 47112

Description: The Lebesgue measure function is countably additive. (Contributed by Glauco Siliprandi, 3-Mar-2021.)

**Hypotheses**
Ref	Expression
voliunsge0lem.s	⊢ 𝑆 = seq1( + , 𝐺)
voliunsge0lem.g	⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))
voliunsge0lem.e	⊢ (𝜑 → 𝐸:ℕ⟶dom vol)
voliunsge0lem.d	⊢ (𝜑 → Disj 𝑛 ∈ ℕ (𝐸‘𝑛))

**Assertion**
Ref	Expression
voliunsge0lem	⊢ (𝜑 → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = (Σ^{^}‘(𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))))

Distinct variable groups: 𝑛,𝐸 𝜑,𝑛 Allowed substitution hints: 𝑆(𝑛) 𝐺(𝑛)

Proof of Theorem voliunsge0lem Dummy variable 𝑚 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		nfv 1941	. . . . 5 ⊢ Ⅎ𝑛𝜑
2		nfcv 2931	. . . . . . 7 ⊢ Ⅎ𝑛vol
3		nfiu1 4996	. . . . . . 7 ⊢ Ⅎ𝑛∪ 𝑛 ∈ ℕ (𝐸‘𝑛)
4	2, 3	nffv 6892	. . . . . 6 ⊢ Ⅎ𝑛(vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛))
5	4	nfeq1 2946	. . . . 5 ⊢ Ⅎ𝑛(vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = +∞
6		iccssxr 13457	. . . . . . . . . 10 ⊢ (0[,]+∞) ⊆ ℝ^*
7		volf 25657	. . . . . . . . . . . 12 ⊢ vol:dom vol⟶(0[,]+∞)
8	7	a1i 11	. . . . . . . . . . 11 ⊢ (𝜑 → vol:dom vol⟶(0[,]+∞))
9		voliunsge0lem.e	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐸:ℕ⟶dom vol)
10	9	ffvelcdmda 7080	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸‘𝑛) ∈ dom vol)
11	10	ralrimiva 3163	. . . . . . . . . . . 12 ⊢ (𝜑 → ∀𝑛 ∈ ℕ (𝐸‘𝑛) ∈ dom vol)
12		iunmbl 25681	. . . . . . . . . . . 12 ⊢ (∀𝑛 ∈ ℕ (𝐸‘𝑛) ∈ dom vol → ∪ 𝑛 ∈ ℕ (𝐸‘𝑛) ∈ dom vol)
13	11, 12	syl 18	. . . . . . . . . . 11 ⊢ (𝜑 → ∪ 𝑛 ∈ ℕ (𝐸‘𝑛) ∈ dom vol)
14	8, 13	ffvelcdmd 7081	. . . . . . . . . 10 ⊢ (𝜑 → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) ∈ (0[,]+∞))
15	6, 14	sselid 3943	. . . . . . . . 9 ⊢ (𝜑 → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) ∈ ℝ^*)
16	15	adantr 485	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) ∈ ℝ^*)
17	16	3adant3 1148	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ ∧ (vol‘(𝐸‘𝑛)) = +∞) → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) ∈ ℝ^*)
18		id 23	. . . . . . . . . 10 ⊢ ((vol‘(𝐸‘𝑛)) = +∞ → (vol‘(𝐸‘𝑛)) = +∞)
19	18	eqcomd 2775	. . . . . . . . 9 ⊢ ((vol‘(𝐸‘𝑛)) = +∞ → +∞ = (vol‘(𝐸‘𝑛)))
20	19	3ad2ant3 1151	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ ∧ (vol‘(𝐸‘𝑛)) = +∞) → +∞ = (vol‘(𝐸‘𝑛)))
21	13	adantr 485	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ∪ 𝑛 ∈ ℕ (𝐸‘𝑛) ∈ dom vol)
22		ssiun2 5016	. . . . . . . . . . 11 ⊢ (𝑛 ∈ ℕ → (𝐸‘𝑛) ⊆ ∪ 𝑛 ∈ ℕ (𝐸‘𝑛))
23	22	adantl 486	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐸‘𝑛) ⊆ ∪ 𝑛 ∈ ℕ (𝐸‘𝑛))
24		volss 25661	. . . . . . . . . 10 ⊢ (((𝐸‘𝑛) ∈ dom vol ∧ ∪ 𝑛 ∈ ℕ (𝐸‘𝑛) ∈ dom vol ∧ (𝐸‘𝑛) ⊆ ∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) → (vol‘(𝐸‘𝑛)) ≤ (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)))
25	10, 21, 23, 24	syl3anc 1396	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol‘(𝐸‘𝑛)) ≤ (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)))
26	25	3adant3 1148	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ ∧ (vol‘(𝐸‘𝑛)) = +∞) → (vol‘(𝐸‘𝑛)) ≤ (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)))
27	20, 26	eqbrtrd 5137	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ ∧ (vol‘(𝐸‘𝑛)) = +∞) → +∞ ≤ (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)))
28	17, 27	xrgepnfd 45973	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ ∧ (vol‘(𝐸‘𝑛)) = +∞) → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = +∞)
29	28	3exp 1135	. . . . 5 ⊢ (𝜑 → (𝑛 ∈ ℕ → ((vol‘(𝐸‘𝑛)) = +∞ → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = +∞)))
30	1, 5, 29	rexlimd 3278	. . . 4 ⊢ (𝜑 → (∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞ → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = +∞))
31	30	imp 411	. . 3 ⊢ ((𝜑 ∧ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = +∞)
32		nfre1 3296	. . . . 5 ⊢ Ⅎ𝑛∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞
33	1, 32	nfan 1926	. . . 4 ⊢ Ⅎ𝑛(𝜑 ∧ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞)
34		nnex 12239	. . . . 5 ⊢ ℕ ∈ V
35	34	a1i 11	. . . 4 ⊢ ((𝜑 ∧ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) → ℕ ∈ V)
36	7	a1i 11	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → vol:dom vol⟶(0[,]+∞))
37	36, 10	ffvelcdmd 7081	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol‘(𝐸‘𝑛)) ∈ (0[,]+∞))
38	37	adantlr 727	. . . 4 ⊢ (((𝜑 ∧ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) ∧ 𝑛 ∈ ℕ) → (vol‘(𝐸‘𝑛)) ∈ (0[,]+∞))
39		simpr 489	. . . 4 ⊢ ((𝜑 ∧ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) → ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞)
40	33, 35, 38, 39	sge0pnfmpt 47085	. . 3 ⊢ ((𝜑 ∧ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) → (Σ^{^}‘(𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))) = +∞)
41	31, 40	eqtr4d 2807	. 2 ⊢ ((𝜑 ∧ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = (Σ^{^}‘(𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))))
42		ralnex 3097	. . . . 5 ⊢ (∀𝑛 ∈ ℕ ¬ (vol‘(𝐸‘𝑛)) = +∞ ↔ ¬ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞)
43	42	bilanri 511	. . . 4 ⊢ ((𝜑 ∧ ¬ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) → ∀𝑛 ∈ ℕ ¬ (vol‘(𝐸‘𝑛)) = +∞)
44	37	adantr 485	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ ¬ (vol‘(𝐸‘𝑛)) = +∞) → (vol‘(𝐸‘𝑛)) ∈ (0[,]+∞))
45	18	necon3bi 2990	. . . . . . . . . 10 ⊢ (¬ (vol‘(𝐸‘𝑛)) = +∞ → (vol‘(𝐸‘𝑛)) ≠ +∞)
46	45	adantl 486	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ ¬ (vol‘(𝐸‘𝑛)) = +∞) → (vol‘(𝐸‘𝑛)) ≠ +∞)
47		ge0xrre 46173	. . . . . . . . 9 ⊢ (((vol‘(𝐸‘𝑛)) ∈ (0[,]+∞) ∧ (vol‘(𝐸‘𝑛)) ≠ +∞) → (vol‘(𝐸‘𝑛)) ∈ ℝ)
48	44, 46, 47	syl2anc 595	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ ℕ) ∧ ¬ (vol‘(𝐸‘𝑛)) = +∞) → (vol‘(𝐸‘𝑛)) ∈ ℝ)
49	48	ex 417	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (¬ (vol‘(𝐸‘𝑛)) = +∞ → (vol‘(𝐸‘𝑛)) ∈ ℝ))
50		renepnf 11257	. . . . . . . . 9 ⊢ ((vol‘(𝐸‘𝑛)) ∈ ℝ → (vol‘(𝐸‘𝑛)) ≠ +∞)
51	50	neneqd 2969	. . . . . . . 8 ⊢ ((vol‘(𝐸‘𝑛)) ∈ ℝ → ¬ (vol‘(𝐸‘𝑛)) = +∞)
52	51	a1i 11	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((vol‘(𝐸‘𝑛)) ∈ ℝ → ¬ (vol‘(𝐸‘𝑛)) = +∞))
53	49, 52	impbid 215	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (¬ (vol‘(𝐸‘𝑛)) = +∞ ↔ (vol‘(𝐸‘𝑛)) ∈ ℝ))
54	53	ralbidva 3192	. . . . 5 ⊢ (𝜑 → (∀𝑛 ∈ ℕ ¬ (vol‘(𝐸‘𝑛)) = +∞ ↔ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ))
55	54	adantr 485	. . . 4 ⊢ ((𝜑 ∧ ¬ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) → (∀𝑛 ∈ ℕ ¬ (vol‘(𝐸‘𝑛)) = +∞ ↔ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ))
56	43, 55	mpbid 235	. . 3 ⊢ ((𝜑 ∧ ¬ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) → ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ)
57		nfra1 3295	. . . . . . 7 ⊢ Ⅎ𝑛∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ
58	1, 57	nfan 1926	. . . . . 6 ⊢ Ⅎ𝑛(𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ)
59	10	adantlr 727	. . . . . . . 8 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (𝐸‘𝑛) ∈ dom vol)
60		rspa 3260	. . . . . . . . 9 ⊢ ((∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ ∧ 𝑛 ∈ ℕ) → (vol‘(𝐸‘𝑛)) ∈ ℝ)
61	60	adantll 726	. . . . . . . 8 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘(𝐸‘𝑛)) ∈ ℝ)
62	59, 61	jca 520	. . . . . . 7 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → ((𝐸‘𝑛) ∈ dom vol ∧ (vol‘(𝐸‘𝑛)) ∈ ℝ))
63	62	ex 417	. . . . . 6 ⊢ ((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) → (𝑛 ∈ ℕ → ((𝐸‘𝑛) ∈ dom vol ∧ (vol‘(𝐸‘𝑛)) ∈ ℝ)))
64	58, 63	ralrimi 3269	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) → ∀𝑛 ∈ ℕ ((𝐸‘𝑛) ∈ dom vol ∧ (vol‘(𝐸‘𝑛)) ∈ ℝ))
65		voliunsge0lem.d	. . . . . 6 ⊢ (𝜑 → Disj 𝑛 ∈ ℕ (𝐸‘𝑛))
66	65	adantr 485	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) → Disj 𝑛 ∈ ℕ (𝐸‘𝑛))
67		voliunsge0lem.s	. . . . . 6 ⊢ 𝑆 = seq1( + , 𝐺)
68		voliunsge0lem.g	. . . . . 6 ⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))
69	67, 68	voliun 25682	. . . . 5 ⊢ ((∀𝑛 ∈ ℕ ((𝐸‘𝑛) ∈ dom vol ∧ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ Disj 𝑛 ∈ ℕ (𝐸‘𝑛)) → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = sup(ran 𝑆, ℝ^*, < ))
70	64, 66, 69	syl2anc 595	. . . 4 ⊢ ((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = sup(ran 𝑆, ℝ^*, < ))
71		1zzd 12625	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) → 1 ∈ ℤ)
72		nnuz 12901	. . . . 5 ⊢ ℕ = (ℤ_≥‘1)
73		nfv 1941	. . . . . . . . 9 ⊢ Ⅎ𝑛 𝑚 ∈ ℕ
74	58, 73	nfan 1926	. . . . . . . 8 ⊢ Ⅎ𝑛((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑚 ∈ ℕ)
75		nfv 1941	. . . . . . . 8 ⊢ Ⅎ𝑛(vol‘(𝐸‘𝑚)) ∈ (0[,)+∞)
76	74, 75	nfim 1923	. . . . . . 7 ⊢ Ⅎ𝑛(((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑚 ∈ ℕ) → (vol‘(𝐸‘𝑚)) ∈ (0[,)+∞))
77		eleq1w 2852	. . . . . . . . 9 ⊢ (𝑛 = 𝑚 → (𝑛 ∈ ℕ ↔ 𝑚 ∈ ℕ))
78	77	anbi2d 641	. . . . . . . 8 ⊢ (𝑛 = 𝑚 → (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) ↔ ((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑚 ∈ ℕ)))
79		2fveq3 6887	. . . . . . . . 9 ⊢ (𝑛 = 𝑚 → (vol‘(𝐸‘𝑛)) = (vol‘(𝐸‘𝑚)))
80	79	eleq1d 2854	. . . . . . . 8 ⊢ (𝑛 = 𝑚 → ((vol‘(𝐸‘𝑛)) ∈ (0[,)+∞) ↔ (vol‘(𝐸‘𝑚)) ∈ (0[,)+∞)))
81	78, 80	imbi12d 347	. . . . . . 7 ⊢ (𝑛 = 𝑚 → ((((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘(𝐸‘𝑛)) ∈ (0[,)+∞)) ↔ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑚 ∈ ℕ) → (vol‘(𝐸‘𝑚)) ∈ (0[,)+∞))))
82		0xr 11256	. . . . . . . . 9 ⊢ 0 ∈ ℝ^*
83	82	a1i 11	. . . . . . . 8 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → 0 ∈ ℝ^*)
84		pnfxr 11263	. . . . . . . . 9 ⊢ +∞ ∈ ℝ^*
85	84	a1i 11	. . . . . . . 8 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → +∞ ∈ ℝ^*)
86	61	rexrd 11259	. . . . . . . 8 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘(𝐸‘𝑛)) ∈ ℝ^*)
87		volge0 46601	. . . . . . . . . 10 ⊢ ((𝐸‘𝑛) ∈ dom vol → 0 ≤ (vol‘(𝐸‘𝑛)))
88	10, 87	syl 18	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 0 ≤ (vol‘(𝐸‘𝑛)))
89	88	adantlr 727	. . . . . . . 8 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → 0 ≤ (vol‘(𝐸‘𝑛)))
90	61	ltpnfd 13146	. . . . . . . 8 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘(𝐸‘𝑛)) < +∞)
91	83, 85, 86, 89, 90	elicod 13422	. . . . . . 7 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑛 ∈ ℕ) → (vol‘(𝐸‘𝑛)) ∈ (0[,)+∞))
92	76, 81, 91	chvarfv 2282	. . . . . 6 ⊢ (((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) ∧ 𝑚 ∈ ℕ) → (vol‘(𝐸‘𝑚)) ∈ (0[,)+∞))
93	79	cbvmptv 5219	. . . . . 6 ⊢ (𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛))) = (𝑚 ∈ ℕ ↦ (vol‘(𝐸‘𝑚)))
94	92, 93	fmptd 7110	. . . . 5 ⊢ ((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) → (𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛))):ℕ⟶(0[,)+∞))
95		seqeq3 14042	. . . . . . 7 ⊢ (𝐺 = (𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛))) → seq1( + , 𝐺) = seq1( + , (𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))))
96	68, 95	ax-mp 5	. . . . . 6 ⊢ seq1( + , 𝐺) = seq1( + , (𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛))))
97	67, 96	eqtri 2792	. . . . 5 ⊢ 𝑆 = seq1( + , (𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛))))
98	71, 72, 94, 97	sge0seq 47086	. . . 4 ⊢ ((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) → (Σ^{^}‘(𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))) = sup(ran 𝑆, ℝ^*, < ))
99	70, 98	eqtr4d 2807	. . 3 ⊢ ((𝜑 ∧ ∀𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) ∈ ℝ) → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = (Σ^{^}‘(𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))))
100	56, 99	syldan 602	. 2 ⊢ ((𝜑 ∧ ¬ ∃𝑛 ∈ ℕ (vol‘(𝐸‘𝑛)) = +∞) → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = (Σ^{^}‘(𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))))
101	41, 100	pm2.61dan 824	1 ⊢ (𝜑 → (vol‘∪ 𝑛 ∈ ℕ (𝐸‘𝑛)) = (Σ^{^}‘(𝑛 ∈ ℕ ↦ (vol‘(𝐸‘𝑛)))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 400 ∧ w3a 1101 = wceq 1567 ∈ wcel 2149 ≠ wne 2964 ∀wral 3085 ∃wrex 3095 Vcvv 3463 ⊆ wss 3913 ∪ ciun 4960 Disj wdisj 5080 class class class wbr 5113 ↦ cmpt 5196 dom cdm 5662 ran crn 5663 ⟶wf 6533 ‘cfv 6537 (class class class)co 7411 supcsup 9400 ℝcr 11099 0cc0 11100 1c1 11101 + caddc 11103 +∞cpnf 11240 ℝ^*cxr 11242 < clt 11243 ≤ cle 11244 ℕcn 12233 [,)cico 13374 [,]cicc 13375 seqcseq 14037 volcvol 25591 Σ^{^}csumge0 47002

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1822 ax-4 1836 ax-5 1937 ax-6 1994 ax-7 2035 ax-8 2151 ax-9 2159 ax-10 2182 ax-11 2198 ax-12 2219 ax-ext 2741 ax-rep 5242 ax-sep 5261 ax-nul 5271 ax-pow 5337 ax-pr 5405 ax-un 7733 ax-inf2 9610 ax-cc 10419 ax-cnex 11156 ax-resscn 11157 ax-1cn 11158 ax-icn 11159 ax-addcl 11160 ax-addrcl 11161 ax-mulcl 11162 ax-mulrcl 11163 ax-mulcom 11164 ax-addass 11165 ax-mulass 11166 ax-distr 11167 ax-i2m1 11168 ax-1ne0 11169 ax-1rid 11170 ax-rnegex 11171 ax-rrecex 11172 ax-cnre 11173 ax-pre-lttri 11174 ax-pre-lttrn 11175 ax-pre-ltadd 11176 ax-pre-mulgt0 11177 ax-pre-sup 11178

This theorem depends on definitions: df-bi 210 df-an 401 df-or 861 df-3or 1102 df-3an 1103 df-tru 1570 df-fal 1580 df-ex 1807 df-nf 1811 df-sb 2098 df-mo 2573 df-eu 2603 df-clab 2748 df-cleq 2761 df-clel 2844 df-nfc 2918 df-ne 2965 df-nel 3071 df-ral 3086 df-rex 3096 df-rmo 3376 df-reu 3377 df-rab 3424 df-v 3465 df-sbc 3754 df-csb 3862 df-dif 3916 df-un 3918 df-in 3920 df-ss 3930 df-pss 3933 df-nul 4295 df-if 4493 df-pw 4569 df-sn 4595 df-pr 4597 df-op 4601 df-uni 4877 df-int 4917 df-iun 4962 df-disj 5081 df-br 5114 df-opab 5178 df-mpt 5197 df-tr 5223 df-id 5557 df-eprel 5562 df-po 5570 df-so 5571 df-fr 5615 df-se 5616 df-we 5617 df-xp 5668 df-rel 5669 df-cnv 5670 df-co 5671 df-dm 5672 df-rn 5673 df-res 5674 df-ima 5675 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 7368 df-ov 7414 df-oprab 7415 df-mpo 7416 df-of 7675 df-om 7863 df-1st 7986 df-2nd 7987 df-frecs 8278 df-wrecs 8309 df-recs 8358 df-rdg 8397 df-1o 8453 df-2o 8454 df-er 8694 df-map 8826 df-pm 8827 df-en 8944 df-dom 8945 df-sdom 8946 df-fin 8947 df-sup 9402 df-inf 9403 df-oi 9472 df-dju 9887 df-card 9925 df-pnf 11245 df-mnf 11246 df-xr 11247 df-ltxr 11248 df-le 11249 df-sub 11443 df-neg 11444 df-div 11872 df-nn 12234 df-2 12303 df-3 12304 df-n0 12505 df-z 12592 df-uz 12863 df-q 12973 df-rp 13017 df-xadd 13138 df-ioo 13376 df-ico 13378 df-icc 13379 df-fz 13536 df-fzo 13683 df-fl 13825 df-seq 14038 df-exp 14098 df-hash 14367 df-cj 15150 df-re 15151 df-im 15152 df-sqrt 15286 df-abs 15287 df-clim 15539 df-rlim 15540 df-sum 15738 df-xmet 21484 df-met 21485 df-ovol 25592 df-vol 25593 df-sumge0 47003

This theorem is referenced by: voliunsge0 47113

W3C validator