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 25455

Description: Lemma for ovoliun 25458. (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 6881	. . . . . . . 8 ⊢ (𝑗 = (𝐽‘𝑚) → (𝐹‘(1^st ‘𝑗)) = (𝐹‘(1^st ‘(𝐽‘𝑚))))
2		fveq2 6876	. . . . . . . 8 ⊢ (𝑗 = (𝐽‘𝑚) → (2^nd ‘𝑗) = (2^nd ‘(𝐽‘𝑚)))
3	1, 2	fveq12d 6883	. . . . . . 7 ⊢ (𝑗 = (𝐽‘𝑚) → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
4	3	fveq2d 6880	. . . . . 6 ⊢ (𝑗 = (𝐽‘𝑚) → (2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
5	3	fveq2d 6880	. . . . . 6 ⊢ (𝑗 = (𝐽‘𝑚) → (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
6	4, 5	oveq12d 7423	. . . . 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 13991	. . . . 5 ⊢ (𝜑 → (1...𝐾) ∈ Fin)
8		ovoliun.j	. . . . . . 7 ⊢ (𝜑 → 𝐽:ℕ–1-1-onto→(ℕ × ℕ))
9		f1of1 6817	. . . . . . 7 ⊢ (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:ℕ–1-1→(ℕ × ℕ))
10	8, 9	syl 17	. . . . . 6 ⊢ (𝜑 → 𝐽:ℕ–1-1→(ℕ × ℕ))
11		fz1ssnn 13572	. . . . . 6 ⊢ (1...𝐾) ⊆ ℕ
12		f1ores 6832	. . . . . 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 6895	. . . . . 6 ⊢ (𝑚 ∈ (1...𝐾) → ((𝐽 ↾ (1...𝐾))‘𝑚) = (𝐽‘𝑚))
15	14	adantl 481	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((𝐽 ↾ (1...𝐾))‘𝑚) = (𝐽‘𝑚))
16		ovoliun.f	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
17	16	adantr 480	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
18		imassrn 6058	. . . . . . . . . . . . . . 15 ⊢ (𝐽 “ (1...𝐾)) ⊆ ran 𝐽
19		f1of 6818	. . . . . . . . . . . . . . . . 17 ⊢ (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:ℕ⟶(ℕ × ℕ))
20	8, 19	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐽:ℕ⟶(ℕ × ℕ))
21	20	frnd 6714	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ran 𝐽 ⊆ (ℕ × ℕ))
22	18, 21	sstrid 3970	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ))
23	22	sselda 3958	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → 𝑗 ∈ (ℕ × ℕ))
24		xp1st 8020	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ (ℕ × ℕ) → (1^st ‘𝑗) ∈ ℕ)
25	23, 24	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ∈ ℕ)
26	17, 25	ffvelcdmd 7075	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (𝐹‘(1^st ‘𝑗)) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
27		elovolmlem 25427	. . . . . . . . . . 11 ⊢ ((𝐹‘(1^st ‘𝑗)) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ↔ (𝐹‘(1^st ‘𝑗)):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
28	26, 27	sylib 218	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (𝐹‘(1^st ‘𝑗)):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
29		xp2nd 8021	. . . . . . . . . . 11 ⊢ (𝑗 ∈ (ℕ × ℕ) → (2^nd ‘𝑗) ∈ ℕ)
30	23, 29	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (2^nd ‘𝑗) ∈ ℕ)
31	28, 30	ffvelcdmd 7075	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) ∈ ( ≤ ∩ (ℝ × ℝ)))
32	31	elin2d 4180	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) ∈ (ℝ × ℝ))
33		xp2nd 8021	. . . . . . . 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 8020	. . . . . . . 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 11665	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ∈ ℝ)
38	37	recnd 11263	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ∈ ℂ)
39	6, 7, 13, 15, 38	fsumf1o 15739	. . . 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 7074	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐽‘𝑘) ∈ (ℕ × ℕ))
42		xp1st 8020	. . . . . . . . . . . 12 ⊢ ((𝐽‘𝑘) ∈ (ℕ × ℕ) → (1^st ‘(𝐽‘𝑘)) ∈ ℕ)
43	41, 42	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (1^st ‘(𝐽‘𝑘)) ∈ ℕ)
44	40, 43	ffvelcdmd 7075	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘(1^st ‘(𝐽‘𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
45		elovolmlem 25427	. . . . . . . . . 10 ⊢ ((𝐹‘(1^st ‘(𝐽‘𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ↔ (𝐹‘(1^st ‘(𝐽‘𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
46	44, 45	sylib 218	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘(1^st ‘(𝐽‘𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
47		xp2nd 8021	. . . . . . . . . 10 ⊢ ((𝐽‘𝑘) ∈ (ℕ × ℕ) → (2^nd ‘(𝐽‘𝑘)) ∈ ℕ)
48	41, 47	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (2^nd ‘(𝐽‘𝑘)) ∈ ℕ)
49	46, 48	ffvelcdmd 7075	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))) ∈ ( ≤ ∩ (ℝ × ℝ)))
50		ovoliun.h	. . . . . . . 8 ⊢ 𝐻 = (𝑘 ∈ ℕ ↦ ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))))
51	49, 50	fmptd 7104	. . . . . . 7 ⊢ (𝜑 → 𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
52		elfznn 13570	. . . . . . 7 ⊢ (𝑚 ∈ (1...𝐾) → 𝑚 ∈ ℕ)
53		eqid 2735	. . . . . . . 8 ⊢ ((abs ∘ − ) ∘ 𝐻) = ((abs ∘ − ) ∘ 𝐻)
54	53	ovolfsval 25423	. . . . . . 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 6881	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑚 → (1^st ‘(𝐽‘𝑘)) = (1^st ‘(𝐽‘𝑚)))
58	57	fveq2d 6880	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → (𝐹‘(1^st ‘(𝐽‘𝑘))) = (𝐹‘(1^st ‘(𝐽‘𝑚))))
59		2fveq3 6881	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → (2^nd ‘(𝐽‘𝑘)) = (2^nd ‘(𝐽‘𝑚)))
60	58, 59	fveq12d 6883	. . . . . . . . . 10 ⊢ (𝑘 = 𝑚 → ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
61		fvex 6889	. . . . . . . . . 10 ⊢ ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))) ∈ V
62	60, 50, 61	fvmpt 6986	. . . . . . . . 9 ⊢ (𝑚 ∈ ℕ → (𝐻‘𝑚) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
63	56, 62	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (𝐻‘𝑚) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
64	63	fveq2d 6880	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (2^nd ‘(𝐻‘𝑚)) = (2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
65	63	fveq2d 6880	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (1^st ‘(𝐻‘𝑚)) = (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
66	64, 65	oveq12d 7423	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))) = ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))))
67	55, 66	eqtrd 2770	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (((abs ∘ − ) ∘ 𝐻)‘𝑚) = ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))))
68		ovoliun.k	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ ℕ)
69		nnuz 12895	. . . . . 6 ⊢ ℕ = (ℤ_≥‘1)
70	68, 69	eleqtrdi 2844	. . . . 5 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘1))
71		ffvelcdm 7071	. . . . . . . . . . 11 ⊢ ((𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑚 ∈ ℕ) → (𝐻‘𝑚) ∈ ( ≤ ∩ (ℝ × ℝ)))
72	51, 52, 71	syl2an 596	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (𝐻‘𝑚) ∈ ( ≤ ∩ (ℝ × ℝ)))
73	72	elin2d 4180	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (𝐻‘𝑚) ∈ (ℝ × ℝ))
74		xp2nd 8021	. . . . . . . . 9 ⊢ ((𝐻‘𝑚) ∈ (ℝ × ℝ) → (2^nd ‘(𝐻‘𝑚)) ∈ ℝ)
75	73, 74	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (2^nd ‘(𝐻‘𝑚)) ∈ ℝ)
76		xp1st 8020	. . . . . . . . 9 ⊢ ((𝐻‘𝑚) ∈ (ℝ × ℝ) → (1^st ‘(𝐻‘𝑚)) ∈ ℝ)
77	73, 76	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (1^st ‘(𝐻‘𝑚)) ∈ ℝ)
78	75, 77	resubcld 11665	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))) ∈ ℝ)
79	78	recnd 11263	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))) ∈ ℂ)
80	66, 79	eqeltrrd 2835	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))) ∈ ℂ)
81	67, 70, 80	fsumser 15746	. . . 4 ⊢ (𝜑 → Σ𝑚 ∈ (1...𝐾)((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))) = (seq1( + , ((abs ∘ − ) ∘ 𝐻))‘𝐾))
82	39, 81	eqtrd 2770	. . 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 6877	. . 3 ⊢ (𝑈‘𝐾) = (seq1( + , ((abs ∘ − ) ∘ 𝐻))‘𝐾)
85	82, 84	eqtr4di 2788	. 2 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = (𝑈‘𝐾))
86		f1oeng 8985	. . . . . . 7 ⊢ (((1...𝐾) ∈ Fin ∧ (𝐽 ↾ (1...𝐾)):(1...𝐾)–1-1-onto→(𝐽 “ (1...𝐾))) → (1...𝐾) ≈ (𝐽 “ (1...𝐾)))
87	7, 13, 86	syl2anc 584	. . . . . 6 ⊢ (𝜑 → (1...𝐾) ≈ (𝐽 “ (1...𝐾)))
88	87	ensymd 9019	. . . . 5 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ≈ (1...𝐾))
89		enfii 9200	. . . . 5 ⊢ (((1...𝐾) ∈ Fin ∧ (𝐽 “ (1...𝐾)) ≈ (1...𝐾)) → (𝐽 “ (1...𝐾)) ∈ Fin)
90	7, 88, 89	syl2anc 584	. . . 4 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ∈ Fin)
91	90, 37	fsumrecl 15750	. . 3 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ∈ ℝ)
92		fzfid 13991	. . . . 5 ⊢ (𝜑 → (1...𝐿) ∈ Fin)
93		elfznn 13570	. . . . . 6 ⊢ (𝑛 ∈ (1...𝐿) → 𝑛 ∈ ℕ)
94		ovoliun.v	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol*‘𝐴) ∈ ℝ)
95	93, 94	sylan2 593	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol*‘𝐴) ∈ ℝ)
96	92, 95	fsumrecl 15750	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) ∈ ℝ)
97		ovoliun.b	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
98	97	rpred 13051	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ℝ)
99		2nn 12313	. . . . . . . 8 ⊢ 2 ∈ ℕ
100		nnnn0 12508	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
101		nnexpcl 14092	. . . . . . . 8 ⊢ ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ₀) → (2↑𝑛) ∈ ℕ)
102	99, 100, 101	sylancr 587	. . . . . . 7 ⊢ (𝑛 ∈ ℕ → (2↑𝑛) ∈ ℕ)
103	93, 102	syl 17	. . . . . 6 ⊢ (𝑛 ∈ (1...𝐿) → (2↑𝑛) ∈ ℕ)
104		nndivre 12281	. . . . . 6 ⊢ ((𝐵 ∈ ℝ ∧ (2↑𝑛) ∈ ℕ) → (𝐵 / (2↑𝑛)) ∈ ℝ)
105	98, 103, 104	syl2an 596	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐵 / (2↑𝑛)) ∈ ℝ)
106	92, 105	fsumrecl 15750	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) ∈ ℝ)
107	96, 106	readdcld 11264	. . 3 ⊢ (𝜑 → (Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))) ∈ ℝ)
108		ovoliun.r	. . . 4 ⊢ (𝜑 → sup(ran 𝑇, ℝ^*, < ) ∈ ℝ)
109	108, 98	readdcld 11264	. . 3 ⊢ (𝜑 → (sup(ran 𝑇, ℝ^*, < ) + 𝐵) ∈ ℝ)
110		relxp 5672	. . . . . . . . . . . . . . 15 ⊢ Rel ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))
111		relres 5992	. . . . . . . . . . . . . . 15 ⊢ Rel ((𝐽 “ (1...𝐾)) ↾ {𝑛})
112		elsni 4618	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ {𝑛} → 𝑥 = 𝑛)
113	112	opeq1d 4855	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ {𝑛} → ⟨𝑥, 𝑦⟩ = ⟨𝑛, 𝑦⟩)
114	113	eleq1d 2819	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ {𝑛} → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) ↔ ⟨𝑛, 𝑦⟩ ∈ (𝐽 “ (1...𝐾))))
115		vex 3463	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑛 ∈ V
116		vex 3463	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑦 ∈ V
117	115, 116	elimasn 6077	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}) ↔ ⟨𝑛, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)))
118	114, 117	bitr4di 289	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ {𝑛} → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) ↔ 𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})))
119	118	pm5.32i 574	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ {𝑛} ∧ ⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾))) ↔ (𝑥 ∈ {𝑛} ∧ 𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})))
120	116	opelresi 5974	. . . . . . . . . . . . . . . 16 ⊢ (⟨𝑥, 𝑦⟩ ∈ ((𝐽 “ (1...𝐾)) ↾ {𝑛}) ↔ (𝑥 ∈ {𝑛} ∧ ⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾))))
121		opelxp 5690	. . . . . . . . . . . . . . . 16 ⊢ (⟨𝑥, 𝑦⟩ ∈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ↔ (𝑥 ∈ {𝑛} ∧ 𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})))
122	119, 120, 121	3bitr4ri 304	. . . . . . . . . . . . . . 15 ⊢ (⟨𝑥, 𝑦⟩ ∈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ↔ ⟨𝑥, 𝑦⟩ ∈ ((𝐽 “ (1...𝐾)) ↾ {𝑛}))
123	110, 111, 122	eqrelriiv 5769	. . . . . . . . . . . . . 14 ⊢ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ↾ {𝑛})
124		df-res 5666	. . . . . . . . . . . . . 14 ⊢ ((𝐽 “ (1...𝐾)) ↾ {𝑛}) = ((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V))
125	123, 124	eqtri 2758	. . . . . . . . . . . . 13 ⊢ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V))
126	125	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V)))
127	126	iuneq2dv 4992	. . . . . . . . . . 11 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ∪ 𝑛 ∈ (1...𝐿)((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V)))
128		iunin2 5047	. . . . . . . . . . 11 ⊢ ∪ 𝑛 ∈ (1...𝐿)((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V)) = ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V))
129	127, 128	eqtrdi 2786	. . . . . . . . . 10 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)))
130		relxp 5672	. . . . . . . . . . . . . 14 ⊢ Rel (ℕ × ℕ)
131		relss 5760	. . . . . . . . . . . . . 14 ⊢ ((𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ) → (Rel (ℕ × ℕ) → Rel (𝐽 “ (1...𝐾))))
132	22, 130, 131	mpisyl 21	. . . . . . . . . . . . 13 ⊢ (𝜑 → Rel (𝐽 “ (1...𝐾)))
133		ovoliun.l2	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ∀𝑤 ∈ (1...𝐾)(1^st ‘(𝐽‘𝑤)) ≤ 𝐿)
134	20	ffnd 6707	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝐽 Fn ℕ)
135		fveq2 6876	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑗 = (𝐽‘𝑤) → (1^st ‘𝑗) = (1^st ‘(𝐽‘𝑤)))
136	135	breq1d 5129	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = (𝐽‘𝑤) → ((1^st ‘𝑗) ≤ 𝐿 ↔ (1^st ‘(𝐽‘𝑤)) ≤ 𝐿))
137	136	ralima 7229	. . . . . . . . . . . . . . . . . . . 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 3234	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ≤ 𝐿)
141	25, 69	eleqtrdi 2844	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ∈ (ℤ_≥‘1))
142		ovoliun.l1	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝐿 ∈ ℤ)
143	142	adantr 480	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → 𝐿 ∈ ℤ)
144		elfz5 13533	. . . . . . . . . . . . . . . . . 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 3132	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ∈ (1...𝐿))
148		vex 3463	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑥 ∈ V
149	148, 116	op1std 7998	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = ⟨𝑥, 𝑦⟩ → (1^st ‘𝑗) = 𝑥)
150	149	eleq1d 2819	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = ⟨𝑥, 𝑦⟩ → ((1^st ‘𝑗) ∈ (1...𝐿) ↔ 𝑥 ∈ (1...𝐿)))
151	150	rspccv 3598	. . . . . . . . . . . . . . 15 ⊢ (∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ∈ (1...𝐿) → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) → 𝑥 ∈ (1...𝐿)))
152	147, 151	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) → 𝑥 ∈ (1...𝐿)))
153		opelxp 5690	. . . . . . . . . . . . . . 15 ⊢ (⟨𝑥, 𝑦⟩ ∈ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V) ↔ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ∧ 𝑦 ∈ V))
154	116	biantru 529	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ↔ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ∧ 𝑦 ∈ V))
155		iunid 5036	. . . . . . . . . . . . . . . 16 ⊢ ∪ 𝑛 ∈ (1...𝐿){𝑛} = (1...𝐿)
156	155	eleq2i 2826	. . . . . . . . . . . . . . 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 5767	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ⊆ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V))
160		xpiundir 5726	. . . . . . . . . . . 12 ⊢ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V) = ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)
161	159, 160	sseqtrdi 3999	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V))
162		dfss2 3944	. . . . . . . . . . 11 ⊢ ((𝐽 “ (1...𝐾)) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V) ↔ ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)) = (𝐽 “ (1...𝐾)))
163	161, 162	sylib 218	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)) = (𝐽 “ (1...𝐾)))
164	129, 163	eqtrd 2770	. . . . . . . . 9 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = (𝐽 “ (1...𝐾)))
165	164, 90	eqeltrd 2834	. . . . . . . 8 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin)
166		ssiun2 5023	. . . . . . . 8 ⊢ (𝑛 ∈ (1...𝐿) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})))
167		ssfi 9187	. . . . . . . 8 ⊢ ((∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin ∧ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin)
168	165, 166, 167	syl2an 596	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin)
169		2ndconst 8100	. . . . . . . . . 10 ⊢ (𝑛 ∈ V → (2^nd ↾ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))):({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))–1-1-onto→((𝐽 “ (1...𝐾)) “ {𝑛}))
170	169	elv 3464	. . . . . . . . 9 ⊢ (2^nd ↾ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))):({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))–1-1-onto→((𝐽 “ (1...𝐾)) “ {𝑛})
171		f1oeng 8985	. . . . . . . . 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 9019	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ≈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})))
174		enfii 9200	. . . . . . 7 ⊢ ((({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin ∧ ((𝐽 “ (1...𝐾)) “ {𝑛}) ≈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ∈ Fin)
175	168, 173, 174	syl2anc 584	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ∈ Fin)
176		ffvelcdm 7071	. . . . . . . . . . . . . 14 ⊢ ((𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
177	16, 93, 176	syl2an 596	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐹‘𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
178		elovolmlem 25427	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ↔ (𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
179	177, 178	sylib 218	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
180	179	adantrr 717	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → (𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
181		imassrn 6058	. . . . . . . . . . . . . 14 ⊢ ((𝐽 “ (1...𝐾)) “ {𝑛}) ⊆ ran (𝐽 “ (1...𝐾))
182	22	adantr 480	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ))
183		rnss 5919	. . . . . . . . . . . . . . . 16 ⊢ ((𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ) → ran (𝐽 “ (1...𝐾)) ⊆ ran (ℕ × ℕ))
184	182, 183	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran (𝐽 “ (1...𝐾)) ⊆ ran (ℕ × ℕ))
185		rnxpid 6162	. . . . . . . . . . . . . . 15 ⊢ ran (ℕ × ℕ) = ℕ
186	184, 185	sseqtrdi 3999	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran (𝐽 “ (1...𝐾)) ⊆ ℕ)
187	181, 186	sstrid 3970	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ⊆ ℕ)
188	187	sseld 3957	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}) → 𝑖 ∈ ℕ))
189	188	impr 454	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → 𝑖 ∈ ℕ)
190	180, 189	ffvelcdmd 7075	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((𝐹‘𝑛)‘𝑖) ∈ ( ≤ ∩ (ℝ × ℝ)))
191	190	elin2d 4180	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((𝐹‘𝑛)‘𝑖) ∈ (ℝ × ℝ))
192		xp2nd 8021	. . . . . . . . 9 ⊢ (((𝐹‘𝑛)‘𝑖) ∈ (ℝ × ℝ) → (2^nd ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
193	191, 192	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → (2^nd ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
194		xp1st 8020	. . . . . . . . 9 ⊢ (((𝐹‘𝑛)‘𝑖) ∈ (ℝ × ℝ) → (1^st ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
195	191, 194	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → (1^st ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
196	193, 195	resubcld 11665	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
197	196	anassrs 467	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
198	175, 197	fsumrecl 15750	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
199	98, 102, 104	syl2an 596	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐵 / (2↑𝑛)) ∈ ℝ)
200	94, 199	readdcld 11264	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((vol*‘𝐴) + (𝐵 / (2↑𝑛))) ∈ ℝ)
201	93, 200	sylan2 593	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((vol*‘𝐴) + (𝐵 / (2↑𝑛))) ∈ ℝ)
202		eqid 2735	. . . . . . . . . . . 12 ⊢ ((abs ∘ − ) ∘ (𝐹‘𝑛)) = ((abs ∘ − ) ∘ (𝐹‘𝑛))
203		ovoliun.s	. . . . . . . . . . . 12 ⊢ 𝑆 = seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛)))
204	202, 203	ovolsf 25425	. . . . . . . . . . 11 ⊢ ((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑆:ℕ⟶(0[,)+∞))
205	179, 204	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝑆:ℕ⟶(0[,)+∞))
206	205	frnd 6714	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ⊆ (0[,)+∞))
207		icossxr 13449	. . . . . . . . 9 ⊢ (0[,)+∞) ⊆ ℝ^*
208	206, 207	sstrdi 3971	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ⊆ ℝ^*)
209		supxrcl 13331	. . . . . . . 8 ⊢ (ran 𝑆 ⊆ ℝ^* → sup(ran 𝑆, ℝ^, < ) ∈ ℝ^)
210	208, 209	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → sup(ran 𝑆, ℝ^, < ) ∈ ℝ^)
211		mnfxr 11292	. . . . . . . . 9 ⊢ -∞ ∈ ℝ^*
212	211	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → -∞ ∈ ℝ^*)
213	95	rexrd 11285	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol‘𝐴) ∈ ℝ^)
214	95	mnfltd 13140	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → -∞ < (vol*‘𝐴))
215		ovoliun.x1	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛)))
216	93, 215	sylan2 593	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛)))
217	203	ovollb 25432	. . . . . . . . 9 ⊢ (((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛))) → (vol‘𝐴) ≤ sup(ran 𝑆, ℝ^, < ))
218	179, 216, 217	syl2anc 584	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol‘𝐴) ≤ sup(ran 𝑆, ℝ^, < ))
219	212, 213, 210, 214, 218	xrltletrd 13177	. . . . . . 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 13185	. . . . . . 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 12623	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 1 ∈ ℤ)
225	202	ovolfsval 25423	. . . . . . . . 9 ⊢ (((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑖 ∈ ℕ) → (((abs ∘ − ) ∘ (𝐹‘𝑛))‘𝑖) = ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
226	179, 225	sylan 580	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → (((abs ∘ − ) ∘ (𝐹‘𝑛))‘𝑖) = ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
227	202	ovolfsf 25424	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) → ((abs ∘ − ) ∘ (𝐹‘𝑛)):ℕ⟶(0[,)+∞))
228	179, 227	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((abs ∘ − ) ∘ (𝐹‘𝑛)):ℕ⟶(0[,)+∞))
229	228	ffvelcdmda 7074	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → (((abs ∘ − ) ∘ (𝐹‘𝑛))‘𝑖) ∈ (0[,)+∞))
230	226, 229	eqeltrrd 2835	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ (0[,)+∞))
231		elrege0 13471	. . . . . . . . . 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 13340	. . . . . . . . . . . . . . 15 ⊢ ((ran 𝑆 ⊆ ℝ^* ∧ 𝑧 ∈ ran 𝑆) → 𝑧 ≤ sup(ran 𝑆, ℝ^*, < ))
236	208, 235	sylan 580	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑧 ∈ ran 𝑆) → 𝑧 ≤ sup(ran 𝑆, ℝ^*, < ))
237	236	ralrimiva 3132	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ∀𝑧 ∈ ran 𝑆 𝑧 ≤ sup(ran 𝑆, ℝ^*, < ))
238		brralrspcev 5179	. . . . . . . . . . . . 13 ⊢ ((sup(ran 𝑆, ℝ^, < ) ∈ ℝ ∧ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ sup(ran 𝑆, ℝ^, < )) → ∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥)
239	223, 237, 238	syl2anc 584	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥)
240	205	ffnd 6707	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝑆 Fn ℕ)
241		breq1 5122	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = (𝑆‘𝑘) → (𝑧 ≤ 𝑥 ↔ (𝑆‘𝑘) ≤ 𝑥))
242	241	ralrn 7078	. . . . . . . . . . . . . 14 ⊢ (𝑆 Fn ℕ → (∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥 ↔ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥))
243	240, 242	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥 ↔ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥))
244	243	rexbidv 3164	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥 ↔ ∃𝑥 ∈ ℝ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥))
245	239, 244	mpbid 232	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ∃𝑥 ∈ ℝ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥)
246	69, 203, 224, 226, 233, 234, 245	isumsup2 15862	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝑆 ⇝ sup(ran 𝑆, ℝ, < ))
247	203, 246	eqbrtrrid 5155	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛))) ⇝ sup(ran 𝑆, ℝ, < ))
248		climrel 15508	. . . . . . . . . 10 ⊢ Rel ⇝
249	248	releldmi 5928	. . . . . . . . 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 15861	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ Σ𝑖 ∈ ℕ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
252	69, 203, 224, 226, 233, 234, 245	isumsup 15863	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ℕ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = sup(ran 𝑆, ℝ, < ))
253		rge0ssre 13473	. . . . . . . . . 10 ⊢ (0[,)+∞) ⊆ ℝ
254	206, 253	sstrdi 3971	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ⊆ ℝ)
255		1nn 12251	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ
256	205	fdmd 6716	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → dom 𝑆 = ℕ)
257	255, 256	eleqtrrid 2841	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 1 ∈ dom 𝑆)
258	257	ne0d 4317	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → dom 𝑆 ≠ ∅)
259		dm0rn0 5904	. . . . . . . . . . 11 ⊢ (dom 𝑆 = ∅ ↔ ran 𝑆 = ∅)
260	259	necon3bii 2984	. . . . . . . . . 10 ⊢ (dom 𝑆 ≠ ∅ ↔ ran 𝑆 ≠ ∅)
261	258, 260	sylib 218	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ≠ ∅)
262		supxrre 13343	. . . . . . . . 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 2773	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ℕ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = sup(ran 𝑆, ℝ^*, < ))
265	251, 264	breqtrd 5145	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ sup(ran 𝑆, ℝ^*, < ))
266	198, 223, 201, 265, 221	letrd 11392	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
267	92, 198, 201, 266	fsumle 15815	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ Σ𝑛 ∈ (1...𝐿)((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
268		vex 3463	. . . . . . . . . . 11 ⊢ 𝑖 ∈ V
269	115, 268	op1std 7998	. . . . . . . . . 10 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (1^st ‘𝑗) = 𝑛)
270	269	fveq2d 6880	. . . . . . . . 9 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (𝐹‘(1^st ‘𝑗)) = (𝐹‘𝑛))
271	115, 268	op2ndd 7999	. . . . . . . . 9 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (2^nd ‘𝑗) = 𝑖)
272	270, 271	fveq12d 6883	. . . . . . . 8 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) = ((𝐹‘𝑛)‘𝑖))
273	272	fveq2d 6880	. . . . . . 7 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (2^nd ‘((𝐹‘𝑛)‘𝑖)))
274	272	fveq2d 6880	. . . . . . 7 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (1^st ‘((𝐹‘𝑛)‘𝑖)))
275	273, 274	oveq12d 7423	. . . . . 6 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
276	196	recnd 11263	. . . . . 6 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℂ)
277	275, 92, 175, 276	fsum2d 15787	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = Σ𝑗 ∈ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))))
278	164	sumeq1d 15716	. . . . 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 2770	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))))
280	95	recnd 11263	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol*‘𝐴) ∈ ℂ)
281	105	recnd 11263	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐵 / (2↑𝑛)) ∈ ℂ)
282	92, 280, 281	fsumadd 15756	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)((vol‘𝐴) + (𝐵 / (2↑𝑛))) = (Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))))
283	267, 279, 282	3brtr3d 5150	. . 3 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ≤ (Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))))
284		1zzd 12623	. . . . . . . . 9 ⊢ (𝜑 → 1 ∈ ℤ)
285		simpr 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
286		ovoliun.g	. . . . . . . . . . . 12 ⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (vol*‘𝐴))
287	286	fvmpt2 6997	. . . . . . . . . . 11 ⊢ ((𝑛 ∈ ℕ ∧ (vol‘𝐴) ∈ ℝ) → (𝐺‘𝑛) = (vol‘𝐴))
288	285, 94, 287	syl2anc 584	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐺‘𝑛) = (vol*‘𝐴))
289	288, 94	eqeltrd 2834	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐺‘𝑛) ∈ ℝ)
290	69, 284, 289	serfre 14049	. . . . . . . 8 ⊢ (𝜑 → seq1( + , 𝐺):ℕ⟶ℝ)
291		ovoliun.t	. . . . . . . . 9 ⊢ 𝑇 = seq1( + , 𝐺)
292	291	feq1i 6697	. . . . . . . 8 ⊢ (𝑇:ℕ⟶ℝ ↔ seq1( + , 𝐺):ℕ⟶ℝ)
293	290, 292	sylibr 234	. . . . . . 7 ⊢ (𝜑 → 𝑇:ℕ⟶ℝ)
294	293	frnd 6714	. . . . . 6 ⊢ (𝜑 → ran 𝑇 ⊆ ℝ)
295		ressxr 11279	. . . . . 6 ⊢ ℝ ⊆ ℝ^*
296	294, 295	sstrdi 3971	. . . . 5 ⊢ (𝜑 → ran 𝑇 ⊆ ℝ^*)
297	93, 288	sylan2 593	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐺‘𝑛) = (vol*‘𝐴))
298		1red 11236	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℝ)
299		ffvelcdm 7071	. . . . . . . . . . . . 13 ⊢ ((𝐽:ℕ⟶(ℕ × ℕ) ∧ 1 ∈ ℕ) → (𝐽‘1) ∈ (ℕ × ℕ))
300	20, 255, 299	sylancl 586	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐽‘1) ∈ (ℕ × ℕ))
301		xp1st 8020	. . . . . . . . . . . 12 ⊢ ((𝐽‘1) ∈ (ℕ × ℕ) → (1^st ‘(𝐽‘1)) ∈ ℕ)
302	300, 301	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (1^st ‘(𝐽‘1)) ∈ ℕ)
303	302	nnred 12255	. . . . . . . . . 10 ⊢ (𝜑 → (1^st ‘(𝐽‘1)) ∈ ℝ)
304	142	zred 12697	. . . . . . . . . 10 ⊢ (𝜑 → 𝐿 ∈ ℝ)
305	302	nnge1d 12288	. . . . . . . . . 10 ⊢ (𝜑 → 1 ≤ (1^st ‘(𝐽‘1)))
306		2fveq3 6881	. . . . . . . . . . . 12 ⊢ (𝑤 = 1 → (1^st ‘(𝐽‘𝑤)) = (1^st ‘(𝐽‘1)))
307	306	breq1d 5129	. . . . . . . . . . 11 ⊢ (𝑤 = 1 → ((1^st ‘(𝐽‘𝑤)) ≤ 𝐿 ↔ (1^st ‘(𝐽‘1)) ≤ 𝐿))
308		eluzfz1 13548	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ (ℤ_≥‘1) → 1 ∈ (1...𝐾))
309	70, 308	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → 1 ∈ (1...𝐾))
310	307, 133, 309	rspcdva 3602	. . . . . . . . . 10 ⊢ (𝜑 → (1^st ‘(𝐽‘1)) ≤ 𝐿)
311	298, 303, 304, 305, 310	letrd 11392	. . . . . . . . 9 ⊢ (𝜑 → 1 ≤ 𝐿)
312		elnnz1 12618	. . . . . . . . 9 ⊢ (𝐿 ∈ ℕ ↔ (𝐿 ∈ ℤ ∧ 1 ≤ 𝐿))
313	142, 311, 312	sylanbrc 583	. . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ ℕ)
314	313, 69	eleqtrdi 2844	. . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ (ℤ_≥‘1))
315	297, 314, 280	fsumser 15746	. . . . . 6 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) = (seq1( + , 𝐺)‘𝐿))
316		seqfn 14031	. . . . . . . . 9 ⊢ (1 ∈ ℤ → seq1( + , 𝐺) Fn (ℤ_≥‘1))
317	284, 316	syl 17	. . . . . . . 8 ⊢ (𝜑 → seq1( + , 𝐺) Fn (ℤ_≥‘1))
318		fnfvelrn 7070	. . . . . . . 8 ⊢ ((seq1( + , 𝐺) Fn (ℤ_≥‘1) ∧ 𝐿 ∈ (ℤ_≥‘1)) → (seq1( + , 𝐺)‘𝐿) ∈ ran seq1( + , 𝐺))
319	317, 314, 318	syl2anc 584	. . . . . . 7 ⊢ (𝜑 → (seq1( + , 𝐺)‘𝐿) ∈ ran seq1( + , 𝐺))
320	291	rneqi 5917	. . . . . . 7 ⊢ ran 𝑇 = ran seq1( + , 𝐺)
321	319, 320	eleqtrrdi 2845	. . . . . 6 ⊢ (𝜑 → (seq1( + , 𝐺)‘𝐿) ∈ ran 𝑇)
322	315, 321	eqeltrd 2834	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) ∈ ran 𝑇)
323		supxrub 13340	. . . . 5 ⊢ ((ran 𝑇 ⊆ ℝ^* ∧ Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) ∈ ran 𝑇) → Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) ≤ sup(ran 𝑇, ℝ^*, < ))
324	296, 322, 323	syl2anc 584	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) ≤ sup(ran 𝑇, ℝ^, < ))
325	98	recnd 11263	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ℂ)
326		geo2sum 15889	. . . . . 6 ⊢ ((𝐿 ∈ ℕ ∧ 𝐵 ∈ ℂ) → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) = (𝐵 − (𝐵 / (2↑𝐿))))
327	313, 325, 326	syl2anc 584	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) = (𝐵 − (𝐵 / (2↑𝐿))))
328	313	nnnn0d 12562	. . . . . . . . . 10 ⊢ (𝜑 → 𝐿 ∈ ℕ₀)
329		nnexpcl 14092	. . . . . . . . . 10 ⊢ ((2 ∈ ℕ ∧ 𝐿 ∈ ℕ₀) → (2↑𝐿) ∈ ℕ)
330	99, 328, 329	sylancr 587	. . . . . . . . 9 ⊢ (𝜑 → (2↑𝐿) ∈ ℕ)
331	330	nnrpd 13049	. . . . . . . 8 ⊢ (𝜑 → (2↑𝐿) ∈ ℝ⁺)
332	97, 331	rpdivcld 13068	. . . . . . 7 ⊢ (𝜑 → (𝐵 / (2↑𝐿)) ∈ ℝ⁺)
333	332	rpge0d 13055	. . . . . 6 ⊢ (𝜑 → 0 ≤ (𝐵 / (2↑𝐿)))
334	98, 330	nndivred 12294	. . . . . . 7 ⊢ (𝜑 → (𝐵 / (2↑𝐿)) ∈ ℝ)
335	98, 334	subge02d 11829	. . . . . 6 ⊢ (𝜑 → (0 ≤ (𝐵 / (2↑𝐿)) ↔ (𝐵 − (𝐵 / (2↑𝐿))) ≤ 𝐵))
336	333, 335	mpbid 232	. . . . 5 ⊢ (𝜑 → (𝐵 − (𝐵 / (2↑𝐿))) ≤ 𝐵)
337	327, 336	eqbrtrd 5141	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) ≤ 𝐵)
338	96, 106, 108, 98, 324, 337	le2addd 11856	. . 3 ⊢ (𝜑 → (Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))) ≤ (sup(ran 𝑇, ℝ^, < ) + 𝐵))
339	91, 107, 109, 283, 338	letrd 11392	. 2 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ≤ (sup(ran 𝑇, ℝ^*, < ) + 𝐵))
340	85, 339	eqbrtrrd 5143	1 ⊢ (𝜑 → (𝑈‘𝐾) ≤ (sup(ran 𝑇, ℝ^*, < ) + 𝐵))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 = wceq 1540 ∈ wcel 2108 ≠ wne 2932 ∀wral 3051 ∃wrex 3060 Vcvv 3459 ∩ cin 3925 ⊆ wss 3926 ∅c0 4308 {csn 4601 ⟨cop 4607 ∪ cuni 4883 ∪ ciun 4967 class class class wbr 5119 ↦ cmpt 5201 × cxp 5652 dom cdm 5654 ran crn 5655 ↾ cres 5656 “ cima 5657 ∘ ccom 5658 Rel wrel 5659 Fn wfn 6526 ⟶wf 6527 –1-1→wf1 6528 –1-1-onto→wf1o 6530 ‘cfv 6531 (class class class)co 7405 1^st c1st 7986 2^nd c2nd 7987 ↑_m cmap 8840 ≈ cen 8956 Fincfn 8959 supcsup 9452 ℂcc 11127 ℝcr 11128 0cc0 11129 1c1 11130 + caddc 11132 +∞cpnf 11266 -∞cmnf 11267 ℝ^*cxr 11268 < clt 11269 ≤ cle 11270 − cmin 11466 / cdiv 11894 ℕcn 12240 2c2 12295 ℕ₀cn0 12501 ℤcz 12588 ℤ_≥cuz 12852 ℝ⁺crp 13008 (,)cioo 13362 [,)cico 13364 ...cfz 13524 seqcseq 14019 ↑cexp 14079 abscabs 15253 ⇝ cli 15500 Σcsu 15702 vol*covol 25415

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1795 ax-4 1809 ax-5 1910 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2157 ax-12 2177 ax-ext 2707 ax-rep 5249 ax-sep 5266 ax-nul 5276 ax-pow 5335 ax-pr 5402 ax-un 7729 ax-inf2 9655 ax-cnex 11185 ax-resscn 11186 ax-1cn 11187 ax-icn 11188 ax-addcl 11189 ax-addrcl 11190 ax-mulcl 11191 ax-mulrcl 11192 ax-mulcom 11193 ax-addass 11194 ax-mulass 11195 ax-distr 11196 ax-i2m1 11197 ax-1ne0 11198 ax-1rid 11199 ax-rnegex 11200 ax-rrecex 11201 ax-cnre 11202 ax-pre-lttri 11203 ax-pre-lttrn 11204 ax-pre-ltadd 11205 ax-pre-mulgt0 11206 ax-pre-sup 11207

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1543 df-fal 1553 df-ex 1780 df-nf 1784 df-sb 2065 df-mo 2539 df-eu 2568 df-clab 2714 df-cleq 2727 df-clel 2809 df-nfc 2885 df-ne 2933 df-nel 3037 df-ral 3052 df-rex 3061 df-rmo 3359 df-reu 3360 df-rab 3416 df-v 3461 df-sbc 3766 df-csb 3875 df-dif 3929 df-un 3931 df-in 3933 df-ss 3943 df-pss 3946 df-nul 4309 df-if 4501 df-pw 4577 df-sn 4602 df-pr 4604 df-op 4608 df-uni 4884 df-int 4923 df-iun 4969 df-br 5120 df-opab 5182 df-mpt 5202 df-tr 5230 df-id 5548 df-eprel 5553 df-po 5561 df-so 5562 df-fr 5606 df-se 5607 df-we 5608 df-xp 5660 df-rel 5661 df-cnv 5662 df-co 5663 df-dm 5664 df-rn 5665 df-res 5666 df-ima 5667 df-pred 6290 df-ord 6355 df-on 6356 df-lim 6357 df-suc 6358 df-iota 6484 df-fun 6533 df-fn 6534 df-f 6535 df-f1 6536 df-fo 6537 df-f1o 6538 df-fv 6539 df-isom 6540 df-riota 7362 df-ov 7408 df-oprab 7409 df-mpo 7410 df-om 7862 df-1st 7988 df-2nd 7989 df-frecs 8280 df-wrecs 8311 df-recs 8385 df-rdg 8424 df-1o 8480 df-er 8719 df-map 8842 df-pm 8843 df-en 8960 df-dom 8961 df-sdom 8962 df-fin 8963 df-sup 9454 df-inf 9455 df-oi 9524 df-card 9953 df-pnf 11271 df-mnf 11272 df-xr 11273 df-ltxr 11274 df-le 11275 df-sub 11468 df-neg 11469 df-div 11895 df-nn 12241 df-2 12303 df-3 12304 df-n0 12502 df-z 12589 df-uz 12853 df-rp 13009 df-ioo 13366 df-ico 13368 df-fz 13525 df-fzo 13672 df-fl 13809 df-seq 14020 df-exp 14080 df-hash 14349 df-cj 15118 df-re 15119 df-im 15120 df-sqrt 15254 df-abs 15255 df-clim 15504 df-rlim 15505 df-sum 15703 df-ovol 25417

This theorem is referenced by: ovoliunlem2 25456

W3C validator