ovoliunlem1 - Metamath Proof Explorer

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

Theorem ovoliunlem1 25430

Description: Lemma for ovoliun 25433. (Contributed by Mario Carneiro, 12-Jun-2014.) (Proof shortened by Peter Mazsa, 2-Oct-2022.)

**Hypotheses**
Ref	Expression
ovoliun.t	⊢ 𝑇 = seq1( + , 𝐺)
ovoliun.g	⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (vol*‘𝐴))
ovoliun.a	⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐴 ⊆ ℝ)
ovoliun.v	⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol*‘𝐴) ∈ ℝ)
ovoliun.r	⊢ (𝜑 → sup(ran 𝑇, ℝ^*, < ) ∈ ℝ)
ovoliun.b	⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
ovoliun.s	⊢ 𝑆 = seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛)))
ovoliun.u	⊢ 𝑈 = seq1( + , ((abs ∘ − ) ∘ 𝐻))
ovoliun.h	⊢ 𝐻 = (𝑘 ∈ ℕ ↦ ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))))
ovoliun.j	⊢ (𝜑 → 𝐽:ℕ–1-1-onto→(ℕ × ℕ))
ovoliun.f	⊢ (𝜑 → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
ovoliun.x1	⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛)))
ovoliun.x2	⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ^, < ) ≤ ((vol‘𝐴) + (𝐵 / (2↑𝑛))))
ovoliun.k	⊢ (𝜑 → 𝐾 ∈ ℕ)
ovoliun.l1	⊢ (𝜑 → 𝐿 ∈ ℤ)
ovoliun.l2	⊢ (𝜑 → ∀𝑤 ∈ (1...𝐾)(1^st ‘(𝐽‘𝑤)) ≤ 𝐿)

**Assertion**
Ref	Expression
ovoliunlem1	⊢ (𝜑 → (𝑈‘𝐾) ≤ (sup(ran 𝑇, ℝ^*, < ) + 𝐵))

Distinct variable groups: 𝐴,𝑘 𝑘,𝑛,𝐵 𝑘,𝐹,𝑛 𝑤,𝑘,𝐽,𝑛 𝑛,𝐾,𝑤 𝑘,𝐿,𝑛,𝑤 𝑛,𝐻 𝜑,𝑘,𝑛 𝑆,𝑘 𝑘,𝐺 𝑇,𝑘 𝑛,𝐺 𝑇,𝑛 Allowed substitution hints: 𝜑(𝑤) 𝐴(𝑤,𝑛) 𝐵(𝑤) 𝑆(𝑤,𝑛) 𝑇(𝑤) 𝑈(𝑤,𝑘,𝑛) 𝐹(𝑤) 𝐺(𝑤) 𝐻(𝑤,𝑘) 𝐾(𝑘)

Proof of Theorem ovoliunlem1 Dummy variables 𝑗 𝑚 𝑥 𝑦 𝑧 𝑖 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		2fveq3 6827	. . . . . . . 8 ⊢ (𝑗 = (𝐽‘𝑚) → (𝐹‘(1^st ‘𝑗)) = (𝐹‘(1^st ‘(𝐽‘𝑚))))
2		fveq2 6822	. . . . . . . 8 ⊢ (𝑗 = (𝐽‘𝑚) → (2^nd ‘𝑗) = (2^nd ‘(𝐽‘𝑚)))
3	1, 2	fveq12d 6829	. . . . . . 7 ⊢ (𝑗 = (𝐽‘𝑚) → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
4	3	fveq2d 6826	. . . . . 6 ⊢ (𝑗 = (𝐽‘𝑚) → (2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
5	3	fveq2d 6826	. . . . . 6 ⊢ (𝑗 = (𝐽‘𝑚) → (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
6	4, 5	oveq12d 7364	. . . . 5 ⊢ (𝑗 = (𝐽‘𝑚) → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))))
7		fzfid 13880	. . . . 5 ⊢ (𝜑 → (1...𝐾) ∈ Fin)
8		ovoliun.j	. . . . . . 7 ⊢ (𝜑 → 𝐽:ℕ–1-1-onto→(ℕ × ℕ))
9		f1of1 6762	. . . . . . 7 ⊢ (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:ℕ–1-1→(ℕ × ℕ))
10	8, 9	syl 17	. . . . . 6 ⊢ (𝜑 → 𝐽:ℕ–1-1→(ℕ × ℕ))
11		fz1ssnn 13455	. . . . . 6 ⊢ (1...𝐾) ⊆ ℕ
12		f1ores 6777	. . . . . 6 ⊢ ((𝐽:ℕ–1-1→(ℕ × ℕ) ∧ (1...𝐾) ⊆ ℕ) → (𝐽 ↾ (1...𝐾)):(1...𝐾)–1-1-onto→(𝐽 “ (1...𝐾)))
13	10, 11, 12	sylancl 586	. . . . 5 ⊢ (𝜑 → (𝐽 ↾ (1...𝐾)):(1...𝐾)–1-1-onto→(𝐽 “ (1...𝐾)))
14		fvres 6841	. . . . . 6 ⊢ (𝑚 ∈ (1...𝐾) → ((𝐽 ↾ (1...𝐾))‘𝑚) = (𝐽‘𝑚))
15	14	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((𝐽 ↾ (1...𝐾))‘𝑚) = (𝐽‘𝑚))
16		ovoliun.f	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
17	16	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
18		imassrn 6019	. . . . . . . . . . . . . . 15 ⊢ (𝐽 “ (1...𝐾)) ⊆ ran 𝐽
19		f1of 6763	. . . . . . . . . . . . . . . . 17 ⊢ (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:ℕ⟶(ℕ × ℕ))
20	8, 19	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐽:ℕ⟶(ℕ × ℕ))
21	20	frnd 6659	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ran 𝐽 ⊆ (ℕ × ℕ))
22	18, 21	sstrid 3941	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ))
23	22	sselda 3929	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → 𝑗 ∈ (ℕ × ℕ))
24		xp1st 7953	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ (ℕ × ℕ) → (1^st ‘𝑗) ∈ ℕ)
25	23, 24	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ∈ ℕ)
26	17, 25	ffvelcdmd 7018	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (𝐹‘(1^st ‘𝑗)) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
27		elovolmlem 25402	. . . . . . . . . . 11 ⊢ ((𝐹‘(1^st ‘𝑗)) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ↔ (𝐹‘(1^st ‘𝑗)):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
28	26, 27	sylib 218	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (𝐹‘(1^st ‘𝑗)):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
29		xp2nd 7954	. . . . . . . . . . 11 ⊢ (𝑗 ∈ (ℕ × ℕ) → (2^nd ‘𝑗) ∈ ℕ)
30	23, 29	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (2^nd ‘𝑗) ∈ ℕ)
31	28, 30	ffvelcdmd 7018	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) ∈ ( ≤ ∩ (ℝ × ℝ)))
32	31	elin2d 4152	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) ∈ (ℝ × ℝ))
33		xp2nd 7954	. . . . . . . 8 ⊢ (((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) ∈ (ℝ × ℝ) → (2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) ∈ ℝ)
34	32, 33	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) ∈ ℝ)
35		xp1st 7953	. . . . . . . 8 ⊢ (((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) ∈ (ℝ × ℝ) → (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) ∈ ℝ)
36	32, 35	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) ∈ ℝ)
37	34, 36	resubcld 11545	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ∈ ℝ)
38	37	recnd 11140	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ∈ ℂ)
39	6, 7, 13, 15, 38	fsumf1o 15630	. . . 4 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = Σ𝑚 ∈ (1...𝐾)((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))))
40	16	adantr 480	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
41	20	ffvelcdmda 7017	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐽‘𝑘) ∈ (ℕ × ℕ))
42		xp1st 7953	. . . . . . . . . . . 12 ⊢ ((𝐽‘𝑘) ∈ (ℕ × ℕ) → (1^st ‘(𝐽‘𝑘)) ∈ ℕ)
43	41, 42	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (1^st ‘(𝐽‘𝑘)) ∈ ℕ)
44	40, 43	ffvelcdmd 7018	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘(1^st ‘(𝐽‘𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
45		elovolmlem 25402	. . . . . . . . . 10 ⊢ ((𝐹‘(1^st ‘(𝐽‘𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ↔ (𝐹‘(1^st ‘(𝐽‘𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
46	44, 45	sylib 218	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘(1^st ‘(𝐽‘𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
47		xp2nd 7954	. . . . . . . . . 10 ⊢ ((𝐽‘𝑘) ∈ (ℕ × ℕ) → (2^nd ‘(𝐽‘𝑘)) ∈ ℕ)
48	41, 47	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (2^nd ‘(𝐽‘𝑘)) ∈ ℕ)
49	46, 48	ffvelcdmd 7018	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))) ∈ ( ≤ ∩ (ℝ × ℝ)))
50		ovoliun.h	. . . . . . . 8 ⊢ 𝐻 = (𝑘 ∈ ℕ ↦ ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))))
51	49, 50	fmptd 7047	. . . . . . 7 ⊢ (𝜑 → 𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
52		elfznn 13453	. . . . . . 7 ⊢ (𝑚 ∈ (1...𝐾) → 𝑚 ∈ ℕ)
53		eqid 2731	. . . . . . . 8 ⊢ ((abs ∘ − ) ∘ 𝐻) = ((abs ∘ − ) ∘ 𝐻)
54	53	ovolfsval 25398	. . . . . . 7 ⊢ ((𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑚 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐻)‘𝑚) = ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))))
55	51, 52, 54	syl2an 596	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (((abs ∘ − ) ∘ 𝐻)‘𝑚) = ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))))
56	52	adantl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → 𝑚 ∈ ℕ)
57		2fveq3 6827	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑚 → (1^st ‘(𝐽‘𝑘)) = (1^st ‘(𝐽‘𝑚)))
58	57	fveq2d 6826	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → (𝐹‘(1^st ‘(𝐽‘𝑘))) = (𝐹‘(1^st ‘(𝐽‘𝑚))))
59		2fveq3 6827	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → (2^nd ‘(𝐽‘𝑘)) = (2^nd ‘(𝐽‘𝑚)))
60	58, 59	fveq12d 6829	. . . . . . . . . 10 ⊢ (𝑘 = 𝑚 → ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
61		fvex 6835	. . . . . . . . . 10 ⊢ ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))) ∈ V
62	60, 50, 61	fvmpt 6929	. . . . . . . . 9 ⊢ (𝑚 ∈ ℕ → (𝐻‘𝑚) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
63	56, 62	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (𝐻‘𝑚) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
64	63	fveq2d 6826	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (2^nd ‘(𝐻‘𝑚)) = (2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
65	63	fveq2d 6826	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (1^st ‘(𝐻‘𝑚)) = (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
66	64, 65	oveq12d 7364	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))) = ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))))
67	55, 66	eqtrd 2766	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (((abs ∘ − ) ∘ 𝐻)‘𝑚) = ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))))
68		ovoliun.k	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ ℕ)
69		nnuz 12775	. . . . . 6 ⊢ ℕ = (ℤ_≥‘1)
70	68, 69	eleqtrdi 2841	. . . . 5 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘1))
71		ffvelcdm 7014	. . . . . . . . . . 11 ⊢ ((𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑚 ∈ ℕ) → (𝐻‘𝑚) ∈ ( ≤ ∩ (ℝ × ℝ)))
72	51, 52, 71	syl2an 596	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (𝐻‘𝑚) ∈ ( ≤ ∩ (ℝ × ℝ)))
73	72	elin2d 4152	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (𝐻‘𝑚) ∈ (ℝ × ℝ))
74		xp2nd 7954	. . . . . . . . 9 ⊢ ((𝐻‘𝑚) ∈ (ℝ × ℝ) → (2^nd ‘(𝐻‘𝑚)) ∈ ℝ)
75	73, 74	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (2^nd ‘(𝐻‘𝑚)) ∈ ℝ)
76		xp1st 7953	. . . . . . . . 9 ⊢ ((𝐻‘𝑚) ∈ (ℝ × ℝ) → (1^st ‘(𝐻‘𝑚)) ∈ ℝ)
77	73, 76	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (1^st ‘(𝐻‘𝑚)) ∈ ℝ)
78	75, 77	resubcld 11545	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))) ∈ ℝ)
79	78	recnd 11140	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))) ∈ ℂ)
80	66, 79	eqeltrrd 2832	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))) ∈ ℂ)
81	67, 70, 80	fsumser 15637	. . . 4 ⊢ (𝜑 → Σ𝑚 ∈ (1...𝐾)((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))) = (seq1( + , ((abs ∘ − ) ∘ 𝐻))‘𝐾))
82	39, 81	eqtrd 2766	. . 3 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = (seq1( + , ((abs ∘ − ) ∘ 𝐻))‘𝐾))
83		ovoliun.u	. . . 4 ⊢ 𝑈 = seq1( + , ((abs ∘ − ) ∘ 𝐻))
84	83	fveq1i 6823	. . 3 ⊢ (𝑈‘𝐾) = (seq1( + , ((abs ∘ − ) ∘ 𝐻))‘𝐾)
85	82, 84	eqtr4di 2784	. 2 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = (𝑈‘𝐾))
86		f1oeng 8893	. . . . . . 7 ⊢ (((1...𝐾) ∈ Fin ∧ (𝐽 ↾ (1...𝐾)):(1...𝐾)–1-1-onto→(𝐽 “ (1...𝐾))) → (1...𝐾) ≈ (𝐽 “ (1...𝐾)))
87	7, 13, 86	syl2anc 584	. . . . . 6 ⊢ (𝜑 → (1...𝐾) ≈ (𝐽 “ (1...𝐾)))
88	87	ensymd 8927	. . . . 5 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ≈ (1...𝐾))
89		enfii 9095	. . . . 5 ⊢ (((1...𝐾) ∈ Fin ∧ (𝐽 “ (1...𝐾)) ≈ (1...𝐾)) → (𝐽 “ (1...𝐾)) ∈ Fin)
90	7, 88, 89	syl2anc 584	. . . 4 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ∈ Fin)
91	90, 37	fsumrecl 15641	. . 3 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ∈ ℝ)
92		fzfid 13880	. . . . 5 ⊢ (𝜑 → (1...𝐿) ∈ Fin)
93		elfznn 13453	. . . . . 6 ⊢ (𝑛 ∈ (1...𝐿) → 𝑛 ∈ ℕ)
94		ovoliun.v	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol*‘𝐴) ∈ ℝ)
95	93, 94	sylan2 593	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol*‘𝐴) ∈ ℝ)
96	92, 95	fsumrecl 15641	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) ∈ ℝ)
97		ovoliun.b	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
98	97	rpred 12934	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ℝ)
99		2nn 12198	. . . . . . . 8 ⊢ 2 ∈ ℕ
100		nnnn0 12388	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
101		nnexpcl 13981	. . . . . . . 8 ⊢ ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ₀) → (2↑𝑛) ∈ ℕ)
102	99, 100, 101	sylancr 587	. . . . . . 7 ⊢ (𝑛 ∈ ℕ → (2↑𝑛) ∈ ℕ)
103	93, 102	syl 17	. . . . . 6 ⊢ (𝑛 ∈ (1...𝐿) → (2↑𝑛) ∈ ℕ)
104		nndivre 12166	. . . . . 6 ⊢ ((𝐵 ∈ ℝ ∧ (2↑𝑛) ∈ ℕ) → (𝐵 / (2↑𝑛)) ∈ ℝ)
105	98, 103, 104	syl2an 596	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐵 / (2↑𝑛)) ∈ ℝ)
106	92, 105	fsumrecl 15641	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) ∈ ℝ)
107	96, 106	readdcld 11141	. . 3 ⊢ (𝜑 → (Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))) ∈ ℝ)
108		ovoliun.r	. . . 4 ⊢ (𝜑 → sup(ran 𝑇, ℝ^*, < ) ∈ ℝ)
109	108, 98	readdcld 11141	. . 3 ⊢ (𝜑 → (sup(ran 𝑇, ℝ^*, < ) + 𝐵) ∈ ℝ)
110		relxp 5632	. . . . . . . . . . . . . . 15 ⊢ Rel ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))
111		relres 5953	. . . . . . . . . . . . . . 15 ⊢ Rel ((𝐽 “ (1...𝐾)) ↾ {𝑛})
112		elsni 4590	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ {𝑛} → 𝑥 = 𝑛)
113	112	opeq1d 4828	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ {𝑛} → ⟨𝑥, 𝑦⟩ = ⟨𝑛, 𝑦⟩)
114	113	eleq1d 2816	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ {𝑛} → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) ↔ ⟨𝑛, 𝑦⟩ ∈ (𝐽 “ (1...𝐾))))
115		vex 3440	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑛 ∈ V
116		vex 3440	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑦 ∈ V
117	115, 116	elimasn 6038	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}) ↔ ⟨𝑛, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)))
118	114, 117	bitr4di 289	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ {𝑛} → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) ↔ 𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})))
119	118	pm5.32i 574	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ {𝑛} ∧ ⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾))) ↔ (𝑥 ∈ {𝑛} ∧ 𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})))
120	116	opelresi 5935	. . . . . . . . . . . . . . . 16 ⊢ (⟨𝑥, 𝑦⟩ ∈ ((𝐽 “ (1...𝐾)) ↾ {𝑛}) ↔ (𝑥 ∈ {𝑛} ∧ ⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾))))
121		opelxp 5650	. . . . . . . . . . . . . . . 16 ⊢ (⟨𝑥, 𝑦⟩ ∈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ↔ (𝑥 ∈ {𝑛} ∧ 𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})))
122	119, 120, 121	3bitr4ri 304	. . . . . . . . . . . . . . 15 ⊢ (⟨𝑥, 𝑦⟩ ∈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ↔ ⟨𝑥, 𝑦⟩ ∈ ((𝐽 “ (1...𝐾)) ↾ {𝑛}))
123	110, 111, 122	eqrelriiv 5729	. . . . . . . . . . . . . 14 ⊢ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ↾ {𝑛})
124		df-res 5626	. . . . . . . . . . . . . 14 ⊢ ((𝐽 “ (1...𝐾)) ↾ {𝑛}) = ((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V))
125	123, 124	eqtri 2754	. . . . . . . . . . . . 13 ⊢ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V))
126	125	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V)))
127	126	iuneq2dv 4964	. . . . . . . . . . 11 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ∪ 𝑛 ∈ (1...𝐿)((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V)))
128		iunin2 5017	. . . . . . . . . . 11 ⊢ ∪ 𝑛 ∈ (1...𝐿)((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V)) = ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V))
129	127, 128	eqtrdi 2782	. . . . . . . . . 10 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)))
130		relxp 5632	. . . . . . . . . . . . . 14 ⊢ Rel (ℕ × ℕ)
131		relss 5721	. . . . . . . . . . . . . 14 ⊢ ((𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ) → (Rel (ℕ × ℕ) → Rel (𝐽 “ (1...𝐾))))
132	22, 130, 131	mpisyl 21	. . . . . . . . . . . . 13 ⊢ (𝜑 → Rel (𝐽 “ (1...𝐾)))
133		ovoliun.l2	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ∀𝑤 ∈ (1...𝐾)(1^st ‘(𝐽‘𝑤)) ≤ 𝐿)
134	20	ffnd 6652	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝐽 Fn ℕ)
135		fveq2 6822	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑗 = (𝐽‘𝑤) → (1^st ‘𝑗) = (1^st ‘(𝐽‘𝑤)))
136	135	breq1d 5099	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = (𝐽‘𝑤) → ((1^st ‘𝑗) ≤ 𝐿 ↔ (1^st ‘(𝐽‘𝑤)) ≤ 𝐿))
137	136	ralima 7171	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐽 Fn ℕ ∧ (1...𝐾) ⊆ ℕ) → (∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ≤ 𝐿 ↔ ∀𝑤 ∈ (1...𝐾)(1^st ‘(𝐽‘𝑤)) ≤ 𝐿))
138	134, 11, 137	sylancl 586	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ≤ 𝐿 ↔ ∀𝑤 ∈ (1...𝐾)(1^st ‘(𝐽‘𝑤)) ≤ 𝐿))
139	133, 138	mpbird 257	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ≤ 𝐿)
140	139	r19.21bi 3224	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ≤ 𝐿)
141	25, 69	eleqtrdi 2841	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ∈ (ℤ_≥‘1))
142		ovoliun.l1	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝐿 ∈ ℤ)
143	142	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → 𝐿 ∈ ℤ)
144		elfz5 13416	. . . . . . . . . . . . . . . . . 18 ⊢ (((1^st ‘𝑗) ∈ (ℤ_≥‘1) ∧ 𝐿 ∈ ℤ) → ((1^st ‘𝑗) ∈ (1...𝐿) ↔ (1^st ‘𝑗) ≤ 𝐿))
145	141, 143, 144	syl2anc 584	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((1^st ‘𝑗) ∈ (1...𝐿) ↔ (1^st ‘𝑗) ≤ 𝐿))
146	140, 145	mpbird 257	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ∈ (1...𝐿))
147	146	ralrimiva 3124	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ∈ (1...𝐿))
148		vex 3440	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑥 ∈ V
149	148, 116	op1std 7931	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = ⟨𝑥, 𝑦⟩ → (1^st ‘𝑗) = 𝑥)
150	149	eleq1d 2816	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = ⟨𝑥, 𝑦⟩ → ((1^st ‘𝑗) ∈ (1...𝐿) ↔ 𝑥 ∈ (1...𝐿)))
151	150	rspccv 3569	. . . . . . . . . . . . . . 15 ⊢ (∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ∈ (1...𝐿) → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) → 𝑥 ∈ (1...𝐿)))
152	147, 151	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) → 𝑥 ∈ (1...𝐿)))
153		opelxp 5650	. . . . . . . . . . . . . . 15 ⊢ (⟨𝑥, 𝑦⟩ ∈ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V) ↔ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ∧ 𝑦 ∈ V))
154	116	biantru 529	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ↔ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ∧ 𝑦 ∈ V))
155		iunid 5007	. . . . . . . . . . . . . . . 16 ⊢ ∪ 𝑛 ∈ (1...𝐿){𝑛} = (1...𝐿)
156	155	eleq2i 2823	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ↔ 𝑥 ∈ (1...𝐿))
157	153, 154, 156	3bitr2i 299	. . . . . . . . . . . . . 14 ⊢ (⟨𝑥, 𝑦⟩ ∈ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V) ↔ 𝑥 ∈ (1...𝐿))
158	152, 157	imbitrrdi 252	. . . . . . . . . . . . 13 ⊢ (𝜑 → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) → ⟨𝑥, 𝑦⟩ ∈ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V)))
159	132, 158	relssdv 5727	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ⊆ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V))
160		xpiundir 5686	. . . . . . . . . . . 12 ⊢ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V) = ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)
161	159, 160	sseqtrdi 3970	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V))
162		dfss2 3915	. . . . . . . . . . 11 ⊢ ((𝐽 “ (1...𝐾)) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V) ↔ ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)) = (𝐽 “ (1...𝐾)))
163	161, 162	sylib 218	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)) = (𝐽 “ (1...𝐾)))
164	129, 163	eqtrd 2766	. . . . . . . . 9 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = (𝐽 “ (1...𝐾)))
165	164, 90	eqeltrd 2831	. . . . . . . 8 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin)
166		ssiun2 4994	. . . . . . . 8 ⊢ (𝑛 ∈ (1...𝐿) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})))
167		ssfi 9082	. . . . . . . 8 ⊢ ((∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin ∧ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin)
168	165, 166, 167	syl2an 596	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin)
169		2ndconst 8031	. . . . . . . . . 10 ⊢ (𝑛 ∈ V → (2^nd ↾ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))):({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))–1-1-onto→((𝐽 “ (1...𝐾)) “ {𝑛}))
170	169	elv 3441	. . . . . . . . 9 ⊢ (2^nd ↾ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))):({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))–1-1-onto→((𝐽 “ (1...𝐾)) “ {𝑛})
171		f1oeng 8893	. . . . . . . . 9 ⊢ ((({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin ∧ (2^nd ↾ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))):({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))–1-1-onto→((𝐽 “ (1...𝐾)) “ {𝑛})) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ≈ ((𝐽 “ (1...𝐾)) “ {𝑛}))
172	168, 170, 171	sylancl 586	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ≈ ((𝐽 “ (1...𝐾)) “ {𝑛}))
173	172	ensymd 8927	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ≈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})))
174		enfii 9095	. . . . . . 7 ⊢ ((({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin ∧ ((𝐽 “ (1...𝐾)) “ {𝑛}) ≈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ∈ Fin)
175	168, 173, 174	syl2anc 584	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ∈ Fin)
176		ffvelcdm 7014	. . . . . . . . . . . . . 14 ⊢ ((𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
177	16, 93, 176	syl2an 596	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐹‘𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
178		elovolmlem 25402	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ↔ (𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
179	177, 178	sylib 218	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
180	179	adantrr 717	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → (𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
181		imassrn 6019	. . . . . . . . . . . . . 14 ⊢ ((𝐽 “ (1...𝐾)) “ {𝑛}) ⊆ ran (𝐽 “ (1...𝐾))
182	22	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ))
183		rnss 5878	. . . . . . . . . . . . . . . 16 ⊢ ((𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ) → ran (𝐽 “ (1...𝐾)) ⊆ ran (ℕ × ℕ))
184	182, 183	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran (𝐽 “ (1...𝐾)) ⊆ ran (ℕ × ℕ))
185		rnxpid 6120	. . . . . . . . . . . . . . 15 ⊢ ran (ℕ × ℕ) = ℕ
186	184, 185	sseqtrdi 3970	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran (𝐽 “ (1...𝐾)) ⊆ ℕ)
187	181, 186	sstrid 3941	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ⊆ ℕ)
188	187	sseld 3928	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}) → 𝑖 ∈ ℕ))
189	188	impr 454	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → 𝑖 ∈ ℕ)
190	180, 189	ffvelcdmd 7018	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((𝐹‘𝑛)‘𝑖) ∈ ( ≤ ∩ (ℝ × ℝ)))
191	190	elin2d 4152	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((𝐹‘𝑛)‘𝑖) ∈ (ℝ × ℝ))
192		xp2nd 7954	. . . . . . . . 9 ⊢ (((𝐹‘𝑛)‘𝑖) ∈ (ℝ × ℝ) → (2^nd ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
193	191, 192	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → (2^nd ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
194		xp1st 7953	. . . . . . . . 9 ⊢ (((𝐹‘𝑛)‘𝑖) ∈ (ℝ × ℝ) → (1^st ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
195	191, 194	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → (1^st ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
196	193, 195	resubcld 11545	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
197	196	anassrs 467	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
198	175, 197	fsumrecl 15641	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
199	98, 102, 104	syl2an 596	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐵 / (2↑𝑛)) ∈ ℝ)
200	94, 199	readdcld 11141	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((vol*‘𝐴) + (𝐵 / (2↑𝑛))) ∈ ℝ)
201	93, 200	sylan2 593	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((vol*‘𝐴) + (𝐵 / (2↑𝑛))) ∈ ℝ)
202		eqid 2731	. . . . . . . . . . . 12 ⊢ ((abs ∘ − ) ∘ (𝐹‘𝑛)) = ((abs ∘ − ) ∘ (𝐹‘𝑛))
203		ovoliun.s	. . . . . . . . . . . 12 ⊢ 𝑆 = seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛)))
204	202, 203	ovolsf 25400	. . . . . . . . . . 11 ⊢ ((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑆:ℕ⟶(0[,)+∞))
205	179, 204	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝑆:ℕ⟶(0[,)+∞))
206	205	frnd 6659	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ⊆ (0[,)+∞))
207		icossxr 13332	. . . . . . . . 9 ⊢ (0[,)+∞) ⊆ ℝ^*
208	206, 207	sstrdi 3942	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ⊆ ℝ^*)
209		supxrcl 13214	. . . . . . . 8 ⊢ (ran 𝑆 ⊆ ℝ^* → sup(ran 𝑆, ℝ^, < ) ∈ ℝ^)
210	208, 209	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → sup(ran 𝑆, ℝ^, < ) ∈ ℝ^)
211		mnfxr 11169	. . . . . . . . 9 ⊢ -∞ ∈ ℝ^*
212	211	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → -∞ ∈ ℝ^*)
213	95	rexrd 11162	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol‘𝐴) ∈ ℝ^)
214	95	mnfltd 13023	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → -∞ < (vol*‘𝐴))
215		ovoliun.x1	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛)))
216	93, 215	sylan2 593	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛)))
217	203	ovollb 25407	. . . . . . . . 9 ⊢ (((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛))) → (vol‘𝐴) ≤ sup(ran 𝑆, ℝ^, < ))
218	179, 216, 217	syl2anc 584	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol‘𝐴) ≤ sup(ran 𝑆, ℝ^, < ))
219	212, 213, 210, 214, 218	xrltletrd 13060	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → -∞ < sup(ran 𝑆, ℝ^*, < ))
220		ovoliun.x2	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ^, < ) ≤ ((vol‘𝐴) + (𝐵 / (2↑𝑛))))
221	93, 220	sylan2 593	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → sup(ran 𝑆, ℝ^, < ) ≤ ((vol‘𝐴) + (𝐵 / (2↑𝑛))))
222		xrre 13068	. . . . . . 7 ⊢ (((sup(ran 𝑆, ℝ^, < ) ∈ ℝ^ ∧ ((vol‘𝐴) + (𝐵 / (2↑𝑛))) ∈ ℝ) ∧ (-∞ < sup(ran 𝑆, ℝ^, < ) ∧ sup(ran 𝑆, ℝ^, < ) ≤ ((vol‘𝐴) + (𝐵 / (2↑𝑛))))) → sup(ran 𝑆, ℝ^*, < ) ∈ ℝ)
223	210, 201, 219, 221, 222	syl22anc 838	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → sup(ran 𝑆, ℝ^*, < ) ∈ ℝ)
224		1zzd 12503	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 1 ∈ ℤ)
225	202	ovolfsval 25398	. . . . . . . . 9 ⊢ (((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑖 ∈ ℕ) → (((abs ∘ − ) ∘ (𝐹‘𝑛))‘𝑖) = ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
226	179, 225	sylan 580	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → (((abs ∘ − ) ∘ (𝐹‘𝑛))‘𝑖) = ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
227	202	ovolfsf 25399	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) → ((abs ∘ − ) ∘ (𝐹‘𝑛)):ℕ⟶(0[,)+∞))
228	179, 227	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((abs ∘ − ) ∘ (𝐹‘𝑛)):ℕ⟶(0[,)+∞))
229	228	ffvelcdmda 7017	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → (((abs ∘ − ) ∘ (𝐹‘𝑛))‘𝑖) ∈ (0[,)+∞))
230	226, 229	eqeltrrd 2832	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ (0[,)+∞))
231		elrege0 13354	. . . . . . . . . 10 ⊢ (((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ (0[,)+∞) ↔ (((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ ∧ 0 ≤ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖)))))
232	230, 231	sylib 218	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → (((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ ∧ 0 ≤ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖)))))
233	232	simpld 494	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
234	232	simprd 495	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → 0 ≤ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
235		supxrub 13223	. . . . . . . . . . . . . . 15 ⊢ ((ran 𝑆 ⊆ ℝ^* ∧ 𝑧 ∈ ran 𝑆) → 𝑧 ≤ sup(ran 𝑆, ℝ^*, < ))
236	208, 235	sylan 580	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑧 ∈ ran 𝑆) → 𝑧 ≤ sup(ran 𝑆, ℝ^*, < ))
237	236	ralrimiva 3124	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ∀𝑧 ∈ ran 𝑆 𝑧 ≤ sup(ran 𝑆, ℝ^*, < ))
238		brralrspcev 5149	. . . . . . . . . . . . 13 ⊢ ((sup(ran 𝑆, ℝ^, < ) ∈ ℝ ∧ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ sup(ran 𝑆, ℝ^, < )) → ∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥)
239	223, 237, 238	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥)
240	205	ffnd 6652	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝑆 Fn ℕ)
241		breq1 5092	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = (𝑆‘𝑘) → (𝑧 ≤ 𝑥 ↔ (𝑆‘𝑘) ≤ 𝑥))
242	241	ralrn 7021	. . . . . . . . . . . . . 14 ⊢ (𝑆 Fn ℕ → (∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥 ↔ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥))
243	240, 242	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥 ↔ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥))
244	243	rexbidv 3156	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥 ↔ ∃𝑥 ∈ ℝ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥))
245	239, 244	mpbid 232	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ∃𝑥 ∈ ℝ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥)
246	69, 203, 224, 226, 233, 234, 245	isumsup2 15753	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝑆 ⇝ sup(ran 𝑆, ℝ, < ))
247	203, 246	eqbrtrrid 5125	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛))) ⇝ sup(ran 𝑆, ℝ, < ))
248		climrel 15399	. . . . . . . . . 10 ⊢ Rel ⇝
249	248	releldmi 5887	. . . . . . . . 9 ⊢ (seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛))) ⇝ sup(ran 𝑆, ℝ, < ) → seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛))) ∈ dom ⇝ )
250	247, 249	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛))) ∈ dom ⇝ )
251	69, 224, 175, 187, 226, 233, 234, 250	isumless 15752	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ Σ𝑖 ∈ ℕ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
252	69, 203, 224, 226, 233, 234, 245	isumsup 15754	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ℕ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = sup(ran 𝑆, ℝ, < ))
253		rge0ssre 13356	. . . . . . . . . 10 ⊢ (0[,)+∞) ⊆ ℝ
254	206, 253	sstrdi 3942	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ⊆ ℝ)
255		1nn 12136	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ
256	205	fdmd 6661	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → dom 𝑆 = ℕ)
257	255, 256	eleqtrrid 2838	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 1 ∈ dom 𝑆)
258	257	ne0d 4289	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → dom 𝑆 ≠ ∅)
259		dm0rn0 5863	. . . . . . . . . . 11 ⊢ (dom 𝑆 = ∅ ↔ ran 𝑆 = ∅)
260	259	necon3bii 2980	. . . . . . . . . 10 ⊢ (dom 𝑆 ≠ ∅ ↔ ran 𝑆 ≠ ∅)
261	258, 260	sylib 218	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ≠ ∅)
262		supxrre 13226	. . . . . . . . 9 ⊢ ((ran 𝑆 ⊆ ℝ ∧ ran 𝑆 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥) → sup(ran 𝑆, ℝ^*, < ) = sup(ran 𝑆, ℝ, < ))
263	254, 261, 239, 262	syl3anc 1373	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → sup(ran 𝑆, ℝ^*, < ) = sup(ran 𝑆, ℝ, < ))
264	252, 263	eqtr4d 2769	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ℕ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = sup(ran 𝑆, ℝ^*, < ))
265	251, 264	breqtrd 5115	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ sup(ran 𝑆, ℝ^*, < ))
266	198, 223, 201, 265, 221	letrd 11270	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
267	92, 198, 201, 266	fsumle 15706	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ Σ𝑛 ∈ (1...𝐿)((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
268		vex 3440	. . . . . . . . . . 11 ⊢ 𝑖 ∈ V
269	115, 268	op1std 7931	. . . . . . . . . 10 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (1^st ‘𝑗) = 𝑛)
270	269	fveq2d 6826	. . . . . . . . 9 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (𝐹‘(1^st ‘𝑗)) = (𝐹‘𝑛))
271	115, 268	op2ndd 7932	. . . . . . . . 9 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (2^nd ‘𝑗) = 𝑖)
272	270, 271	fveq12d 6829	. . . . . . . 8 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) = ((𝐹‘𝑛)‘𝑖))
273	272	fveq2d 6826	. . . . . . 7 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (2^nd ‘((𝐹‘𝑛)‘𝑖)))
274	272	fveq2d 6826	. . . . . . 7 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (1^st ‘((𝐹‘𝑛)‘𝑖)))
275	273, 274	oveq12d 7364	. . . . . 6 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
276	196	recnd 11140	. . . . . 6 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℂ)
277	275, 92, 175, 276	fsum2d 15678	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = Σ𝑗 ∈ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))))
278	164	sumeq1d 15607	. . . . 5 ⊢ (𝜑 → Σ𝑗 ∈ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))))
279	277, 278	eqtrd 2766	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))))
280	95	recnd 11140	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol*‘𝐴) ∈ ℂ)
281	105	recnd 11140	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐵 / (2↑𝑛)) ∈ ℂ)
282	92, 280, 281	fsumadd 15647	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)((vol‘𝐴) + (𝐵 / (2↑𝑛))) = (Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))))
283	267, 279, 282	3brtr3d 5120	. . 3 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ≤ (Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))))
284		1zzd 12503	. . . . . . . . 9 ⊢ (𝜑 → 1 ∈ ℤ)
285		simpr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
286		ovoliun.g	. . . . . . . . . . . 12 ⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (vol*‘𝐴))
287	286	fvmpt2 6940	. . . . . . . . . . 11 ⊢ ((𝑛 ∈ ℕ ∧ (vol‘𝐴) ∈ ℝ) → (𝐺‘𝑛) = (vol‘𝐴))
288	285, 94, 287	syl2anc 584	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐺‘𝑛) = (vol*‘𝐴))
289	288, 94	eqeltrd 2831	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐺‘𝑛) ∈ ℝ)
290	69, 284, 289	serfre 13938	. . . . . . . 8 ⊢ (𝜑 → seq1( + , 𝐺):ℕ⟶ℝ)
291		ovoliun.t	. . . . . . . . 9 ⊢ 𝑇 = seq1( + , 𝐺)
292	291	feq1i 6642	. . . . . . . 8 ⊢ (𝑇:ℕ⟶ℝ ↔ seq1( + , 𝐺):ℕ⟶ℝ)
293	290, 292	sylibr 234	. . . . . . 7 ⊢ (𝜑 → 𝑇:ℕ⟶ℝ)
294	293	frnd 6659	. . . . . 6 ⊢ (𝜑 → ran 𝑇 ⊆ ℝ)
295		ressxr 11156	. . . . . 6 ⊢ ℝ ⊆ ℝ^*
296	294, 295	sstrdi 3942	. . . . 5 ⊢ (𝜑 → ran 𝑇 ⊆ ℝ^*)
297	93, 288	sylan2 593	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐺‘𝑛) = (vol*‘𝐴))
298		1red 11113	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℝ)
299		ffvelcdm 7014	. . . . . . . . . . . . 13 ⊢ ((𝐽:ℕ⟶(ℕ × ℕ) ∧ 1 ∈ ℕ) → (𝐽‘1) ∈ (ℕ × ℕ))
300	20, 255, 299	sylancl 586	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐽‘1) ∈ (ℕ × ℕ))
301		xp1st 7953	. . . . . . . . . . . 12 ⊢ ((𝐽‘1) ∈ (ℕ × ℕ) → (1^st ‘(𝐽‘1)) ∈ ℕ)
302	300, 301	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (1^st ‘(𝐽‘1)) ∈ ℕ)
303	302	nnred 12140	. . . . . . . . . 10 ⊢ (𝜑 → (1^st ‘(𝐽‘1)) ∈ ℝ)
304	142	zred 12577	. . . . . . . . . 10 ⊢ (𝜑 → 𝐿 ∈ ℝ)
305	302	nnge1d 12173	. . . . . . . . . 10 ⊢ (𝜑 → 1 ≤ (1^st ‘(𝐽‘1)))
306		2fveq3 6827	. . . . . . . . . . . 12 ⊢ (𝑤 = 1 → (1^st ‘(𝐽‘𝑤)) = (1^st ‘(𝐽‘1)))
307	306	breq1d 5099	. . . . . . . . . . 11 ⊢ (𝑤 = 1 → ((1^st ‘(𝐽‘𝑤)) ≤ 𝐿 ↔ (1^st ‘(𝐽‘1)) ≤ 𝐿))
308		eluzfz1 13431	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ (ℤ_≥‘1) → 1 ∈ (1...𝐾))
309	70, 308	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ∈ (1...𝐾))
310	307, 133, 309	rspcdva 3573	. . . . . . . . . 10 ⊢ (𝜑 → (1^st ‘(𝐽‘1)) ≤ 𝐿)
311	298, 303, 304, 305, 310	letrd 11270	. . . . . . . . 9 ⊢ (𝜑 → 1 ≤ 𝐿)
312		elnnz1 12498	. . . . . . . . 9 ⊢ (𝐿 ∈ ℕ ↔ (𝐿 ∈ ℤ ∧ 1 ≤ 𝐿))
313	142, 311, 312	sylanbrc 583	. . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ ℕ)
314	313, 69	eleqtrdi 2841	. . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ (ℤ_≥‘1))
315	297, 314, 280	fsumser 15637	. . . . . 6 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) = (seq1( + , 𝐺)‘𝐿))
316		seqfn 13920	. . . . . . . . 9 ⊢ (1 ∈ ℤ → seq1( + , 𝐺) Fn (ℤ_≥‘1))
317	284, 316	syl 17	. . . . . . . 8 ⊢ (𝜑 → seq1( + , 𝐺) Fn (ℤ_≥‘1))
318		fnfvelrn 7013	. . . . . . . 8 ⊢ ((seq1( + , 𝐺) Fn (ℤ_≥‘1) ∧ 𝐿 ∈ (ℤ_≥‘1)) → (seq1( + , 𝐺)‘𝐿) ∈ ran seq1( + , 𝐺))
319	317, 314, 318	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → (seq1( + , 𝐺)‘𝐿) ∈ ran seq1( + , 𝐺))
320	291	rneqi 5876	. . . . . . 7 ⊢ ran 𝑇 = ran seq1( + , 𝐺)
321	319, 320	eleqtrrdi 2842	. . . . . 6 ⊢ (𝜑 → (seq1( + , 𝐺)‘𝐿) ∈ ran 𝑇)
322	315, 321	eqeltrd 2831	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) ∈ ran 𝑇)
323		supxrub 13223	. . . . 5 ⊢ ((ran 𝑇 ⊆ ℝ^* ∧ Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) ∈ ran 𝑇) → Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) ≤ sup(ran 𝑇, ℝ^*, < ))
324	296, 322, 323	syl2anc 584	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) ≤ sup(ran 𝑇, ℝ^, < ))
325	98	recnd 11140	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ℂ)
326		geo2sum 15780	. . . . . 6 ⊢ ((𝐿 ∈ ℕ ∧ 𝐵 ∈ ℂ) → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) = (𝐵 − (𝐵 / (2↑𝐿))))
327	313, 325, 326	syl2anc 584	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) = (𝐵 − (𝐵 / (2↑𝐿))))
328	313	nnnn0d 12442	. . . . . . . . . 10 ⊢ (𝜑 → 𝐿 ∈ ℕ₀)
329		nnexpcl 13981	. . . . . . . . . 10 ⊢ ((2 ∈ ℕ ∧ 𝐿 ∈ ℕ₀) → (2↑𝐿) ∈ ℕ)
330	99, 328, 329	sylancr 587	. . . . . . . . 9 ⊢ (𝜑 → (2↑𝐿) ∈ ℕ)
331	330	nnrpd 12932	. . . . . . . 8 ⊢ (𝜑 → (2↑𝐿) ∈ ℝ⁺)
332	97, 331	rpdivcld 12951	. . . . . . 7 ⊢ (𝜑 → (𝐵 / (2↑𝐿)) ∈ ℝ⁺)
333	332	rpge0d 12938	. . . . . 6 ⊢ (𝜑 → 0 ≤ (𝐵 / (2↑𝐿)))
334	98, 330	nndivred 12179	. . . . . . 7 ⊢ (𝜑 → (𝐵 / (2↑𝐿)) ∈ ℝ)
335	98, 334	subge02d 11709	. . . . . 6 ⊢ (𝜑 → (0 ≤ (𝐵 / (2↑𝐿)) ↔ (𝐵 − (𝐵 / (2↑𝐿))) ≤ 𝐵))
336	333, 335	mpbid 232	. . . . 5 ⊢ (𝜑 → (𝐵 − (𝐵 / (2↑𝐿))) ≤ 𝐵)
337	327, 336	eqbrtrd 5111	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) ≤ 𝐵)
338	96, 106, 108, 98, 324, 337	le2addd 11736	. . 3 ⊢ (𝜑 → (Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))) ≤ (sup(ran 𝑇, ℝ^, < ) + 𝐵))
339	91, 107, 109, 283, 338	letrd 11270	. 2 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ≤ (sup(ran 𝑇, ℝ^*, < ) + 𝐵))
340	85, 339	eqbrtrrd 5113	1 ⊢ (𝜑 → (𝑈‘𝐾) ≤ (sup(ran 𝑇, ℝ^*, < ) + 𝐵))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1541 ∈ wcel 2111 ≠ wne 2928 ∀wral 3047 ∃wrex 3056 Vcvv 3436 ∩ cin 3896 ⊆ wss 3897 ∅c0 4280 {csn 4573 ⟨cop 4579 ∪ cuni 4856 ∪ ciun 4939 class class class wbr 5089 ↦ cmpt 5170 × cxp 5612 dom cdm 5614 ran crn 5615 ↾ cres 5616 “ cima 5617 ∘ ccom 5618 Rel wrel 5619 Fn wfn 6476 ⟶wf 6477 –1-1→wf1 6478 –1-1-onto→wf1o 6480 ‘cfv 6481 (class class class)co 7346 1^st c1st 7919 2^nd c2nd 7920 ↑_m cmap 8750 ≈ cen 8866 Fincfn 8869 supcsup 9324 ℂcc 11004 ℝcr 11005 0cc0 11006 1c1 11007 + caddc 11009 +∞cpnf 11143 -∞cmnf 11144 ℝ^*cxr 11145 < clt 11146 ≤ cle 11147 − cmin 11344 / cdiv 11774 ℕcn 12125 2c2 12180 ℕ₀cn0 12381 ℤcz 12468 ℤ_≥cuz 12732 ℝ⁺crp 12890 (,)cioo 13245 [,)cico 13247 ...cfz 13407 seqcseq 13908 ↑cexp 13968 abscabs 15141 ⇝ cli 15391 Σcsu 15593 vol*covol 25390

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2113 ax-9 2121 ax-10 2144 ax-11 2160 ax-12 2180 ax-ext 2703 ax-rep 5215 ax-sep 5232 ax-nul 5242 ax-pow 5301 ax-pr 5368 ax-un 7668 ax-inf2 9531 ax-cnex 11062 ax-resscn 11063 ax-1cn 11064 ax-icn 11065 ax-addcl 11066 ax-addrcl 11067 ax-mulcl 11068 ax-mulrcl 11069 ax-mulcom 11070 ax-addass 11071 ax-mulass 11072 ax-distr 11073 ax-i2m1 11074 ax-1ne0 11075 ax-1rid 11076 ax-rnegex 11077 ax-rrecex 11078 ax-cnre 11079 ax-pre-lttri 11080 ax-pre-lttrn 11081 ax-pre-ltadd 11082 ax-pre-mulgt0 11083 ax-pre-sup 11084

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2535 df-eu 2564 df-clab 2710 df-cleq 2723 df-clel 2806 df-nfc 2881 df-ne 2929 df-nel 3033 df-ral 3048 df-rex 3057 df-rmo 3346 df-reu 3347 df-rab 3396 df-v 3438 df-sbc 3737 df-csb 3846 df-dif 3900 df-un 3902 df-in 3904 df-ss 3914 df-pss 3917 df-nul 4281 df-if 4473 df-pw 4549 df-sn 4574 df-pr 4576 df-op 4580 df-uni 4857 df-int 4896 df-iun 4941 df-br 5090 df-opab 5152 df-mpt 5171 df-tr 5197 df-id 5509 df-eprel 5514 df-po 5522 df-so 5523 df-fr 5567 df-se 5568 df-we 5569 df-xp 5620 df-rel 5621 df-cnv 5622 df-co 5623 df-dm 5624 df-rn 5625 df-res 5626 df-ima 5627 df-pred 6248 df-ord 6309 df-on 6310 df-lim 6311 df-suc 6312 df-iota 6437 df-fun 6483 df-fn 6484 df-f 6485 df-f1 6486 df-fo 6487 df-f1o 6488 df-fv 6489 df-isom 6490 df-riota 7303 df-ov 7349 df-oprab 7350 df-mpo 7351 df-om 7797 df-1st 7921 df-2nd 7922 df-frecs 8211 df-wrecs 8242 df-recs 8291 df-rdg 8329 df-1o 8385 df-er 8622 df-map 8752 df-pm 8753 df-en 8870 df-dom 8871 df-sdom 8872 df-fin 8873 df-sup 9326 df-inf 9327 df-oi 9396 df-card 9832 df-pnf 11148 df-mnf 11149 df-xr 11150 df-ltxr 11151 df-le 11152 df-sub 11346 df-neg 11347 df-div 11775 df-nn 12126 df-2 12188 df-3 12189 df-n0 12382 df-z 12469 df-uz 12733 df-rp 12891 df-ioo 13249 df-ico 13251 df-fz 13408 df-fzo 13555 df-fl 13696 df-seq 13909 df-exp 13969 df-hash 14238 df-cj 15006 df-re 15007 df-im 15008 df-sqrt 15142 df-abs 15143 df-clim 15395 df-rlim 15396 df-sum 15594 df-ovol 25392

This theorem is referenced by: ovoliunlem2 25431

W3C validator