hoidmv1lelem3 - Mathbox for Glauco Siliprandi

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

Theorem hoidmv1lelem3 45607

Description: The dimensional volume of a 1-dimensional half-open interval is less than or equal the generalized sum of the dimensional volumes of countable half-open intervals that cover it. This is the nonempty, finite generalized sum, sub case in Lemma 114B of [Fremlin1] p. 23. (Contributed by Glauco Siliprandi, 21-Nov-2020.)

**Hypotheses**
Ref	Expression
hoidmv1lelem3.a	⊢ (𝜑 → 𝐴 ∈ ℝ)
hoidmv1lelem3.b	⊢ (𝜑 → 𝐵 ∈ ℝ)
hoidmv1lelem3.l	⊢ (𝜑 → 𝐴 < 𝐵)
hoidmv1lelem3.c	⊢ (𝜑 → 𝐶:ℕ⟶ℝ)
hoidmv1lelem3.d	⊢ (𝜑 → 𝐷:ℕ⟶ℝ)
hoidmv1lelem3.x	⊢ (𝜑 → (𝐴[,)𝐵) ⊆ ∪ 𝑗 ∈ ℕ ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
hoidmv1lelem3.r	⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))) ∈ ℝ)
hoidmv1lelem3.u	⊢ 𝑈 = {𝑧 ∈ (𝐴[,]𝐵) ∣ (𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)))))}
hoidmv1lelem3.s	⊢ 𝑆 = sup(𝑈, ℝ, < )

**Assertion**
Ref	Expression
hoidmv1lelem3	⊢ (𝜑 → (𝐵 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))))

Distinct variable groups: 𝐴,𝑗,𝑧 𝐵,𝑗,𝑧 𝐶,𝑗,𝑧 𝐷,𝑗,𝑧 𝑆,𝑗,𝑧 𝑈,𝑗,𝑧 𝜑,𝑗,𝑧

Proof of Theorem hoidmv1lelem3 Dummy variables 𝑦 𝑖 𝑢 𝑥 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		hoidmv1lelem3.b	. . 3 ⊢ (𝜑 → 𝐵 ∈ ℝ)
2		hoidmv1lelem3.a	. . 3 ⊢ (𝜑 → 𝐴 ∈ ℝ)
3	1, 2	resubcld 11646	. 2 ⊢ (𝜑 → (𝐵 − 𝐴) ∈ ℝ)
4		nnex 12222	. . . . . . 7 ⊢ ℕ ∈ V
5	4	a1i 11	. . . . . 6 ⊢ (𝜑 → ℕ ∈ V)
6		icossicc 13417	. . . . . . . 8 ⊢ (0[,)+∞) ⊆ (0[,]+∞)
7		0xr 11265	. . . . . . . . . 10 ⊢ 0 ∈ ℝ^*
8	7	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → 0 ∈ ℝ^*)
9		pnfxr 11272	. . . . . . . . . 10 ⊢ +∞ ∈ ℝ^*
10	9	a1i 11	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → +∞ ∈ ℝ^*)
11		hoidmv1lelem3.c	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐶:ℕ⟶ℝ)
12	11	ffvelcdmda 7085	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐶‘𝑗) ∈ ℝ)
13		hoidmv1lelem3.d	. . . . . . . . . . . . 13 ⊢ (𝜑 → 𝐷:ℕ⟶ℝ)
14	13	ffvelcdmda 7085	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐷‘𝑗) ∈ ℝ)
15	1	adantr 479	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → 𝐵 ∈ ℝ)
16	14, 15	ifcld 4573	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵) ∈ ℝ)
17		volicore 45595	. . . . . . . . . . 11 ⊢ (((𝐶‘𝑗) ∈ ℝ ∧ if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵) ∈ ℝ) → (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))) ∈ ℝ)
18	12, 16, 17	syl2anc 582	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))) ∈ ℝ)
19	18	rexrd 11268	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))) ∈ ℝ^*)
20	16	rexrd 11268	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵) ∈ ℝ^*)
21		icombl 25313	. . . . . . . . . . 11 ⊢ (((𝐶‘𝑗) ∈ ℝ ∧ if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵) ∈ ℝ^*) → ((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)) ∈ dom vol)
22	12, 20, 21	syl2anc 582	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → ((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)) ∈ dom vol)
23		volge0 44975	. . . . . . . . . 10 ⊢ (((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)) ∈ dom vol → 0 ≤ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))
24	22, 23	syl 17	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → 0 ≤ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))
25	18	ltpnfd 13105	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))) < +∞)
26	8, 10, 19, 24, 25	elicod 13378	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))) ∈ (0[,)+∞))
27	6, 26	sselid 3979	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))) ∈ (0[,]+∞))
28		eqid 2730	. . . . . . 7 ⊢ (𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)))) = (𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))
29	27, 28	fmptd 7114	. . . . . 6 ⊢ (𝜑 → (𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)))):ℕ⟶(0[,]+∞))
30	5, 29	sge0xrcl 45399	. . . . 5 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))) ∈ ℝ^*)
31	9	a1i 11	. . . . 5 ⊢ (𝜑 → +∞ ∈ ℝ^*)
32		hoidmv1lelem3.r	. . . . . . 7 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))) ∈ ℝ)
33	32	rexrd 11268	. . . . . 6 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))) ∈ ℝ^*)
34		nfv 1915	. . . . . . 7 ⊢ Ⅎ𝑗𝜑
35		volf 25278	. . . . . . . . 9 ⊢ vol:dom vol⟶(0[,]+∞)
36	35	a1i 11	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → vol:dom vol⟶(0[,]+∞))
37	14	rexrd 11268	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐷‘𝑗) ∈ ℝ^*)
38		icombl 25313	. . . . . . . . 9 ⊢ (((𝐶‘𝑗) ∈ ℝ ∧ (𝐷‘𝑗) ∈ ℝ^*) → ((𝐶‘𝑗)[,)(𝐷‘𝑗)) ∈ dom vol)
39	12, 37, 38	syl2anc 582	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → ((𝐶‘𝑗)[,)(𝐷‘𝑗)) ∈ dom vol)
40	36, 39	ffvelcdmd 7086	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))) ∈ (0[,]+∞))
41	12	rexrd 11268	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐶‘𝑗) ∈ ℝ^*)
42	12	leidd 11784	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (𝐶‘𝑗) ≤ (𝐶‘𝑗))
43		min1 13172	. . . . . . . . . 10 ⊢ (((𝐷‘𝑗) ∈ ℝ ∧ 𝐵 ∈ ℝ) → if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵) ≤ (𝐷‘𝑗))
44	14, 15, 43	syl2anc 582	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵) ≤ (𝐷‘𝑗))
45		icossico 13398	. . . . . . . . 9 ⊢ ((((𝐶‘𝑗) ∈ ℝ^* ∧ (𝐷‘𝑗) ∈ ℝ^*) ∧ ((𝐶‘𝑗) ≤ (𝐶‘𝑗) ∧ if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵) ≤ (𝐷‘𝑗))) → ((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)) ⊆ ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
46	41, 37, 42, 44, 45	syl22anc 835	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → ((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)) ⊆ ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
47		volss 25282	. . . . . . . 8 ⊢ ((((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)) ∈ dom vol ∧ ((𝐶‘𝑗)[,)(𝐷‘𝑗)) ∈ dom vol ∧ ((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)) ⊆ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))) ≤ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))
48	22, 39, 46, 47	syl3anc 1369	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑗 ∈ ℕ) → (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))) ≤ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))
49	34, 5, 27, 40, 48	sge0lempt 45424	. . . . . 6 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))))
50	32	ltpnfd 13105	. . . . . 6 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))) < +∞)
51	30, 33, 31, 49, 50	xrlelttrd 13143	. . . . 5 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))) < +∞)
52	30, 31, 51	xrltned 44365	. . . 4 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))) ≠ +∞)
53	52	neneqd 2943	. . 3 ⊢ (𝜑 → ¬ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))) = +∞)
54	5, 29	sge0repnf 45400	. . 3 ⊢ (𝜑 → ((Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))) ∈ ℝ ↔ ¬ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))) = +∞))
55	53, 54	mpbird 256	. 2 ⊢ (𝜑 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))) ∈ ℝ)
56	1	rexrd 11268	. . . . . . 7 ⊢ (𝜑 → 𝐵 ∈ ℝ^*)
57	2, 1	iccssred 13415	. . . . . . . . 9 ⊢ (𝜑 → (𝐴[,]𝐵) ⊆ ℝ)
58		hoidmv1lelem3.u	. . . . . . . . . . 11 ⊢ 𝑈 = {𝑧 ∈ (𝐴[,]𝐵) ∣ (𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)))))}
59		ssrab2 4076	. . . . . . . . . . 11 ⊢ {𝑧 ∈ (𝐴[,]𝐵) ∣ (𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)))))} ⊆ (𝐴[,]𝐵)
60	58, 59	eqsstri 4015	. . . . . . . . . 10 ⊢ 𝑈 ⊆ (𝐴[,]𝐵)
61		hoidmv1lelem3.l	. . . . . . . . . . . 12 ⊢ (𝜑 → 𝐴 < 𝐵)
62		hoidmv1lelem3.s	. . . . . . . . . . . 12 ⊢ 𝑆 = sup(𝑈, ℝ, < )
63	2, 1, 61, 11, 13, 32, 58, 62	hoidmv1lelem1 45605	. . . . . . . . . . 11 ⊢ (𝜑 → (𝑆 ∈ 𝑈 ∧ 𝐴 ∈ 𝑈 ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑈 𝑦 ≤ 𝑥))
64	63	simp1d 1140	. . . . . . . . . 10 ⊢ (𝜑 → 𝑆 ∈ 𝑈)
65	60, 64	sselid 3979	. . . . . . . . 9 ⊢ (𝜑 → 𝑆 ∈ (𝐴[,]𝐵))
66	57, 65	sseldd 3982	. . . . . . . 8 ⊢ (𝜑 → 𝑆 ∈ ℝ)
67	66	rexrd 11268	. . . . . . 7 ⊢ (𝜑 → 𝑆 ∈ ℝ^*)
68		simpl 481	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐵 ≤ 𝑆) → 𝜑)
69		simpr 483	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐵 ≤ 𝑆) → ¬ 𝐵 ≤ 𝑆)
70	68, 66	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐵 ≤ 𝑆) → 𝑆 ∈ ℝ)
71	68, 1	syl 17	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ ¬ 𝐵 ≤ 𝑆) → 𝐵 ∈ ℝ)
72	70, 71	ltnled 11365	. . . . . . . . . 10 ⊢ ((𝜑 ∧ ¬ 𝐵 ≤ 𝑆) → (𝑆 < 𝐵 ↔ ¬ 𝐵 ≤ 𝑆))
73	69, 72	mpbird 256	. . . . . . . . 9 ⊢ ((𝜑 ∧ ¬ 𝐵 ≤ 𝑆) → 𝑆 < 𝐵)
74		hoidmv1lelem3.x	. . . . . . . . . . . . 13 ⊢ (𝜑 → (𝐴[,)𝐵) ⊆ ∪ 𝑗 ∈ ℕ ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
75	74	adantr 479	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → (𝐴[,)𝐵) ⊆ ∪ 𝑗 ∈ ℕ ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
76	2	rexrd 11268	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐴 ∈ ℝ^*)
77	76	adantr 479	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝐴 ∈ ℝ^*)
78	56	adantr 479	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝐵 ∈ ℝ^*)
79	67	adantr 479	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝑆 ∈ ℝ^*)
80	60, 57	sstrid 3992	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑈 ⊆ ℝ)
81	64	ne0d 4334	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝑈 ≠ ∅)
82	63	simp3d 1142	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑈 𝑦 ≤ 𝑥)
83	63	simp2d 1141	. . . . . . . . . . . . . . . 16 ⊢ (𝜑 → 𝐴 ∈ 𝑈)
84		suprub 12179	. . . . . . . . . . . . . . . 16 ⊢ (((𝑈 ⊆ ℝ ∧ 𝑈 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑈 𝑦 ≤ 𝑥) ∧ 𝐴 ∈ 𝑈) → 𝐴 ≤ sup(𝑈, ℝ, < ))
85	80, 81, 82, 83, 84	syl31anc 1371	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → 𝐴 ≤ sup(𝑈, ℝ, < ))
86	85, 62	breqtrrdi 5189	. . . . . . . . . . . . . 14 ⊢ (𝜑 → 𝐴 ≤ 𝑆)
87	86	adantr 479	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝐴 ≤ 𝑆)
88		simpr 483	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝑆 < 𝐵)
89	77, 78, 79, 87, 88	elicod 13378	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝑆 ∈ (𝐴[,)𝐵))
90	75, 89	sseldd 3982	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝑆 ∈ ∪ 𝑗 ∈ ℕ ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
91		eliun 5000	. . . . . . . . . . 11 ⊢ (𝑆 ∈ ∪ 𝑗 ∈ ℕ ((𝐶‘𝑗)[,)(𝐷‘𝑗)) ↔ ∃𝑗 ∈ ℕ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
92	90, 91	sylib 217	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → ∃𝑗 ∈ ℕ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
93	2	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝐴 ∈ ℝ)
94	93	3ad2ant1 1131	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → 𝐴 ∈ ℝ)
95	1	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝐵 ∈ ℝ)
96	95	3ad2ant1 1131	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → 𝐵 ∈ ℝ)
97	11	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝐶:ℕ⟶ℝ)
98	97	3ad2ant1 1131	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → 𝐶:ℕ⟶ℝ)
99	13	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝐷:ℕ⟶ℝ)
100	99	3ad2ant1 1131	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → 𝐷:ℕ⟶ℝ)
101		fveq2 6890	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑖 = 𝑗 → (𝐶‘𝑖) = (𝐶‘𝑗))
102		fveq2 6890	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑖 = 𝑗 → (𝐷‘𝑖) = (𝐷‘𝑗))
103	101, 102	oveq12d 7429	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑖 = 𝑗 → ((𝐶‘𝑖)[,)(𝐷‘𝑖)) = ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
104	103	fveq2d 6894	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 = 𝑗 → (vol‘((𝐶‘𝑖)[,)(𝐷‘𝑖))) = (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))
105	104	cbvmptv 5260	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)(𝐷‘𝑖)))) = (𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))
106	105	fveq2i 6893	. . . . . . . . . . . . . . . 16 ⊢ (Σ^{^}‘(𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)(𝐷‘𝑖))))) = (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗)))))
107	106, 32	eqeltrid 2835	. . . . . . . . . . . . . . 15 ⊢ (𝜑 → (Σ^{^}‘(𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)(𝐷‘𝑖))))) ∈ ℝ)
108	107	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → (Σ^{^}‘(𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)(𝐷‘𝑖))))) ∈ ℝ)
109	108	3ad2ant1 1131	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → (Σ^{^}‘(𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)(𝐷‘𝑖))))) ∈ ℝ)
110	102	breq1d 5157	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 = 𝑗 → ((𝐷‘𝑖) ≤ 𝑧 ↔ (𝐷‘𝑗) ≤ 𝑧))
111	110, 102	ifbieq1d 4551	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑖 = 𝑗 → if((𝐷‘𝑖) ≤ 𝑧, (𝐷‘𝑖), 𝑧) = if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧))
112	101, 111	oveq12d 7429	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑖 = 𝑗 → ((𝐶‘𝑖)[,)if((𝐷‘𝑖) ≤ 𝑧, (𝐷‘𝑖), 𝑧)) = ((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)))
113	112	fveq2d 6894	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑖 = 𝑗 → (vol‘((𝐶‘𝑖)[,)if((𝐷‘𝑖) ≤ 𝑧, (𝐷‘𝑖), 𝑧))) = (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧))))
114	113	cbvmptv 5260	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)if((𝐷‘𝑖) ≤ 𝑧, (𝐷‘𝑖), 𝑧)))) = (𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧))))
115	114	eqcomi 2739	. . . . . . . . . . . . . . . . 17 ⊢ (𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)))) = (𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)if((𝐷‘𝑖) ≤ 𝑧, (𝐷‘𝑖), 𝑧))))
116	115	fveq2i 6893	. . . . . . . . . . . . . . . 16 ⊢ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧))))) = (Σ^{^}‘(𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)if((𝐷‘𝑖) ≤ 𝑧, (𝐷‘𝑖), 𝑧)))))
117	116	breq2i 5155	. . . . . . . . . . . . . . 15 ⊢ ((𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧))))) ↔ (𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)if((𝐷‘𝑖) ≤ 𝑧, (𝐷‘𝑖), 𝑧))))))
118	117	rabbii 3436	. . . . . . . . . . . . . 14 ⊢ {𝑧 ∈ (𝐴[,]𝐵) ∣ (𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)))))} = {𝑧 ∈ (𝐴[,]𝐵) ∣ (𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)if((𝐷‘𝑖) ≤ 𝑧, (𝐷‘𝑖), 𝑧)))))}
119	58, 118	eqtri 2758	. . . . . . . . . . . . 13 ⊢ 𝑈 = {𝑧 ∈ (𝐴[,]𝐵) ∣ (𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑖 ∈ ℕ ↦ (vol‘((𝐶‘𝑖)[,)if((𝐷‘𝑖) ≤ 𝑧, (𝐷‘𝑖), 𝑧)))))}
120	64	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → 𝑆 ∈ 𝑈)
121	120	3ad2ant1 1131	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → 𝑆 ∈ 𝑈)
122	87	3ad2ant1 1131	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → 𝐴 ≤ 𝑆)
123	88	3ad2ant1 1131	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → 𝑆 < 𝐵)
124		simp2 1135	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → 𝑗 ∈ ℕ)
125		simp3 1136	. . . . . . . . . . . . 13 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗)))
126		eqid 2730	. . . . . . . . . . . . 13 ⊢ if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵) = if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)
127	94, 96, 98, 100, 109, 119, 121, 122, 123, 124, 125, 126	hoidmv1lelem2 45606	. . . . . . . . . . . 12 ⊢ (((𝜑 ∧ 𝑆 < 𝐵) ∧ 𝑗 ∈ ℕ ∧ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗))) → ∃𝑢 ∈ 𝑈 𝑆 < 𝑢)
128	127	3exp 1117	. . . . . . . . . . 11 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → (𝑗 ∈ ℕ → (𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗)) → ∃𝑢 ∈ 𝑈 𝑆 < 𝑢)))
129	128	rexlimdv 3151	. . . . . . . . . 10 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → (∃𝑗 ∈ ℕ 𝑆 ∈ ((𝐶‘𝑗)[,)(𝐷‘𝑗)) → ∃𝑢 ∈ 𝑈 𝑆 < 𝑢))
130	92, 129	mpd 15	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑆 < 𝐵) → ∃𝑢 ∈ 𝑈 𝑆 < 𝑢)
131	68, 73, 130	syl2anc 582	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ 𝐵 ≤ 𝑆) → ∃𝑢 ∈ 𝑈 𝑆 < 𝑢)
132	57	adantr 479	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → (𝐴[,]𝐵) ⊆ ℝ)
133	60, 132	sstrid 3992	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑈 ⊆ ℝ)
134	81	adantr 479	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑈 ≠ ∅)
135	2, 1	jca 510	. . . . . . . . . . . . . . . . 17 ⊢ (𝜑 → (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
136	135	adantr 479	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → (𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ))
137	60	a1i 11	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑈 ⊆ (𝐴[,]𝐵))
138	64	adantr 479	. . . . . . . . . . . . . . . 16 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑆 ∈ 𝑈)
139		iccsupr 13423	. . . . . . . . . . . . . . . 16 ⊢ (((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) ∧ 𝑈 ⊆ (𝐴[,]𝐵) ∧ 𝑆 ∈ 𝑈) → (𝑈 ⊆ ℝ ∧ 𝑈 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑈 𝑦 ≤ 𝑥))
140	136, 137, 138, 139	syl3anc 1369	. . . . . . . . . . . . . . 15 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → (𝑈 ⊆ ℝ ∧ 𝑈 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑈 𝑦 ≤ 𝑥))
141	140	simp3d 1142	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑈 𝑦 ≤ 𝑥)
142		simpr 483	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑢 ∈ 𝑈)
143		suprub 12179	. . . . . . . . . . . . . 14 ⊢ (((𝑈 ⊆ ℝ ∧ 𝑈 ≠ ∅ ∧ ∃𝑥 ∈ ℝ ∀𝑦 ∈ 𝑈 𝑦 ≤ 𝑥) ∧ 𝑢 ∈ 𝑈) → 𝑢 ≤ sup(𝑈, ℝ, < ))
144	133, 134, 141, 142, 143	syl31anc 1371	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑢 ≤ sup(𝑈, ℝ, < ))
145	144, 62	breqtrrdi 5189	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑢 ≤ 𝑆)
146	145	ralrimiva 3144	. . . . . . . . . . 11 ⊢ (𝜑 → ∀𝑢 ∈ 𝑈 𝑢 ≤ 𝑆)
147	60	sseli 3977	. . . . . . . . . . . . . . 15 ⊢ (𝑢 ∈ 𝑈 → 𝑢 ∈ (𝐴[,]𝐵))
148	147	adantl 480	. . . . . . . . . . . . . 14 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑢 ∈ (𝐴[,]𝐵))
149	132, 148	sseldd 3982	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑢 ∈ ℝ)
150	66	adantr 479	. . . . . . . . . . . . 13 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → 𝑆 ∈ ℝ)
151	149, 150	lenltd 11364	. . . . . . . . . . . 12 ⊢ ((𝜑 ∧ 𝑢 ∈ 𝑈) → (𝑢 ≤ 𝑆 ↔ ¬ 𝑆 < 𝑢))
152	151	ralbidva 3173	. . . . . . . . . . 11 ⊢ (𝜑 → (∀𝑢 ∈ 𝑈 𝑢 ≤ 𝑆 ↔ ∀𝑢 ∈ 𝑈 ¬ 𝑆 < 𝑢))
153	146, 152	mpbid 231	. . . . . . . . . 10 ⊢ (𝜑 → ∀𝑢 ∈ 𝑈 ¬ 𝑆 < 𝑢)
154		ralnex 3070	. . . . . . . . . 10 ⊢ (∀𝑢 ∈ 𝑈 ¬ 𝑆 < 𝑢 ↔ ¬ ∃𝑢 ∈ 𝑈 𝑆 < 𝑢)
155	153, 154	sylib 217	. . . . . . . . 9 ⊢ (𝜑 → ¬ ∃𝑢 ∈ 𝑈 𝑆 < 𝑢)
156	155	adantr 479	. . . . . . . 8 ⊢ ((𝜑 ∧ ¬ 𝐵 ≤ 𝑆) → ¬ ∃𝑢 ∈ 𝑈 𝑆 < 𝑢)
157	131, 156	condan 814	. . . . . . 7 ⊢ (𝜑 → 𝐵 ≤ 𝑆)
158		iccleub 13383	. . . . . . . 8 ⊢ ((𝐴 ∈ ℝ^* ∧ 𝐵 ∈ ℝ^* ∧ 𝑆 ∈ (𝐴[,]𝐵)) → 𝑆 ≤ 𝐵)
159	76, 56, 65, 158	syl3anc 1369	. . . . . . 7 ⊢ (𝜑 → 𝑆 ≤ 𝐵)
160	56, 67, 157, 159	xrletrid 13138	. . . . . 6 ⊢ (𝜑 → 𝐵 = 𝑆)
161	160, 64	eqeltrd 2831	. . . . 5 ⊢ (𝜑 → 𝐵 ∈ 𝑈)
162	161, 58	eleqtrdi 2841	. . . 4 ⊢ (𝜑 → 𝐵 ∈ {𝑧 ∈ (𝐴[,]𝐵) ∣ (𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)))))})
163		oveq1 7418	. . . . . 6 ⊢ (𝑧 = 𝐵 → (𝑧 − 𝐴) = (𝐵 − 𝐴))
164		breq2 5151	. . . . . . . . . . 11 ⊢ (𝑧 = 𝐵 → ((𝐷‘𝑗) ≤ 𝑧 ↔ (𝐷‘𝑗) ≤ 𝐵))
165		id 22	. . . . . . . . . . 11 ⊢ (𝑧 = 𝐵 → 𝑧 = 𝐵)
166	164, 165	ifbieq2d 4553	. . . . . . . . . 10 ⊢ (𝑧 = 𝐵 → if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧) = if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))
167	166	oveq2d 7427	. . . . . . . . 9 ⊢ (𝑧 = 𝐵 → ((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)) = ((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)))
168	167	fveq2d 6894	. . . . . . . 8 ⊢ (𝑧 = 𝐵 → (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧))) = (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))
169	168	mpteq2dv 5249	. . . . . . 7 ⊢ (𝑧 = 𝐵 → (𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)))) = (𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)))))
170	169	fveq2d 6894	. . . . . 6 ⊢ (𝑧 = 𝐵 → (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧))))) = (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))))
171	163, 170	breq12d 5160	. . . . 5 ⊢ (𝑧 = 𝐵 → ((𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧))))) ↔ (𝐵 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)))))))
172	171	elrab 3682	. . . 4 ⊢ (𝐵 ∈ {𝑧 ∈ (𝐴[,]𝐵) ∣ (𝑧 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝑧, (𝐷‘𝑗), 𝑧)))))} ↔ (𝐵 ∈ (𝐴[,]𝐵) ∧ (𝐵 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)))))))
173	162, 172	sylib 217	. . 3 ⊢ (𝜑 → (𝐵 ∈ (𝐴[,]𝐵) ∧ (𝐵 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵)))))))
174	173	simprd 494	. 2 ⊢ (𝜑 → (𝐵 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)if((𝐷‘𝑗) ≤ 𝐵, (𝐷‘𝑗), 𝐵))))))
175	3, 55, 32, 174, 49	letrd 11375	1 ⊢ (𝜑 → (𝐵 − 𝐴) ≤ (Σ^{^}‘(𝑗 ∈ ℕ ↦ (vol‘((𝐶‘𝑗)[,)(𝐷‘𝑗))))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 394 ∧ w3a 1085 = wceq 1539 ∈ wcel 2104 ≠ wne 2938 ∀wral 3059 ∃wrex 3068 {crab 3430 Vcvv 3472 ⊆ wss 3947 ∅c0 4321 ifcif 4527 ∪ ciun 4996 class class class wbr 5147 ↦ cmpt 5230 dom cdm 5675 ⟶wf 6538 ‘cfv 6542 (class class class)co 7411 supcsup 9437 ℝcr 11111 0cc0 11112 +∞cpnf 11249 ℝ^*cxr 11251 < clt 11252 ≤ cle 11253 − cmin 11448 ℕcn 12216 [,)cico 13330 [,]cicc 13331 volcvol 25212 Σ^{^}csumge0 45376

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 1911 ax-6 1969 ax-7 2009 ax-8 2106 ax-9 2114 ax-10 2135 ax-11 2152 ax-12 2169 ax-ext 2701 ax-rep 5284 ax-sep 5298 ax-nul 5305 ax-pow 5362 ax-pr 5426 ax-un 7727 ax-inf2 9638 ax-cnex 11168 ax-resscn 11169 ax-1cn 11170 ax-icn 11171 ax-addcl 11172 ax-addrcl 11173 ax-mulcl 11174 ax-mulrcl 11175 ax-mulcom 11176 ax-addass 11177 ax-mulass 11178 ax-distr 11179 ax-i2m1 11180 ax-1ne0 11181 ax-1rid 11182 ax-rnegex 11183 ax-rrecex 11184 ax-cnre 11185 ax-pre-lttri 11186 ax-pre-lttrn 11187 ax-pre-ltadd 11188 ax-pre-mulgt0 11189 ax-pre-sup 11190

This theorem depends on definitions: df-bi 206 df-an 395 df-or 844 df-3or 1086 df-3an 1087 df-tru 1542 df-fal 1552 df-ex 1780 df-nf 1784 df-sb 2066 df-mo 2532 df-eu 2561 df-clab 2708 df-cleq 2722 df-clel 2808 df-nfc 2883 df-ne 2939 df-nel 3045 df-ral 3060 df-rex 3069 df-rmo 3374 df-reu 3375 df-rab 3431 df-v 3474 df-sbc 3777 df-csb 3893 df-dif 3950 df-un 3952 df-in 3954 df-ss 3964 df-pss 3966 df-nul 4322 df-if 4528 df-pw 4603 df-sn 4628 df-pr 4630 df-op 4634 df-uni 4908 df-int 4950 df-iun 4998 df-br 5148 df-opab 5210 df-mpt 5231 df-tr 5265 df-id 5573 df-eprel 5579 df-po 5587 df-so 5588 df-fr 5630 df-se 5631 df-we 5632 df-xp 5681 df-rel 5682 df-cnv 5683 df-co 5684 df-dm 5685 df-rn 5686 df-res 5687 df-ima 5688 df-pred 6299 df-ord 6366 df-on 6367 df-lim 6368 df-suc 6369 df-iota 6494 df-fun 6544 df-fn 6545 df-f 6546 df-f1 6547 df-fo 6548 df-f1o 6549 df-fv 6550 df-isom 6551 df-riota 7367 df-ov 7414 df-oprab 7415 df-mpo 7416 df-of 7672 df-om 7858 df-1st 7977 df-2nd 7978 df-frecs 8268 df-wrecs 8299 df-recs 8373 df-rdg 8412 df-1o 8468 df-2o 8469 df-er 8705 df-map 8824 df-pm 8825 df-en 8942 df-dom 8943 df-sdom 8944 df-fin 8945 df-fi 9408 df-sup 9439 df-inf 9440 df-oi 9507 df-dju 9898 df-card 9936 df-pnf 11254 df-mnf 11255 df-xr 11256 df-ltxr 11257 df-le 11258 df-sub 11450 df-neg 11451 df-div 11876 df-nn 12217 df-2 12279 df-3 12280 df-n0 12477 df-z 12563 df-uz 12827 df-q 12937 df-rp 12979 df-xneg 13096 df-xadd 13097 df-xmul 13098 df-ioo 13332 df-ico 13334 df-icc 13335 df-fz 13489 df-fzo 13632 df-fl 13761 df-seq 13971 df-exp 14032 df-hash 14295 df-cj 15050 df-re 15051 df-im 15052 df-sqrt 15186 df-abs 15187 df-clim 15436 df-rlim 15437 df-sum 15637 df-rest 17372 df-topgen 17393 df-psmet 21136 df-xmet 21137 df-met 21138 df-bl 21139 df-mopn 21140 df-top 22616 df-topon 22633 df-bases 22669 df-cmp 23111 df-ovol 25213 df-vol 25214 df-sumge0 45377

This theorem is referenced by: hoidmv1le 45608

W3C validator