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 24106

Description: Lemma for ovoliun 24109. (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 6650	. . . . . . . 8 ⊢ (𝑗 = (𝐽‘𝑚) → (𝐹‘(1^st ‘𝑗)) = (𝐹‘(1^st ‘(𝐽‘𝑚))))
2		fveq2 6645	. . . . . . . 8 ⊢ (𝑗 = (𝐽‘𝑚) → (2^nd ‘𝑗) = (2^nd ‘(𝐽‘𝑚)))
3	1, 2	fveq12d 6652	. . . . . . 7 ⊢ (𝑗 = (𝐽‘𝑚) → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
4	3	fveq2d 6649	. . . . . 6 ⊢ (𝑗 = (𝐽‘𝑚) → (2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
5	3	fveq2d 6649	. . . . . 6 ⊢ (𝑗 = (𝐽‘𝑚) → (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
6	4, 5	oveq12d 7153	. . . . 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 13336	. . . . 5 ⊢ (𝜑 → (1...𝐾) ∈ Fin)
8		ovoliun.j	. . . . . . 7 ⊢ (𝜑 → 𝐽:ℕ–1-1-onto→(ℕ × ℕ))
9		f1of1 6589	. . . . . . 7 ⊢ (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:ℕ–1-1→(ℕ × ℕ))
10	8, 9	syl 17	. . . . . 6 ⊢ (𝜑 → 𝐽:ℕ–1-1→(ℕ × ℕ))
11		fz1ssnn 12933	. . . . . 6 ⊢ (1...𝐾) ⊆ ℕ
12		f1ores 6604	. . . . . 6 ⊢ ((𝐽:ℕ–1-1→(ℕ × ℕ) ∧ (1...𝐾) ⊆ ℕ) → (𝐽 ↾ (1...𝐾)):(1...𝐾)–1-1-onto→(𝐽 “ (1...𝐾)))
13	10, 11, 12	sylancl 589	. . . . 5 ⊢ (𝜑 → (𝐽 ↾ (1...𝐾)):(1...𝐾)–1-1-onto→(𝐽 “ (1...𝐾)))
14		fvres 6664	. . . . . 6 ⊢ (𝑚 ∈ (1...𝐾) → ((𝐽 ↾ (1...𝐾))‘𝑚) = (𝐽‘𝑚))
15	14	adantl 485	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((𝐽 ↾ (1...𝐾))‘𝑚) = (𝐽‘𝑚))
16		ovoliun.f	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
17	16	adantr 484	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
18		imassrn 5907	. . . . . . . . . . . . . . 15 ⊢ (𝐽 “ (1...𝐾)) ⊆ ran 𝐽
19		f1of 6590	. . . . . . . . . . . . . . . . 17 ⊢ (𝐽:ℕ–1-1-onto→(ℕ × ℕ) → 𝐽:ℕ⟶(ℕ × ℕ))
20	8, 19	syl 17	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐽:ℕ⟶(ℕ × ℕ))
21	20	frnd 6494	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ran 𝐽 ⊆ (ℕ × ℕ))
22	18, 21	sstrid 3926	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ))
23	22	sselda 3915	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → 𝑗 ∈ (ℕ × ℕ))
24		xp1st 7703	. . . . . . . . . . . . 13 ⊢ (𝑗 ∈ (ℕ × ℕ) → (1^st ‘𝑗) ∈ ℕ)
25	23, 24	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ∈ ℕ)
26	17, 25	ffvelrnd 6829	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (𝐹‘(1^st ‘𝑗)) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
27		elovolmlem 24078	. . . . . . . . . . 11 ⊢ ((𝐹‘(1^st ‘𝑗)) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ↔ (𝐹‘(1^st ‘𝑗)):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
28	26, 27	sylib 221	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (𝐹‘(1^st ‘𝑗)):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
29		xp2nd 7704	. . . . . . . . . . 11 ⊢ (𝑗 ∈ (ℕ × ℕ) → (2^nd ‘𝑗) ∈ ℕ)
30	23, 29	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (2^nd ‘𝑗) ∈ ℕ)
31	28, 30	ffvelrnd 6829	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) ∈ ( ≤ ∩ (ℝ × ℝ)))
32	31	elin2d 4126	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) ∈ (ℝ × ℝ))
33		xp2nd 7704	. . . . . . . 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 7703	. . . . . . . 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 11057	. . . . . 6 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ∈ ℝ)
38	37	recnd 10658	. . . . 5 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ∈ ℂ)
39	6, 7, 13, 15, 38	fsumf1o 15072	. . . 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 484	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → 𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
41	20	ffvelrnda 6828	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐽‘𝑘) ∈ (ℕ × ℕ))
42		xp1st 7703	. . . . . . . . . . . 12 ⊢ ((𝐽‘𝑘) ∈ (ℕ × ℕ) → (1^st ‘(𝐽‘𝑘)) ∈ ℕ)
43	41, 42	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (1^st ‘(𝐽‘𝑘)) ∈ ℕ)
44	40, 43	ffvelrnd 6829	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘(1^st ‘(𝐽‘𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
45		elovolmlem 24078	. . . . . . . . . 10 ⊢ ((𝐹‘(1^st ‘(𝐽‘𝑘))) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ↔ (𝐹‘(1^st ‘(𝐽‘𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
46	44, 45	sylib 221	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (𝐹‘(1^st ‘(𝐽‘𝑘))):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
47		xp2nd 7704	. . . . . . . . . 10 ⊢ ((𝐽‘𝑘) ∈ (ℕ × ℕ) → (2^nd ‘(𝐽‘𝑘)) ∈ ℕ)
48	41, 47	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → (2^nd ‘(𝐽‘𝑘)) ∈ ℕ)
49	46, 48	ffvelrnd 6829	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑘 ∈ ℕ) → ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))) ∈ ( ≤ ∩ (ℝ × ℝ)))
50		ovoliun.h	. . . . . . . 8 ⊢ 𝐻 = (𝑘 ∈ ℕ ↦ ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))))
51	49, 50	fmptd 6855	. . . . . . 7 ⊢ (𝜑 → 𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)))
52		elfznn 12931	. . . . . . 7 ⊢ (𝑚 ∈ (1...𝐾) → 𝑚 ∈ ℕ)
53		eqid 2798	. . . . . . . 8 ⊢ ((abs ∘ − ) ∘ 𝐻) = ((abs ∘ − ) ∘ 𝐻)
54	53	ovolfsval 24074	. . . . . . 7 ⊢ ((𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑚 ∈ ℕ) → (((abs ∘ − ) ∘ 𝐻)‘𝑚) = ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))))
55	51, 52, 54	syl2an 598	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (((abs ∘ − ) ∘ 𝐻)‘𝑚) = ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))))
56	52	adantl 485	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → 𝑚 ∈ ℕ)
57		2fveq3 6650	. . . . . . . . . . . 12 ⊢ (𝑘 = 𝑚 → (1^st ‘(𝐽‘𝑘)) = (1^st ‘(𝐽‘𝑚)))
58	57	fveq2d 6649	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → (𝐹‘(1^st ‘(𝐽‘𝑘))) = (𝐹‘(1^st ‘(𝐽‘𝑚))))
59		2fveq3 6650	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑚 → (2^nd ‘(𝐽‘𝑘)) = (2^nd ‘(𝐽‘𝑚)))
60	58, 59	fveq12d 6652	. . . . . . . . . 10 ⊢ (𝑘 = 𝑚 → ((𝐹‘(1^st ‘(𝐽‘𝑘)))‘(2^nd ‘(𝐽‘𝑘))) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
61		fvex 6658	. . . . . . . . . 10 ⊢ ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))) ∈ V
62	60, 50, 61	fvmpt 6745	. . . . . . . . 9 ⊢ (𝑚 ∈ ℕ → (𝐻‘𝑚) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
63	56, 62	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (𝐻‘𝑚) = ((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))
64	63	fveq2d 6649	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (2^nd ‘(𝐻‘𝑚)) = (2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
65	63	fveq2d 6649	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (1^st ‘(𝐻‘𝑚)) = (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))))
66	64, 65	oveq12d 7153	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))) = ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))))
67	55, 66	eqtrd 2833	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (((abs ∘ − ) ∘ 𝐻)‘𝑚) = ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))))
68		ovoliun.k	. . . . . 6 ⊢ (𝜑 → 𝐾 ∈ ℕ)
69		nnuz 12269	. . . . . 6 ⊢ ℕ = (ℤ_≥‘1)
70	68, 69	eleqtrdi 2900	. . . . 5 ⊢ (𝜑 → 𝐾 ∈ (ℤ_≥‘1))
71		ffvelrn 6826	. . . . . . . . . . 11 ⊢ ((𝐻:ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑚 ∈ ℕ) → (𝐻‘𝑚) ∈ ( ≤ ∩ (ℝ × ℝ)))
72	51, 52, 71	syl2an 598	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (𝐻‘𝑚) ∈ ( ≤ ∩ (ℝ × ℝ)))
73	72	elin2d 4126	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (𝐻‘𝑚) ∈ (ℝ × ℝ))
74		xp2nd 7704	. . . . . . . . 9 ⊢ ((𝐻‘𝑚) ∈ (ℝ × ℝ) → (2^nd ‘(𝐻‘𝑚)) ∈ ℝ)
75	73, 74	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (2^nd ‘(𝐻‘𝑚)) ∈ ℝ)
76		xp1st 7703	. . . . . . . . 9 ⊢ ((𝐻‘𝑚) ∈ (ℝ × ℝ) → (1^st ‘(𝐻‘𝑚)) ∈ ℝ)
77	73, 76	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → (1^st ‘(𝐻‘𝑚)) ∈ ℝ)
78	75, 77	resubcld 11057	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))) ∈ ℝ)
79	78	recnd 10658	. . . . . 6 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘(𝐻‘𝑚)) − (1^st ‘(𝐻‘𝑚))) ∈ ℂ)
80	66, 79	eqeltrrd 2891	. . . . 5 ⊢ ((𝜑 ∧ 𝑚 ∈ (1...𝐾)) → ((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))) ∈ ℂ)
81	67, 70, 80	fsumser 15079	. . . 4 ⊢ (𝜑 → Σ𝑚 ∈ (1...𝐾)((2^nd ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚)))) − (1^st ‘((𝐹‘(1^st ‘(𝐽‘𝑚)))‘(2^nd ‘(𝐽‘𝑚))))) = (seq1( + , ((abs ∘ − ) ∘ 𝐻))‘𝐾))
82	39, 81	eqtrd 2833	. . 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 6646	. . 3 ⊢ (𝑈‘𝐾) = (seq1( + , ((abs ∘ − ) ∘ 𝐻))‘𝐾)
85	82, 84	eqtr4di 2851	. 2 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = (𝑈‘𝐾))
86		f1oeng 8511	. . . . . . 7 ⊢ (((1...𝐾) ∈ Fin ∧ (𝐽 ↾ (1...𝐾)):(1...𝐾)–1-1-onto→(𝐽 “ (1...𝐾))) → (1...𝐾) ≈ (𝐽 “ (1...𝐾)))
87	7, 13, 86	syl2anc 587	. . . . . 6 ⊢ (𝜑 → (1...𝐾) ≈ (𝐽 “ (1...𝐾)))
88	87	ensymd 8543	. . . . 5 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ≈ (1...𝐾))
89		enfii 8719	. . . . 5 ⊢ (((1...𝐾) ∈ Fin ∧ (𝐽 “ (1...𝐾)) ≈ (1...𝐾)) → (𝐽 “ (1...𝐾)) ∈ Fin)
90	7, 88, 89	syl2anc 587	. . . 4 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ∈ Fin)
91	90, 37	fsumrecl 15083	. . 3 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ∈ ℝ)
92		fzfid 13336	. . . . 5 ⊢ (𝜑 → (1...𝐿) ∈ Fin)
93		elfznn 12931	. . . . . 6 ⊢ (𝑛 ∈ (1...𝐿) → 𝑛 ∈ ℕ)
94		ovoliun.v	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (vol*‘𝐴) ∈ ℝ)
95	93, 94	sylan2 595	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol*‘𝐴) ∈ ℝ)
96	92, 95	fsumrecl 15083	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) ∈ ℝ)
97		ovoliun.b	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ ℝ⁺)
98	97	rpred 12419	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ℝ)
99		2nn 11698	. . . . . . . 8 ⊢ 2 ∈ ℕ
100		nnnn0 11892	. . . . . . . 8 ⊢ (𝑛 ∈ ℕ → 𝑛 ∈ ℕ₀)
101		nnexpcl 13438	. . . . . . . 8 ⊢ ((2 ∈ ℕ ∧ 𝑛 ∈ ℕ₀) → (2↑𝑛) ∈ ℕ)
102	99, 100, 101	sylancr 590	. . . . . . 7 ⊢ (𝑛 ∈ ℕ → (2↑𝑛) ∈ ℕ)
103	93, 102	syl 17	. . . . . 6 ⊢ (𝑛 ∈ (1...𝐿) → (2↑𝑛) ∈ ℕ)
104		nndivre 11666	. . . . . 6 ⊢ ((𝐵 ∈ ℝ ∧ (2↑𝑛) ∈ ℕ) → (𝐵 / (2↑𝑛)) ∈ ℝ)
105	98, 103, 104	syl2an 598	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐵 / (2↑𝑛)) ∈ ℝ)
106	92, 105	fsumrecl 15083	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) ∈ ℝ)
107	96, 106	readdcld 10659	. . 3 ⊢ (𝜑 → (Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))) ∈ ℝ)
108		ovoliun.r	. . . 4 ⊢ (𝜑 → sup(ran 𝑇, ℝ^*, < ) ∈ ℝ)
109	108, 98	readdcld 10659	. . 3 ⊢ (𝜑 → (sup(ran 𝑇, ℝ^*, < ) + 𝐵) ∈ ℝ)
110		relxp 5537	. . . . . . . . . . . . . . 15 ⊢ Rel ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))
111		relres 5847	. . . . . . . . . . . . . . 15 ⊢ Rel ((𝐽 “ (1...𝐾)) ↾ {𝑛})
112		elsni 4542	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 ∈ {𝑛} → 𝑥 = 𝑛)
113	112	opeq1d 4771	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑥 ∈ {𝑛} → ⟨𝑥, 𝑦⟩ = ⟨𝑛, 𝑦⟩)
114	113	eleq1d 2874	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑥 ∈ {𝑛} → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) ↔ ⟨𝑛, 𝑦⟩ ∈ (𝐽 “ (1...𝐾))))
115		vex 3444	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑛 ∈ V
116		vex 3444	. . . . . . . . . . . . . . . . . . 19 ⊢ 𝑦 ∈ V
117	115, 116	elimasn 5921	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}) ↔ ⟨𝑛, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)))
118	114, 117	syl6bbr 292	. . . . . . . . . . . . . . . . 17 ⊢ (𝑥 ∈ {𝑛} → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) ↔ 𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})))
119	118	pm5.32i 578	. . . . . . . . . . . . . . . 16 ⊢ ((𝑥 ∈ {𝑛} ∧ ⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾))) ↔ (𝑥 ∈ {𝑛} ∧ 𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})))
120	116	opelresi 5826	. . . . . . . . . . . . . . . 16 ⊢ (⟨𝑥, 𝑦⟩ ∈ ((𝐽 “ (1...𝐾)) ↾ {𝑛}) ↔ (𝑥 ∈ {𝑛} ∧ ⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾))))
121		opelxp 5555	. . . . . . . . . . . . . . . 16 ⊢ (⟨𝑥, 𝑦⟩ ∈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ↔ (𝑥 ∈ {𝑛} ∧ 𝑦 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})))
122	119, 120, 121	3bitr4ri 307	. . . . . . . . . . . . . . 15 ⊢ (⟨𝑥, 𝑦⟩ ∈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ↔ ⟨𝑥, 𝑦⟩ ∈ ((𝐽 “ (1...𝐾)) ↾ {𝑛}))
123	110, 111, 122	eqrelriiv 5627	. . . . . . . . . . . . . 14 ⊢ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ↾ {𝑛})
124		df-res 5531	. . . . . . . . . . . . . 14 ⊢ ((𝐽 “ (1...𝐾)) ↾ {𝑛}) = ((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V))
125	123, 124	eqtri 2821	. . . . . . . . . . . . 13 ⊢ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V))
126	125	a1i 11	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V)))
127	126	iuneq2dv 4905	. . . . . . . . . . 11 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ∪ 𝑛 ∈ (1...𝐿)((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V)))
128		iunin2 4956	. . . . . . . . . . 11 ⊢ ∪ 𝑛 ∈ (1...𝐿)((𝐽 “ (1...𝐾)) ∩ ({𝑛} × V)) = ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V))
129	127, 128	eqtrdi 2849	. . . . . . . . . 10 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)))
130		relxp 5537	. . . . . . . . . . . . . 14 ⊢ Rel (ℕ × ℕ)
131		relss 5620	. . . . . . . . . . . . . 14 ⊢ ((𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ) → (Rel (ℕ × ℕ) → Rel (𝐽 “ (1...𝐾))))
132	22, 130, 131	mpisyl 21	. . . . . . . . . . . . 13 ⊢ (𝜑 → Rel (𝐽 “ (1...𝐾)))
133		ovoliun.l2	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → ∀𝑤 ∈ (1...𝐾)(1^st ‘(𝐽‘𝑤)) ≤ 𝐿)
134	20	ffnd 6488	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝜑 → 𝐽 Fn ℕ)
135		fveq2 6645	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑗 = (𝐽‘𝑤) → (1^st ‘𝑗) = (1^st ‘(𝐽‘𝑤)))
136	135	breq1d 5040	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑗 = (𝐽‘𝑤) → ((1^st ‘𝑗) ≤ 𝐿 ↔ (1^st ‘(𝐽‘𝑤)) ≤ 𝐿))
137	136	ralima 6978	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((𝐽 Fn ℕ ∧ (1...𝐾) ⊆ ℕ) → (∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ≤ 𝐿 ↔ ∀𝑤 ∈ (1...𝐾)(1^st ‘(𝐽‘𝑤)) ≤ 𝐿))
138	134, 11, 137	sylancl 589	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → (∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ≤ 𝐿 ↔ ∀𝑤 ∈ (1...𝐾)(1^st ‘(𝐽‘𝑤)) ≤ 𝐿))
139	133, 138	mpbird 260	. . . . . . . . . . . . . . . . . 18 ⊢ (𝜑 → ∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ≤ 𝐿)
140	139	r19.21bi 3173	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ≤ 𝐿)
141	25, 69	eleqtrdi 2900	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ∈ (ℤ_≥‘1))
142		ovoliun.l1	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝜑 → 𝐿 ∈ ℤ)
143	142	adantr 484	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → 𝐿 ∈ ℤ)
144		elfz5 12894	. . . . . . . . . . . . . . . . . 18 ⊢ (((1^st ‘𝑗) ∈ (ℤ_≥‘1) ∧ 𝐿 ∈ ℤ) → ((1^st ‘𝑗) ∈ (1...𝐿) ↔ (1^st ‘𝑗) ≤ 𝐿))
145	141, 143, 144	syl2anc 587	. . . . . . . . . . . . . . . . 17 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → ((1^st ‘𝑗) ∈ (1...𝐿) ↔ (1^st ‘𝑗) ≤ 𝐿))
146	140, 145	mpbird 260	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑗 ∈ (𝐽 “ (1...𝐾))) → (1^st ‘𝑗) ∈ (1...𝐿))
147	146	ralrimiva 3149	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → ∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ∈ (1...𝐿))
148		vex 3444	. . . . . . . . . . . . . . . . . 18 ⊢ 𝑥 ∈ V
149	148, 116	op1std 7681	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 = ⟨𝑥, 𝑦⟩ → (1^st ‘𝑗) = 𝑥)
150	149	eleq1d 2874	. . . . . . . . . . . . . . . 16 ⊢ (𝑗 = ⟨𝑥, 𝑦⟩ → ((1^st ‘𝑗) ∈ (1...𝐿) ↔ 𝑥 ∈ (1...𝐿)))
151	150	rspccv 3568	. . . . . . . . . . . . . . 15 ⊢ (∀𝑗 ∈ (𝐽 “ (1...𝐾))(1^st ‘𝑗) ∈ (1...𝐿) → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) → 𝑥 ∈ (1...𝐿)))
152	147, 151	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝜑 → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) → 𝑥 ∈ (1...𝐿)))
153		opelxp 5555	. . . . . . . . . . . . . . 15 ⊢ (⟨𝑥, 𝑦⟩ ∈ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V) ↔ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ∧ 𝑦 ∈ V))
154	116	biantru 533	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ↔ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ∧ 𝑦 ∈ V))
155		iunid 4947	. . . . . . . . . . . . . . . 16 ⊢ ∪ 𝑛 ∈ (1...𝐿){𝑛} = (1...𝐿)
156	155	eleq2i 2881	. . . . . . . . . . . . . . 15 ⊢ (𝑥 ∈ ∪ 𝑛 ∈ (1...𝐿){𝑛} ↔ 𝑥 ∈ (1...𝐿))
157	153, 154, 156	3bitr2i 302	. . . . . . . . . . . . . 14 ⊢ (⟨𝑥, 𝑦⟩ ∈ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V) ↔ 𝑥 ∈ (1...𝐿))
158	152, 157	syl6ibr 255	. . . . . . . . . . . . 13 ⊢ (𝜑 → (⟨𝑥, 𝑦⟩ ∈ (𝐽 “ (1...𝐾)) → ⟨𝑥, 𝑦⟩ ∈ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V)))
159	132, 158	relssdv 5625	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ⊆ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V))
160		xpiundir 5587	. . . . . . . . . . . 12 ⊢ (∪ 𝑛 ∈ (1...𝐿){𝑛} × V) = ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)
161	159, 160	sseqtrdi 3965	. . . . . . . . . . 11 ⊢ (𝜑 → (𝐽 “ (1...𝐾)) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V))
162		df-ss 3898	. . . . . . . . . . 11 ⊢ ((𝐽 “ (1...𝐾)) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V) ↔ ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)) = (𝐽 “ (1...𝐾)))
163	161, 162	sylib 221	. . . . . . . . . 10 ⊢ (𝜑 → ((𝐽 “ (1...𝐾)) ∩ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × V)) = (𝐽 “ (1...𝐾)))
164	129, 163	eqtrd 2833	. . . . . . . . 9 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) = (𝐽 “ (1...𝐾)))
165	164, 90	eqeltrd 2890	. . . . . . . 8 ⊢ (𝜑 → ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin)
166		ssiun2 4934	. . . . . . . 8 ⊢ (𝑛 ∈ (1...𝐿) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})))
167		ssfi 8722	. . . . . . . 8 ⊢ ((∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin ∧ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ⊆ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin)
168	165, 166, 167	syl2an 598	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin)
169		2ndconst 7779	. . . . . . . . . 10 ⊢ (𝑛 ∈ V → (2^nd ↾ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))):({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))–1-1-onto→((𝐽 “ (1...𝐾)) “ {𝑛}))
170	169	elv 3446	. . . . . . . . 9 ⊢ (2^nd ↾ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))):({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))–1-1-onto→((𝐽 “ (1...𝐾)) “ {𝑛})
171		f1oeng 8511	. . . . . . . . 9 ⊢ ((({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin ∧ (2^nd ↾ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))):({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))–1-1-onto→((𝐽 “ (1...𝐾)) “ {𝑛})) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ≈ ((𝐽 “ (1...𝐾)) “ {𝑛}))
172	168, 170, 171	sylancl 589	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ≈ ((𝐽 “ (1...𝐾)) “ {𝑛}))
173	172	ensymd 8543	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ≈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})))
174		enfii 8719	. . . . . . 7 ⊢ ((({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛})) ∈ Fin ∧ ((𝐽 “ (1...𝐾)) “ {𝑛}) ≈ ({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ∈ Fin)
175	168, 173, 174	syl2anc 587	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ∈ Fin)
176		ffvelrn 6826	. . . . . . . . . . . . . 14 ⊢ ((𝐹:ℕ⟶(( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ∧ 𝑛 ∈ ℕ) → (𝐹‘𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
177	16, 93, 176	syl2an 598	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐹‘𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ))
178		elovolmlem 24078	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝑛) ∈ (( ≤ ∩ (ℝ × ℝ)) ↑_m ℕ) ↔ (𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
179	177, 178	sylib 221	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
180	179	adantrr 716	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → (𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)))
181		imassrn 5907	. . . . . . . . . . . . . 14 ⊢ ((𝐽 “ (1...𝐾)) “ {𝑛}) ⊆ ran (𝐽 “ (1...𝐾))
182	22	adantr 484	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ))
183		rnss 5773	. . . . . . . . . . . . . . . 16 ⊢ ((𝐽 “ (1...𝐾)) ⊆ (ℕ × ℕ) → ran (𝐽 “ (1...𝐾)) ⊆ ran (ℕ × ℕ))
184	182, 183	syl 17	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran (𝐽 “ (1...𝐾)) ⊆ ran (ℕ × ℕ))
185		rnxpid 5997	. . . . . . . . . . . . . . 15 ⊢ ran (ℕ × ℕ) = ℕ
186	184, 185	sseqtrdi 3965	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran (𝐽 “ (1...𝐾)) ⊆ ℕ)
187	181, 186	sstrid 3926	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((𝐽 “ (1...𝐾)) “ {𝑛}) ⊆ ℕ)
188	187	sseld 3914	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}) → 𝑖 ∈ ℕ))
189	188	impr 458	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → 𝑖 ∈ ℕ)
190	180, 189	ffvelrnd 6829	. . . . . . . . . 10 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((𝐹‘𝑛)‘𝑖) ∈ ( ≤ ∩ (ℝ × ℝ)))
191	190	elin2d 4126	. . . . . . . . 9 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((𝐹‘𝑛)‘𝑖) ∈ (ℝ × ℝ))
192		xp2nd 7704	. . . . . . . . 9 ⊢ (((𝐹‘𝑛)‘𝑖) ∈ (ℝ × ℝ) → (2^nd ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
193	191, 192	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → (2^nd ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
194		xp1st 7703	. . . . . . . . 9 ⊢ (((𝐹‘𝑛)‘𝑖) ∈ (ℝ × ℝ) → (1^st ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
195	191, 194	syl 17	. . . . . . . 8 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → (1^st ‘((𝐹‘𝑛)‘𝑖)) ∈ ℝ)
196	193, 195	resubcld 11057	. . . . . . 7 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
197	196	anassrs 471	. . . . . 6 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
198	175, 197	fsumrecl 15083	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
199	98, 102, 104	syl2an 598	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐵 / (2↑𝑛)) ∈ ℝ)
200	94, 199	readdcld 10659	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → ((vol*‘𝐴) + (𝐵 / (2↑𝑛))) ∈ ℝ)
201	93, 200	sylan2 595	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((vol*‘𝐴) + (𝐵 / (2↑𝑛))) ∈ ℝ)
202		eqid 2798	. . . . . . . . . . . 12 ⊢ ((abs ∘ − ) ∘ (𝐹‘𝑛)) = ((abs ∘ − ) ∘ (𝐹‘𝑛))
203		ovoliun.s	. . . . . . . . . . . 12 ⊢ 𝑆 = seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛)))
204	202, 203	ovolsf 24076	. . . . . . . . . . 11 ⊢ ((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) → 𝑆:ℕ⟶(0[,)+∞))
205	179, 204	syl 17	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝑆:ℕ⟶(0[,)+∞))
206	205	frnd 6494	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ⊆ (0[,)+∞))
207		icossxr 12810	. . . . . . . . 9 ⊢ (0[,)+∞) ⊆ ℝ^*
208	206, 207	sstrdi 3927	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ⊆ ℝ^*)
209		supxrcl 12696	. . . . . . . 8 ⊢ (ran 𝑆 ⊆ ℝ^* → sup(ran 𝑆, ℝ^, < ) ∈ ℝ^)
210	208, 209	syl 17	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → sup(ran 𝑆, ℝ^, < ) ∈ ℝ^)
211		mnfxr 10687	. . . . . . . . 9 ⊢ -∞ ∈ ℝ^*
212	211	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → -∞ ∈ ℝ^*)
213	95	rexrd 10680	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol‘𝐴) ∈ ℝ^)
214	95	mnfltd 12507	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → -∞ < (vol*‘𝐴))
215		ovoliun.x1	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛)))
216	93, 215	sylan2 595	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛)))
217	203	ovollb 24083	. . . . . . . . 9 ⊢ (((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝐴 ⊆ ∪ ran ((,) ∘ (𝐹‘𝑛))) → (vol‘𝐴) ≤ sup(ran 𝑆, ℝ^, < ))
218	179, 216, 217	syl2anc 587	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol‘𝐴) ≤ sup(ran 𝑆, ℝ^, < ))
219	212, 213, 210, 214, 218	xrltletrd 12542	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → -∞ < sup(ran 𝑆, ℝ^*, < ))
220		ovoliun.x2	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → sup(ran 𝑆, ℝ^, < ) ≤ ((vol‘𝐴) + (𝐵 / (2↑𝑛))))
221	93, 220	sylan2 595	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → sup(ran 𝑆, ℝ^, < ) ≤ ((vol‘𝐴) + (𝐵 / (2↑𝑛))))
222		xrre 12550	. . . . . . 7 ⊢ (((sup(ran 𝑆, ℝ^, < ) ∈ ℝ^ ∧ ((vol‘𝐴) + (𝐵 / (2↑𝑛))) ∈ ℝ) ∧ (-∞ < sup(ran 𝑆, ℝ^, < ) ∧ sup(ran 𝑆, ℝ^, < ) ≤ ((vol‘𝐴) + (𝐵 / (2↑𝑛))))) → sup(ran 𝑆, ℝ^*, < ) ∈ ℝ)
223	210, 201, 219, 221, 222	syl22anc 837	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → sup(ran 𝑆, ℝ^*, < ) ∈ ℝ)
224		1zzd 12001	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 1 ∈ ℤ)
225	202	ovolfsval 24074	. . . . . . . . 9 ⊢ (((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) ∧ 𝑖 ∈ ℕ) → (((abs ∘ − ) ∘ (𝐹‘𝑛))‘𝑖) = ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
226	179, 225	sylan 583	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → (((abs ∘ − ) ∘ (𝐹‘𝑛))‘𝑖) = ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
227	202	ovolfsf 24075	. . . . . . . . . . . . 13 ⊢ ((𝐹‘𝑛):ℕ⟶( ≤ ∩ (ℝ × ℝ)) → ((abs ∘ − ) ∘ (𝐹‘𝑛)):ℕ⟶(0[,)+∞))
228	179, 227	syl 17	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ((abs ∘ − ) ∘ (𝐹‘𝑛)):ℕ⟶(0[,)+∞))
229	228	ffvelrnda 6828	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → (((abs ∘ − ) ∘ (𝐹‘𝑛))‘𝑖) ∈ (0[,)+∞))
230	226, 229	eqeltrrd 2891	. . . . . . . . . 10 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ (0[,)+∞))
231		elrege0 12832	. . . . . . . . . 10 ⊢ (((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ (0[,)+∞) ↔ (((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ ∧ 0 ≤ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖)))))
232	230, 231	sylib 221	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → (((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ ∧ 0 ≤ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖)))))
233	232	simpld 498	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℝ)
234	232	simprd 499	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑖 ∈ ℕ) → 0 ≤ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
235		supxrub 12705	. . . . . . . . . . . . . . 15 ⊢ ((ran 𝑆 ⊆ ℝ^* ∧ 𝑧 ∈ ran 𝑆) → 𝑧 ≤ sup(ran 𝑆, ℝ^*, < ))
236	208, 235	sylan 583	. . . . . . . . . . . . . 14 ⊢ (((𝜑 ∧ 𝑛 ∈ (1...𝐿)) ∧ 𝑧 ∈ ran 𝑆) → 𝑧 ≤ sup(ran 𝑆, ℝ^*, < ))
237	236	ralrimiva 3149	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ∀𝑧 ∈ ran 𝑆 𝑧 ≤ sup(ran 𝑆, ℝ^*, < ))
238		brralrspcev 5090	. . . . . . . . . . . . 13 ⊢ ((sup(ran 𝑆, ℝ^, < ) ∈ ℝ ∧ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ sup(ran 𝑆, ℝ^, < )) → ∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥)
239	223, 237, 238	syl2anc 587	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥)
240	205	ffnd 6488	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝑆 Fn ℕ)
241		breq1 5033	. . . . . . . . . . . . . . 15 ⊢ (𝑧 = (𝑆‘𝑘) → (𝑧 ≤ 𝑥 ↔ (𝑆‘𝑘) ≤ 𝑥))
242	241	ralrn 6831	. . . . . . . . . . . . . 14 ⊢ (𝑆 Fn ℕ → (∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥 ↔ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥))
243	240, 242	syl 17	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥 ↔ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥))
244	243	rexbidv 3256	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥 ↔ ∃𝑥 ∈ ℝ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥))
245	239, 244	mpbid 235	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ∃𝑥 ∈ ℝ ∀𝑘 ∈ ℕ (𝑆‘𝑘) ≤ 𝑥)
246	69, 203, 224, 226, 233, 234, 245	isumsup2 15193	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 𝑆 ⇝ sup(ran 𝑆, ℝ, < ))
247	203, 246	eqbrtrrid 5066	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → seq1( + , ((abs ∘ − ) ∘ (𝐹‘𝑛))) ⇝ sup(ran 𝑆, ℝ, < ))
248		climrel 14841	. . . . . . . . . 10 ⊢ Rel ⇝
249	248	releldmi 5782	. . . . . . . . 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 15192	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ Σ𝑖 ∈ ℕ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
252	69, 203, 224, 226, 233, 234, 245	isumsup 15194	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ℕ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = sup(ran 𝑆, ℝ, < ))
253		rge0ssre 12834	. . . . . . . . . 10 ⊢ (0[,)+∞) ⊆ ℝ
254	206, 253	sstrdi 3927	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ⊆ ℝ)
255		1nn 11636	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ
256	205	fdmd 6497	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → dom 𝑆 = ℕ)
257	255, 256	eleqtrrid 2897	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → 1 ∈ dom 𝑆)
258	257	ne0d 4251	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → dom 𝑆 ≠ ∅)
259		dm0rn0 5759	. . . . . . . . . . 11 ⊢ (dom 𝑆 = ∅ ↔ ran 𝑆 = ∅)
260	259	necon3bii 3039	. . . . . . . . . 10 ⊢ (dom 𝑆 ≠ ∅ ↔ ran 𝑆 ≠ ∅)
261	258, 260	sylib 221	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → ran 𝑆 ≠ ∅)
262		supxrre 12708	. . . . . . . . 9 ⊢ ((ran 𝑆 ⊆ ℝ ∧ ran 𝑆 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑧 ∈ ran 𝑆 𝑧 ≤ 𝑥) → sup(ran 𝑆, ℝ^*, < ) = sup(ran 𝑆, ℝ, < ))
263	254, 261, 239, 262	syl3anc 1368	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → sup(ran 𝑆, ℝ^*, < ) = sup(ran 𝑆, ℝ, < ))
264	252, 263	eqtr4d 2836	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ℕ ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = sup(ran 𝑆, ℝ^*, < ))
265	251, 264	breqtrd 5056	. . . . . 6 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ sup(ran 𝑆, ℝ^*, < ))
266	198, 223, 201, 265, 221	letrd 10786	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ ((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
267	92, 198, 201, 266	fsumle 15146	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ≤ Σ𝑛 ∈ (1...𝐿)((vol*‘𝐴) + (𝐵 / (2↑𝑛))))
268		vex 3444	. . . . . . . . . . 11 ⊢ 𝑖 ∈ V
269	115, 268	op1std 7681	. . . . . . . . . 10 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (1^st ‘𝑗) = 𝑛)
270	269	fveq2d 6649	. . . . . . . . 9 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (𝐹‘(1^st ‘𝑗)) = (𝐹‘𝑛))
271	115, 268	op2ndd 7682	. . . . . . . . 9 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (2^nd ‘𝑗) = 𝑖)
272	270, 271	fveq12d 6652	. . . . . . . 8 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → ((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)) = ((𝐹‘𝑛)‘𝑖))
273	272	fveq2d 6649	. . . . . . 7 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (2^nd ‘((𝐹‘𝑛)‘𝑖)))
274	272	fveq2d 6649	. . . . . . 7 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) = (1^st ‘((𝐹‘𝑛)‘𝑖)))
275	273, 274	oveq12d 7153	. . . . . 6 ⊢ (𝑗 = ⟨𝑛, 𝑖⟩ → ((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) = ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))))
276	196	recnd 10658	. . . . . 6 ⊢ ((𝜑 ∧ (𝑛 ∈ (1...𝐿) ∧ 𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛}))) → ((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) ∈ ℂ)
277	275, 92, 175, 276	fsum2d 15118	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = Σ𝑗 ∈ ∪ 𝑛 ∈ (1...𝐿)({𝑛} × ((𝐽 “ (1...𝐾)) “ {𝑛}))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))))
278	164	sumeq1d 15050	. . . . 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 2833	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)Σ𝑖 ∈ ((𝐽 “ (1...𝐾)) “ {𝑛})((2^nd ‘((𝐹‘𝑛)‘𝑖)) − (1^st ‘((𝐹‘𝑛)‘𝑖))) = Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))))
280	95	recnd 10658	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (vol*‘𝐴) ∈ ℂ)
281	105	recnd 10658	. . . . 5 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐵 / (2↑𝑛)) ∈ ℂ)
282	92, 280, 281	fsumadd 15088	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)((vol‘𝐴) + (𝐵 / (2↑𝑛))) = (Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))))
283	267, 279, 282	3brtr3d 5061	. . 3 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ≤ (Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))))
284		1zzd 12001	. . . . . . . . 9 ⊢ (𝜑 → 1 ∈ ℤ)
285		simpr 488	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → 𝑛 ∈ ℕ)
286		ovoliun.g	. . . . . . . . . . . 12 ⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (vol*‘𝐴))
287	286	fvmpt2 6756	. . . . . . . . . . 11 ⊢ ((𝑛 ∈ ℕ ∧ (vol‘𝐴) ∈ ℝ) → (𝐺‘𝑛) = (vol‘𝐴))
288	285, 94, 287	syl2anc 587	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐺‘𝑛) = (vol*‘𝐴))
289	288, 94	eqeltrd 2890	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑛 ∈ ℕ) → (𝐺‘𝑛) ∈ ℝ)
290	69, 284, 289	serfre 13395	. . . . . . . 8 ⊢ (𝜑 → seq1( + , 𝐺):ℕ⟶ℝ)
291		ovoliun.t	. . . . . . . . 9 ⊢ 𝑇 = seq1( + , 𝐺)
292	291	feq1i 6478	. . . . . . . 8 ⊢ (𝑇:ℕ⟶ℝ ↔ seq1( + , 𝐺):ℕ⟶ℝ)
293	290, 292	sylibr 237	. . . . . . 7 ⊢ (𝜑 → 𝑇:ℕ⟶ℝ)
294	293	frnd 6494	. . . . . 6 ⊢ (𝜑 → ran 𝑇 ⊆ ℝ)
295		ressxr 10674	. . . . . 6 ⊢ ℝ ⊆ ℝ^*
296	294, 295	sstrdi 3927	. . . . 5 ⊢ (𝜑 → ran 𝑇 ⊆ ℝ^*)
297	93, 288	sylan2 595	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑛 ∈ (1...𝐿)) → (𝐺‘𝑛) = (vol*‘𝐴))
298		1red 10631	. . . . . . . . . 10 ⊢ (𝜑 → 1 ∈ ℝ)
299		ffvelrn 6826	. . . . . . . . . . . . 13 ⊢ ((𝐽:ℕ⟶(ℕ × ℕ) ∧ 1 ∈ ℕ) → (𝐽‘1) ∈ (ℕ × ℕ))
300	20, 255, 299	sylancl 589	. . . . . . . . . . . 12 ⊢ (𝜑 → (𝐽‘1) ∈ (ℕ × ℕ))
301		xp1st 7703	. . . . . . . . . . . 12 ⊢ ((𝐽‘1) ∈ (ℕ × ℕ) → (1^st ‘(𝐽‘1)) ∈ ℕ)
302	300, 301	syl 17	. . . . . . . . . . 11 ⊢ (𝜑 → (1^st ‘(𝐽‘1)) ∈ ℕ)
303	302	nnred 11640	. . . . . . . . . 10 ⊢ (𝜑 → (1^st ‘(𝐽‘1)) ∈ ℝ)
304	142	zred 12075	. . . . . . . . . 10 ⊢ (𝜑 → 𝐿 ∈ ℝ)
305	302	nnge1d 11673	. . . . . . . . . 10 ⊢ (𝜑 → 1 ≤ (1^st ‘(𝐽‘1)))
306		2fveq3 6650	. . . . . . . . . . . 12 ⊢ (𝑤 = 1 → (1^st ‘(𝐽‘𝑤)) = (1^st ‘(𝐽‘1)))
307	306	breq1d 5040	. . . . . . . . . . 11 ⊢ (𝑤 = 1 → ((1^st ‘(𝐽‘𝑤)) ≤ 𝐿 ↔ (1^st ‘(𝐽‘1)) ≤ 𝐿))
308		eluzfz1 12909	. . . . . . . . . . . 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 10786	. . . . . . . . 9 ⊢ (𝜑 → 1 ≤ 𝐿)
312		elnnz1 11996	. . . . . . . . 9 ⊢ (𝐿 ∈ ℕ ↔ (𝐿 ∈ ℤ ∧ 1 ≤ 𝐿))
313	142, 311, 312	sylanbrc 586	. . . . . . . 8 ⊢ (𝜑 → 𝐿 ∈ ℕ)
314	313, 69	eleqtrdi 2900	. . . . . . 7 ⊢ (𝜑 → 𝐿 ∈ (ℤ_≥‘1))
315	297, 314, 280	fsumser 15079	. . . . . 6 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) = (seq1( + , 𝐺)‘𝐿))
316		seqfn 13376	. . . . . . . . 9 ⊢ (1 ∈ ℤ → seq1( + , 𝐺) Fn (ℤ_≥‘1))
317	284, 316	syl 17	. . . . . . . 8 ⊢ (𝜑 → seq1( + , 𝐺) Fn (ℤ_≥‘1))
318		fnfvelrn 6825	. . . . . . . 8 ⊢ ((seq1( + , 𝐺) Fn (ℤ_≥‘1) ∧ 𝐿 ∈ (ℤ_≥‘1)) → (seq1( + , 𝐺)‘𝐿) ∈ ran seq1( + , 𝐺))
319	317, 314, 318	syl2anc 587	. . . . . . 7 ⊢ (𝜑 → (seq1( + , 𝐺)‘𝐿) ∈ ran seq1( + , 𝐺))
320	291	rneqi 5771	. . . . . . 7 ⊢ ran 𝑇 = ran seq1( + , 𝐺)
321	319, 320	eleqtrrdi 2901	. . . . . 6 ⊢ (𝜑 → (seq1( + , 𝐺)‘𝐿) ∈ ran 𝑇)
322	315, 321	eqeltrd 2890	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol*‘𝐴) ∈ ran 𝑇)
323		supxrub 12705	. . . . 5 ⊢ ((ran 𝑇 ⊆ ℝ^* ∧ Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) ∈ ran 𝑇) → Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) ≤ sup(ran 𝑇, ℝ^*, < ))
324	296, 322, 323	syl2anc 587	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) ≤ sup(ran 𝑇, ℝ^, < ))
325	98	recnd 10658	. . . . . 6 ⊢ (𝜑 → 𝐵 ∈ ℂ)
326		geo2sum 15221	. . . . . 6 ⊢ ((𝐿 ∈ ℕ ∧ 𝐵 ∈ ℂ) → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) = (𝐵 − (𝐵 / (2↑𝐿))))
327	313, 325, 326	syl2anc 587	. . . . 5 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) = (𝐵 − (𝐵 / (2↑𝐿))))
328	313	nnnn0d 11943	. . . . . . . . . 10 ⊢ (𝜑 → 𝐿 ∈ ℕ₀)
329		nnexpcl 13438	. . . . . . . . . 10 ⊢ ((2 ∈ ℕ ∧ 𝐿 ∈ ℕ₀) → (2↑𝐿) ∈ ℕ)
330	99, 328, 329	sylancr 590	. . . . . . . . 9 ⊢ (𝜑 → (2↑𝐿) ∈ ℕ)
331	330	nnrpd 12417	. . . . . . . 8 ⊢ (𝜑 → (2↑𝐿) ∈ ℝ⁺)
332	97, 331	rpdivcld 12436	. . . . . . 7 ⊢ (𝜑 → (𝐵 / (2↑𝐿)) ∈ ℝ⁺)
333	332	rpge0d 12423	. . . . . 6 ⊢ (𝜑 → 0 ≤ (𝐵 / (2↑𝐿)))
334	98, 330	nndivred 11679	. . . . . . 7 ⊢ (𝜑 → (𝐵 / (2↑𝐿)) ∈ ℝ)
335	98, 334	subge02d 11221	. . . . . 6 ⊢ (𝜑 → (0 ≤ (𝐵 / (2↑𝐿)) ↔ (𝐵 − (𝐵 / (2↑𝐿))) ≤ 𝐵))
336	333, 335	mpbid 235	. . . . 5 ⊢ (𝜑 → (𝐵 − (𝐵 / (2↑𝐿))) ≤ 𝐵)
337	327, 336	eqbrtrd 5052	. . . 4 ⊢ (𝜑 → Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛)) ≤ 𝐵)
338	96, 106, 108, 98, 324, 337	le2addd 11248	. . 3 ⊢ (𝜑 → (Σ𝑛 ∈ (1...𝐿)(vol‘𝐴) + Σ𝑛 ∈ (1...𝐿)(𝐵 / (2↑𝑛))) ≤ (sup(ran 𝑇, ℝ^, < ) + 𝐵))
339	91, 107, 109, 283, 338	letrd 10786	. 2 ⊢ (𝜑 → Σ𝑗 ∈ (𝐽 “ (1...𝐾))((2^nd ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗))) − (1^st ‘((𝐹‘(1^st ‘𝑗))‘(2^nd ‘𝑗)))) ≤ (sup(ran 𝑇, ℝ^*, < ) + 𝐵))
340	85, 339	eqbrtrrd 5054	1 ⊢ (𝜑 → (𝑈‘𝐾) ≤ (sup(ran 𝑇, ℝ^*, < ) + 𝐵))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 209 ∧ wa 399 = wceq 1538 ∈ wcel 2111 ≠ wne 2987 ∀wral 3106 ∃wrex 3107 Vcvv 3441 ∩ cin 3880 ⊆ wss 3881 ∅c0 4243 {csn 4525 ⟨cop 4531 ∪ cuni 4800 ∪ ciun 4881 class class class wbr 5030 ↦ cmpt 5110 × cxp 5517 dom cdm 5519 ran crn 5520 ↾ cres 5521 “ cima 5522 ∘ ccom 5523 Rel wrel 5524 Fn wfn 6319 ⟶wf 6320 –1-1→wf1 6321 –1-1-onto→wf1o 6323 ‘cfv 6324 (class class class)co 7135 1^st c1st 7669 2^nd c2nd 7670 ↑_m cmap 8389 ≈ cen 8489 Fincfn 8492 supcsup 8888 ℂcc 10524 ℝcr 10525 0cc0 10526 1c1 10527 + caddc 10529 +∞cpnf 10661 -∞cmnf 10662 ℝ^*cxr 10663 < clt 10664 ≤ cle 10665 − cmin 10859 / cdiv 11286 ℕcn 11625 2c2 11680 ℕ₀cn0 11885 ℤcz 11969 ℤ_≥cuz 12231 ℝ⁺crp 12377 (,)cioo 12726 [,)cico 12728 ...cfz 12885 seqcseq 13364 ↑cexp 13425 abscabs 14585 ⇝ cli 14833 Σcsu 15034 vol*covol 24066

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2113 ax-9 2121 ax-10 2142 ax-11 2158 ax-12 2175 ax-ext 2770 ax-rep 5154 ax-sep 5167 ax-nul 5174 ax-pow 5231 ax-pr 5295 ax-un 7441 ax-inf2 9088 ax-cnex 10582 ax-resscn 10583 ax-1cn 10584 ax-icn 10585 ax-addcl 10586 ax-addrcl 10587 ax-mulcl 10588 ax-mulrcl 10589 ax-mulcom 10590 ax-addass 10591 ax-mulass 10592 ax-distr 10593 ax-i2m1 10594 ax-1ne0 10595 ax-1rid 10596 ax-rnegex 10597 ax-rrecex 10598 ax-cnre 10599 ax-pre-lttri 10600 ax-pre-lttrn 10601 ax-pre-ltadd 10602 ax-pre-mulgt0 10603 ax-pre-sup 10604

This theorem depends on definitions: df-bi 210 df-an 400 df-or 845 df-3or 1085 df-3an 1086 df-tru 1541 df-fal 1551 df-ex 1782 df-nf 1786 df-sb 2070 df-mo 2598 df-eu 2629 df-clab 2777 df-cleq 2791 df-clel 2870 df-nfc 2938 df-ne 2988 df-nel 3092 df-ral 3111 df-rex 3112 df-reu 3113 df-rmo 3114 df-rab 3115 df-v 3443 df-sbc 3721 df-csb 3829 df-dif 3884 df-un 3886 df-in 3888 df-ss 3898 df-pss 3900 df-nul 4244 df-if 4426 df-pw 4499 df-sn 4526 df-pr 4528 df-tp 4530 df-op 4532 df-uni 4801 df-int 4839 df-iun 4883 df-br 5031 df-opab 5093 df-mpt 5111 df-tr 5137 df-id 5425 df-eprel 5430 df-po 5438 df-so 5439 df-fr 5478 df-se 5479 df-we 5480 df-xp 5525 df-rel 5526 df-cnv 5527 df-co 5528 df-dm 5529 df-rn 5530 df-res 5531 df-ima 5532 df-pred 6116 df-ord 6162 df-on 6163 df-lim 6164 df-suc 6165 df-iota 6283 df-fun 6326 df-fn 6327 df-f 6328 df-f1 6329 df-fo 6330 df-f1o 6331 df-fv 6332 df-isom 6333 df-riota 7093 df-ov 7138 df-oprab 7139 df-mpo 7140 df-om 7561 df-1st 7671 df-2nd 7672 df-wrecs 7930 df-recs 7991 df-rdg 8029 df-1o 8085 df-oadd 8089 df-er 8272 df-map 8391 df-pm 8392 df-en 8493 df-dom 8494 df-sdom 8495 df-fin 8496 df-sup 8890 df-inf 8891 df-oi 8958 df-card 9352 df-pnf 10666 df-mnf 10667 df-xr 10668 df-ltxr 10669 df-le 10670 df-sub 10861 df-neg 10862 df-div 11287 df-nn 11626 df-2 11688 df-3 11689 df-n0 11886 df-z 11970 df-uz 12232 df-rp 12378 df-ioo 12730 df-ico 12732 df-fz 12886 df-fzo 13029 df-fl 13157 df-seq 13365 df-exp 13426 df-hash 13687 df-cj 14450 df-re 14451 df-im 14452 df-sqrt 14586 df-abs 14587 df-clim 14837 df-rlim 14838 df-sum 15035 df-ovol 24068

This theorem is referenced by: ovoliunlem2 24107

W3C validator