Step | Hyp | Ref
| Expression |
1 | | simpll 764 |
. . . . . 6
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → 𝐴 ∈ dom
vol) |
2 | | iccmbl 24728 |
. . . . . . 7
⊢ ((𝐵 ∈ ℝ ∧ 𝑥 ∈ ℝ) → (𝐵[,]𝑥) ∈ dom vol) |
3 | 2 | adantll 711 |
. . . . . 6
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐵[,]𝑥) ∈ dom vol) |
4 | | inmbl 24704 |
. . . . . 6
⊢ ((𝐴 ∈ dom vol ∧ (𝐵[,]𝑥) ∈ dom vol) → (𝐴 ∩ (𝐵[,]𝑥)) ∈ dom vol) |
5 | 1, 3, 4 | syl2anc 584 |
. . . . 5
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐴 ∩ (𝐵[,]𝑥)) ∈ dom vol) |
6 | | mblvol 24692 |
. . . . 5
⊢ ((𝐴 ∩ (𝐵[,]𝑥)) ∈ dom vol → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑥)))) |
7 | 5, 6 | syl 17 |
. . . 4
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) →
(vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑥)))) |
8 | | inss2 4165 |
. . . . 5
⊢ (𝐴 ∩ (𝐵[,]𝑥)) ⊆ (𝐵[,]𝑥) |
9 | | mblss 24693 |
. . . . . 6
⊢ ((𝐵[,]𝑥) ∈ dom vol → (𝐵[,]𝑥) ⊆ ℝ) |
10 | 3, 9 | syl 17 |
. . . . 5
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) → (𝐵[,]𝑥) ⊆ ℝ) |
11 | | mblvol 24692 |
. . . . . . 7
⊢ ((𝐵[,]𝑥) ∈ dom vol → (vol‘(𝐵[,]𝑥)) = (vol*‘(𝐵[,]𝑥))) |
12 | 3, 11 | syl 17 |
. . . . . 6
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) →
(vol‘(𝐵[,]𝑥)) = (vol*‘(𝐵[,]𝑥))) |
13 | | iccvolcl 24729 |
. . . . . . 7
⊢ ((𝐵 ∈ ℝ ∧ 𝑥 ∈ ℝ) →
(vol‘(𝐵[,]𝑥)) ∈
ℝ) |
14 | 13 | adantll 711 |
. . . . . 6
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) →
(vol‘(𝐵[,]𝑥)) ∈
ℝ) |
15 | 12, 14 | eqeltrrd 2840 |
. . . . 5
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) →
(vol*‘(𝐵[,]𝑥)) ∈
ℝ) |
16 | | ovolsscl 24648 |
. . . . 5
⊢ (((𝐴 ∩ (𝐵[,]𝑥)) ⊆ (𝐵[,]𝑥) ∧ (𝐵[,]𝑥) ⊆ ℝ ∧ (vol*‘(𝐵[,]𝑥)) ∈ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑥))) ∈ ℝ) |
17 | 8, 10, 15, 16 | mp3an2i 1465 |
. . . 4
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) →
(vol*‘(𝐴 ∩ (𝐵[,]𝑥))) ∈ ℝ) |
18 | 7, 17 | eqeltrd 2839 |
. . 3
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑥 ∈ ℝ) →
(vol‘(𝐴 ∩ (𝐵[,]𝑥))) ∈ ℝ) |
19 | | volcn.1 |
. . 3
⊢ 𝐹 = (𝑥 ∈ ℝ ↦ (vol‘(𝐴 ∩ (𝐵[,]𝑥)))) |
20 | 18, 19 | fmptd 6990 |
. 2
⊢ ((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) → 𝐹:ℝ⟶ℝ) |
21 | | simprr 770 |
. . . 4
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑦 ∈ ℝ ∧ 𝑒 ∈ ℝ+))
→ 𝑒 ∈
ℝ+) |
22 | | oveq12 7286 |
. . . . . . . . . . . . 13
⊢ ((𝑣 = 𝑧 ∧ 𝑢 = 𝑦) → (𝑣 − 𝑢) = (𝑧 − 𝑦)) |
23 | 22 | ancoms 459 |
. . . . . . . . . . . 12
⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → (𝑣 − 𝑢) = (𝑧 − 𝑦)) |
24 | 23 | fveq2d 6780 |
. . . . . . . . . . 11
⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → (abs‘(𝑣 − 𝑢)) = (abs‘(𝑧 − 𝑦))) |
25 | 24 | breq1d 5086 |
. . . . . . . . . 10
⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → ((abs‘(𝑣 − 𝑢)) < 𝑒 ↔ (abs‘(𝑧 − 𝑦)) < 𝑒)) |
26 | | fveq2 6776 |
. . . . . . . . . . . . 13
⊢ (𝑣 = 𝑧 → (𝐹‘𝑣) = (𝐹‘𝑧)) |
27 | | fveq2 6776 |
. . . . . . . . . . . . 13
⊢ (𝑢 = 𝑦 → (𝐹‘𝑢) = (𝐹‘𝑦)) |
28 | 26, 27 | oveqan12rd 7297 |
. . . . . . . . . . . 12
⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → ((𝐹‘𝑣) − (𝐹‘𝑢)) = ((𝐹‘𝑧) − (𝐹‘𝑦))) |
29 | 28 | fveq2d 6780 |
. . . . . . . . . . 11
⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → (abs‘((𝐹‘𝑣) − (𝐹‘𝑢))) = (abs‘((𝐹‘𝑧) − (𝐹‘𝑦)))) |
30 | 29 | breq1d 5086 |
. . . . . . . . . 10
⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → ((abs‘((𝐹‘𝑣) − (𝐹‘𝑢))) < 𝑒 ↔ (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
31 | 25, 30 | imbi12d 345 |
. . . . . . . . 9
⊢ ((𝑢 = 𝑦 ∧ 𝑣 = 𝑧) → (((abs‘(𝑣 − 𝑢)) < 𝑒 → (abs‘((𝐹‘𝑣) − (𝐹‘𝑢))) < 𝑒) ↔ ((abs‘(𝑧 − 𝑦)) < 𝑒 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒))) |
32 | | oveq12 7286 |
. . . . . . . . . . . . 13
⊢ ((𝑣 = 𝑦 ∧ 𝑢 = 𝑧) → (𝑣 − 𝑢) = (𝑦 − 𝑧)) |
33 | 32 | ancoms 459 |
. . . . . . . . . . . 12
⊢ ((𝑢 = 𝑧 ∧ 𝑣 = 𝑦) → (𝑣 − 𝑢) = (𝑦 − 𝑧)) |
34 | 33 | fveq2d 6780 |
. . . . . . . . . . 11
⊢ ((𝑢 = 𝑧 ∧ 𝑣 = 𝑦) → (abs‘(𝑣 − 𝑢)) = (abs‘(𝑦 − 𝑧))) |
35 | 34 | breq1d 5086 |
. . . . . . . . . 10
⊢ ((𝑢 = 𝑧 ∧ 𝑣 = 𝑦) → ((abs‘(𝑣 − 𝑢)) < 𝑒 ↔ (abs‘(𝑦 − 𝑧)) < 𝑒)) |
36 | | fveq2 6776 |
. . . . . . . . . . . . 13
⊢ (𝑣 = 𝑦 → (𝐹‘𝑣) = (𝐹‘𝑦)) |
37 | | fveq2 6776 |
. . . . . . . . . . . . 13
⊢ (𝑢 = 𝑧 → (𝐹‘𝑢) = (𝐹‘𝑧)) |
38 | 36, 37 | oveqan12rd 7297 |
. . . . . . . . . . . 12
⊢ ((𝑢 = 𝑧 ∧ 𝑣 = 𝑦) → ((𝐹‘𝑣) − (𝐹‘𝑢)) = ((𝐹‘𝑦) − (𝐹‘𝑧))) |
39 | 38 | fveq2d 6780 |
. . . . . . . . . . 11
⊢ ((𝑢 = 𝑧 ∧ 𝑣 = 𝑦) → (abs‘((𝐹‘𝑣) − (𝐹‘𝑢))) = (abs‘((𝐹‘𝑦) − (𝐹‘𝑧)))) |
40 | 39 | breq1d 5086 |
. . . . . . . . . 10
⊢ ((𝑢 = 𝑧 ∧ 𝑣 = 𝑦) → ((abs‘((𝐹‘𝑣) − (𝐹‘𝑢))) < 𝑒 ↔ (abs‘((𝐹‘𝑦) − (𝐹‘𝑧))) < 𝑒)) |
41 | 35, 40 | imbi12d 345 |
. . . . . . . . 9
⊢ ((𝑢 = 𝑧 ∧ 𝑣 = 𝑦) → (((abs‘(𝑣 − 𝑢)) < 𝑒 → (abs‘((𝐹‘𝑣) − (𝐹‘𝑢))) < 𝑒) ↔ ((abs‘(𝑦 − 𝑧)) < 𝑒 → (abs‘((𝐹‘𝑦) − (𝐹‘𝑧))) < 𝑒))) |
42 | | ssidd 3945 |
. . . . . . . . 9
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
→ ℝ ⊆ ℝ) |
43 | | recn 10959 |
. . . . . . . . . . . . 13
⊢ (𝑧 ∈ ℝ → 𝑧 ∈
ℂ) |
44 | | recn 10959 |
. . . . . . . . . . . . 13
⊢ (𝑦 ∈ ℝ → 𝑦 ∈
ℂ) |
45 | | abssub 15036 |
. . . . . . . . . . . . 13
⊢ ((𝑧 ∈ ℂ ∧ 𝑦 ∈ ℂ) →
(abs‘(𝑧 − 𝑦)) = (abs‘(𝑦 − 𝑧))) |
46 | 43, 44, 45 | syl2anr 597 |
. . . . . . . . . . . 12
⊢ ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ) →
(abs‘(𝑧 − 𝑦)) = (abs‘(𝑦 − 𝑧))) |
47 | 46 | adantl 482 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ))
→ (abs‘(𝑧
− 𝑦)) =
(abs‘(𝑦 − 𝑧))) |
48 | 47 | breq1d 5086 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ))
→ ((abs‘(𝑧
− 𝑦)) < 𝑒 ↔ (abs‘(𝑦 − 𝑧)) < 𝑒)) |
49 | 20 | adantr 481 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
→ 𝐹:ℝ⟶ℝ) |
50 | | ffvelrn 6961 |
. . . . . . . . . . . . . 14
⊢ ((𝐹:ℝ⟶ℝ ∧
𝑦 ∈ ℝ) →
(𝐹‘𝑦) ∈ ℝ) |
51 | | ffvelrn 6961 |
. . . . . . . . . . . . . 14
⊢ ((𝐹:ℝ⟶ℝ ∧
𝑧 ∈ ℝ) →
(𝐹‘𝑧) ∈ ℝ) |
52 | 50, 51 | anim12dan 619 |
. . . . . . . . . . . . 13
⊢ ((𝐹:ℝ⟶ℝ ∧
(𝑦 ∈ ℝ ∧
𝑧 ∈ ℝ)) →
((𝐹‘𝑦) ∈ ℝ ∧ (𝐹‘𝑧) ∈ ℝ)) |
53 | 49, 52 | sylan 580 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ))
→ ((𝐹‘𝑦) ∈ ℝ ∧ (𝐹‘𝑧) ∈ ℝ)) |
54 | | recn 10959 |
. . . . . . . . . . . . 13
⊢ ((𝐹‘𝑧) ∈ ℝ → (𝐹‘𝑧) ∈ ℂ) |
55 | | recn 10959 |
. . . . . . . . . . . . 13
⊢ ((𝐹‘𝑦) ∈ ℝ → (𝐹‘𝑦) ∈ ℂ) |
56 | | abssub 15036 |
. . . . . . . . . . . . 13
⊢ (((𝐹‘𝑧) ∈ ℂ ∧ (𝐹‘𝑦) ∈ ℂ) → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) = (abs‘((𝐹‘𝑦) − (𝐹‘𝑧)))) |
57 | 54, 55, 56 | syl2anr 597 |
. . . . . . . . . . . 12
⊢ (((𝐹‘𝑦) ∈ ℝ ∧ (𝐹‘𝑧) ∈ ℝ) → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) = (abs‘((𝐹‘𝑦) − (𝐹‘𝑧)))) |
58 | 53, 57 | syl 17 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ))
→ (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) = (abs‘((𝐹‘𝑦) − (𝐹‘𝑧)))) |
59 | 58 | breq1d 5086 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ))
→ ((abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒 ↔ (abs‘((𝐹‘𝑦) − (𝐹‘𝑧))) < 𝑒)) |
60 | 48, 59 | imbi12d 345 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ))
→ (((abs‘(𝑧
− 𝑦)) < 𝑒 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒) ↔ ((abs‘(𝑦 − 𝑧)) < 𝑒 → (abs‘((𝐹‘𝑦) − (𝐹‘𝑧))) < 𝑒))) |
61 | | simpr2 1194 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → 𝑧 ∈ ℝ) |
62 | | oveq2 7285 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑥 = 𝑧 → (𝐵[,]𝑥) = (𝐵[,]𝑧)) |
63 | 62 | ineq2d 4148 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑥 = 𝑧 → (𝐴 ∩ (𝐵[,]𝑥)) = (𝐴 ∩ (𝐵[,]𝑧))) |
64 | 63 | fveq2d 6780 |
. . . . . . . . . . . . . . . 16
⊢ (𝑥 = 𝑧 → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol‘(𝐴 ∩ (𝐵[,]𝑧)))) |
65 | | fvex 6789 |
. . . . . . . . . . . . . . . 16
⊢
(vol‘(𝐴 ∩
(𝐵[,]𝑧))) ∈ V |
66 | 64, 19, 65 | fvmpt 6877 |
. . . . . . . . . . . . . . 15
⊢ (𝑧 ∈ ℝ → (𝐹‘𝑧) = (vol‘(𝐴 ∩ (𝐵[,]𝑧)))) |
67 | 61, 66 | syl 17 |
. . . . . . . . . . . . . 14
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐹‘𝑧) = (vol‘(𝐴 ∩ (𝐵[,]𝑧)))) |
68 | | simplll 772 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → 𝐴 ∈ dom vol) |
69 | | simplr 766 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
→ 𝐵 ∈
ℝ) |
70 | 69 | adantr 481 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → 𝐵 ∈ ℝ) |
71 | | iccmbl 24728 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝐵[,]𝑧) ∈ dom vol) |
72 | 70, 61, 71 | syl2anc 584 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐵[,]𝑧) ∈ dom vol) |
73 | | inmbl 24704 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐴 ∈ dom vol ∧ (𝐵[,]𝑧) ∈ dom vol) → (𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol) |
74 | 68, 72, 73 | syl2anc 584 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol) |
75 | | mblvol 24692 |
. . . . . . . . . . . . . . 15
⊢ ((𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol → (vol‘(𝐴 ∩ (𝐵[,]𝑧))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑧)))) |
76 | 74, 75 | syl 17 |
. . . . . . . . . . . . . 14
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol‘(𝐴 ∩ (𝐵[,]𝑧))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑧)))) |
77 | 67, 76 | eqtrd 2778 |
. . . . . . . . . . . . 13
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐹‘𝑧) = (vol*‘(𝐴 ∩ (𝐵[,]𝑧)))) |
78 | | simpr1 1193 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → 𝑦 ∈ ℝ) |
79 | | oveq2 7285 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝑥 = 𝑦 → (𝐵[,]𝑥) = (𝐵[,]𝑦)) |
80 | 79 | ineq2d 4148 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑥 = 𝑦 → (𝐴 ∩ (𝐵[,]𝑥)) = (𝐴 ∩ (𝐵[,]𝑦))) |
81 | 80 | fveq2d 6780 |
. . . . . . . . . . . . . . . 16
⊢ (𝑥 = 𝑦 → (vol‘(𝐴 ∩ (𝐵[,]𝑥))) = (vol‘(𝐴 ∩ (𝐵[,]𝑦)))) |
82 | | fvex 6789 |
. . . . . . . . . . . . . . . 16
⊢
(vol‘(𝐴 ∩
(𝐵[,]𝑦))) ∈ V |
83 | 81, 19, 82 | fvmpt 6877 |
. . . . . . . . . . . . . . 15
⊢ (𝑦 ∈ ℝ → (𝐹‘𝑦) = (vol‘(𝐴 ∩ (𝐵[,]𝑦)))) |
84 | 78, 83 | syl 17 |
. . . . . . . . . . . . . 14
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐹‘𝑦) = (vol‘(𝐴 ∩ (𝐵[,]𝑦)))) |
85 | | simp1 1135 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧) → 𝑦 ∈ ℝ) |
86 | | iccmbl 24728 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐵 ∈ ℝ ∧ 𝑦 ∈ ℝ) → (𝐵[,]𝑦) ∈ dom vol) |
87 | 69, 85, 86 | syl2an 596 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐵[,]𝑦) ∈ dom vol) |
88 | | inmbl 24704 |
. . . . . . . . . . . . . . . 16
⊢ ((𝐴 ∈ dom vol ∧ (𝐵[,]𝑦) ∈ dom vol) → (𝐴 ∩ (𝐵[,]𝑦)) ∈ dom vol) |
89 | 68, 87, 88 | syl2anc 584 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐴 ∩ (𝐵[,]𝑦)) ∈ dom vol) |
90 | | mblvol 24692 |
. . . . . . . . . . . . . . 15
⊢ ((𝐴 ∩ (𝐵[,]𝑦)) ∈ dom vol → (vol‘(𝐴 ∩ (𝐵[,]𝑦))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))) |
91 | 89, 90 | syl 17 |
. . . . . . . . . . . . . 14
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol‘(𝐴 ∩ (𝐵[,]𝑦))) = (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))) |
92 | 84, 91 | eqtrd 2778 |
. . . . . . . . . . . . 13
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐹‘𝑦) = (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))) |
93 | 77, 92 | oveq12d 7295 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((𝐹‘𝑧) − (𝐹‘𝑦)) = ((vol*‘(𝐴 ∩ (𝐵[,]𝑧))) − (vol*‘(𝐴 ∩ (𝐵[,]𝑦))))) |
94 | 49 | adantr 481 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → 𝐹:ℝ⟶ℝ) |
95 | 94, 61 | ffvelrnd 6964 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐹‘𝑧) ∈ ℝ) |
96 | 77, 95 | eqeltrrd 2840 |
. . . . . . . . . . . . . 14
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ∈ ℝ) |
97 | 70 | leidd 11539 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → 𝐵 ≤ 𝐵) |
98 | | simpr3 1195 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → 𝑦 ≤ 𝑧) |
99 | | iccss 13145 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ) ∧ (𝐵 ≤ 𝐵 ∧ 𝑦 ≤ 𝑧)) → (𝐵[,]𝑦) ⊆ (𝐵[,]𝑧)) |
100 | 70, 61, 97, 98, 99 | syl22anc 836 |
. . . . . . . . . . . . . . . . . 18
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐵[,]𝑦) ⊆ (𝐵[,]𝑧)) |
101 | | sslin 4170 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝐵[,]𝑦) ⊆ (𝐵[,]𝑧) → (𝐴 ∩ (𝐵[,]𝑦)) ⊆ (𝐴 ∩ (𝐵[,]𝑧))) |
102 | 100, 101 | syl 17 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐴 ∩ (𝐵[,]𝑦)) ⊆ (𝐴 ∩ (𝐵[,]𝑧))) |
103 | | mblss 24693 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝐴 ∩ (𝐵[,]𝑧)) ∈ dom vol → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ℝ) |
104 | 74, 103 | syl 17 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ℝ) |
105 | 102, 104 | sstrd 3932 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐴 ∩ (𝐵[,]𝑦)) ⊆ ℝ) |
106 | | iccssre 13159 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝑦[,]𝑧) ⊆ ℝ) |
107 | 78, 61, 106 | syl2anc 584 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝑦[,]𝑧) ⊆ ℝ) |
108 | 105, 107 | unssd 4121 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ⊆ ℝ) |
109 | 94, 78 | ffvelrnd 6964 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐹‘𝑦) ∈ ℝ) |
110 | 92, 109 | eqeltrrd 2840 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ∈ ℝ) |
111 | 61, 78 | resubcld 11401 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝑧 − 𝑦) ∈ ℝ) |
112 | 110, 111 | readdcld 11002 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧 − 𝑦)) ∈ ℝ) |
113 | | ovolicc 24685 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧) → (vol*‘(𝑦[,]𝑧)) = (𝑧 − 𝑦)) |
114 | 113 | adantl 482 |
. . . . . . . . . . . . . . . . . 18
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘(𝑦[,]𝑧)) = (𝑧 − 𝑦)) |
115 | 114, 111 | eqeltrd 2839 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘(𝑦[,]𝑧)) ∈ ℝ) |
116 | | ovolun 24661 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝐴 ∩ (𝐵[,]𝑦)) ⊆ ℝ ∧ (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ∈ ℝ) ∧ ((𝑦[,]𝑧) ⊆ ℝ ∧ (vol*‘(𝑦[,]𝑧)) ∈ ℝ)) →
(vol*‘((𝐴 ∩
(𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (vol*‘(𝑦[,]𝑧)))) |
117 | 105, 110,
107, 115, 116 | syl22anc 836 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (vol*‘(𝑦[,]𝑧)))) |
118 | 114 | oveq2d 7293 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (vol*‘(𝑦[,]𝑧))) = ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧 − 𝑦))) |
119 | 117, 118 | breqtrd 5102 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧 − 𝑦))) |
120 | | ovollecl 24645 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ⊆ ℝ ∧ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧 − 𝑦)) ∈ ℝ ∧ (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧 − 𝑦))) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ∈ ℝ) |
121 | 108, 112,
119, 120 | syl3anc 1370 |
. . . . . . . . . . . . . 14
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) ∈ ℝ) |
122 | 70 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝐵 ≤ 𝑦) → 𝐵 ∈ ℝ) |
123 | 61 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝐵 ≤ 𝑦) → 𝑧 ∈ ℝ) |
124 | 78 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . 21
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝐵 ≤ 𝑦) → 𝑦 ∈ ℝ) |
125 | | simpr 485 |
. . . . . . . . . . . . . . . . . . . . 21
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝐵 ≤ 𝑦) → 𝐵 ≤ 𝑦) |
126 | 98 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . 21
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝐵 ≤ 𝑦) → 𝑦 ≤ 𝑧) |
127 | | simp2 1136 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧) → 𝑧 ∈ ℝ) |
128 | | elicc2 13142 |
. . . . . . . . . . . . . . . . . . . . . . 23
⊢ ((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ) → (𝑦 ∈ (𝐵[,]𝑧) ↔ (𝑦 ∈ ℝ ∧ 𝐵 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧))) |
129 | 69, 127, 128 | syl2an 596 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝑦 ∈ (𝐵[,]𝑧) ↔ (𝑦 ∈ ℝ ∧ 𝐵 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧))) |
130 | 129 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . 21
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝐵 ≤ 𝑦) → (𝑦 ∈ (𝐵[,]𝑧) ↔ (𝑦 ∈ ℝ ∧ 𝐵 ≤ 𝑦 ∧ 𝑦 ≤ 𝑧))) |
131 | 124, 125,
126, 130 | mpbir3and 1341 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝐵 ≤ 𝑦) → 𝑦 ∈ (𝐵[,]𝑧)) |
132 | | iccsplit 13215 |
. . . . . . . . . . . . . . . . . . . 20
⊢ ((𝐵 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ∈ (𝐵[,]𝑧)) → (𝐵[,]𝑧) = ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) |
133 | 122, 123,
131, 132 | syl3anc 1370 |
. . . . . . . . . . . . . . . . . . 19
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝐵 ≤ 𝑦) → (𝐵[,]𝑧) = ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) |
134 | | eqimss 3978 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝐵[,]𝑧) = ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) |
135 | 133, 134 | syl 17 |
. . . . . . . . . . . . . . . . . 18
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝐵 ≤ 𝑦) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) |
136 | 78 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝑦 ≤ 𝐵) → 𝑦 ∈ ℝ) |
137 | 61 | adantr 481 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝑦 ≤ 𝐵) → 𝑧 ∈ ℝ) |
138 | | simpr 485 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝑦 ≤ 𝐵) → 𝑦 ≤ 𝐵) |
139 | 137 | leidd 11539 |
. . . . . . . . . . . . . . . . . . . 20
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝑦 ≤ 𝐵) → 𝑧 ≤ 𝑧) |
140 | | iccss 13145 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ) ∧ (𝑦 ≤ 𝐵 ∧ 𝑧 ≤ 𝑧)) → (𝐵[,]𝑧) ⊆ (𝑦[,]𝑧)) |
141 | 136, 137,
138, 139, 140 | syl22anc 836 |
. . . . . . . . . . . . . . . . . . 19
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝑦 ≤ 𝐵) → (𝐵[,]𝑧) ⊆ (𝑦[,]𝑧)) |
142 | | ssun4 4110 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝐵[,]𝑧) ⊆ (𝑦[,]𝑧) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) |
143 | 141, 142 | syl 17 |
. . . . . . . . . . . . . . . . . 18
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ (𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧)) ∧ 𝑦 ≤ 𝐵) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) |
144 | 70, 78, 135, 143 | lecasei 11079 |
. . . . . . . . . . . . . . . . 17
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) |
145 | | sslin 4170 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐵[,]𝑧) ⊆ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))) |
146 | 144, 145 | syl 17 |
. . . . . . . . . . . . . . . 16
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧)))) |
147 | | indi 4209 |
. . . . . . . . . . . . . . . . 17
⊢ (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) = ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝐴 ∩ (𝑦[,]𝑧))) |
148 | | inss2 4165 |
. . . . . . . . . . . . . . . . . 18
⊢ (𝐴 ∩ (𝑦[,]𝑧)) ⊆ (𝑦[,]𝑧) |
149 | | unss2 4116 |
. . . . . . . . . . . . . . . . . 18
⊢ ((𝐴 ∩ (𝑦[,]𝑧)) ⊆ (𝑦[,]𝑧) → ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝐴 ∩ (𝑦[,]𝑧))) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) |
150 | 148, 149 | ax-mp 5 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝐴 ∩ (𝑦[,]𝑧))) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) |
151 | 147, 150 | eqsstri 3956 |
. . . . . . . . . . . . . . . 16
⊢ (𝐴 ∩ ((𝐵[,]𝑦) ∪ (𝑦[,]𝑧))) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) |
152 | 146, 151 | sstrdi 3934 |
. . . . . . . . . . . . . . 15
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧))) |
153 | | ovolss 24647 |
. . . . . . . . . . . . . . 15
⊢ (((𝐴 ∩ (𝐵[,]𝑧)) ⊆ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ∧ ((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)) ⊆ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)))) |
154 | 152, 108,
153 | syl2anc 584 |
. . . . . . . . . . . . . 14
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ (vol*‘((𝐴 ∩ (𝐵[,]𝑦)) ∪ (𝑦[,]𝑧)))) |
155 | 96, 121, 112, 154, 119 | letrd 11130 |
. . . . . . . . . . . . 13
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧 − 𝑦))) |
156 | 96, 110, 111 | lesubadd2d 11572 |
. . . . . . . . . . . . 13
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (((vol*‘(𝐴 ∩ (𝐵[,]𝑧))) − (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))) ≤ (𝑧 − 𝑦) ↔ (vol*‘(𝐴 ∩ (𝐵[,]𝑧))) ≤ ((vol*‘(𝐴 ∩ (𝐵[,]𝑦))) + (𝑧 − 𝑦)))) |
157 | 155, 156 | mpbird 256 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((vol*‘(𝐴 ∩ (𝐵[,]𝑧))) − (vol*‘(𝐴 ∩ (𝐵[,]𝑦)))) ≤ (𝑧 − 𝑦)) |
158 | 93, 157 | eqbrtrd 5098 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((𝐹‘𝑧) − (𝐹‘𝑦)) ≤ (𝑧 − 𝑦)) |
159 | 95, 109 | resubcld 11401 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((𝐹‘𝑧) − (𝐹‘𝑦)) ∈ ℝ) |
160 | | simplr 766 |
. . . . . . . . . . . . 13
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → 𝑒 ∈ ℝ+) |
161 | 160 | rpred 12770 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → 𝑒 ∈ ℝ) |
162 | | lelttr 11063 |
. . . . . . . . . . . 12
⊢ ((((𝐹‘𝑧) − (𝐹‘𝑦)) ∈ ℝ ∧ (𝑧 − 𝑦) ∈ ℝ ∧ 𝑒 ∈ ℝ) → ((((𝐹‘𝑧) − (𝐹‘𝑦)) ≤ (𝑧 − 𝑦) ∧ (𝑧 − 𝑦) < 𝑒) → ((𝐹‘𝑧) − (𝐹‘𝑦)) < 𝑒)) |
163 | 159, 111,
161, 162 | syl3anc 1370 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((((𝐹‘𝑧) − (𝐹‘𝑦)) ≤ (𝑧 − 𝑦) ∧ (𝑧 − 𝑦) < 𝑒) → ((𝐹‘𝑧) − (𝐹‘𝑦)) < 𝑒)) |
164 | 158, 163 | mpand 692 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((𝑧 − 𝑦) < 𝑒 → ((𝐹‘𝑧) − (𝐹‘𝑦)) < 𝑒)) |
165 | | abssubge0 15037 |
. . . . . . . . . . . 12
⊢ ((𝑦 ∈ ℝ ∧ 𝑧 ∈ ℝ ∧ 𝑦 ≤ 𝑧) → (abs‘(𝑧 − 𝑦)) = (𝑧 − 𝑦)) |
166 | 165 | adantl 482 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (abs‘(𝑧 − 𝑦)) = (𝑧 − 𝑦)) |
167 | 166 | breq1d 5086 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((abs‘(𝑧 − 𝑦)) < 𝑒 ↔ (𝑧 − 𝑦) < 𝑒)) |
168 | | ovolss 24647 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∩ (𝐵[,]𝑦)) ⊆ (𝐴 ∩ (𝐵[,]𝑧)) ∧ (𝐴 ∩ (𝐵[,]𝑧)) ⊆ ℝ) → (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ≤ (vol*‘(𝐴 ∩ (𝐵[,]𝑧)))) |
169 | 102, 104,
168 | syl2anc 584 |
. . . . . . . . . . . . 13
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (vol*‘(𝐴 ∩ (𝐵[,]𝑦))) ≤ (vol*‘(𝐴 ∩ (𝐵[,]𝑧)))) |
170 | 169, 92, 77 | 3brtr4d 5108 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (𝐹‘𝑦) ≤ (𝐹‘𝑧)) |
171 | 109, 95, 170 | abssubge0d 15141 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) = ((𝐹‘𝑧) − (𝐹‘𝑦))) |
172 | 171 | breq1d 5086 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒 ↔ ((𝐹‘𝑧) − (𝐹‘𝑦)) < 𝑒)) |
173 | 164, 167,
172 | 3imtr4d 294 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ
∧ 𝑦 ≤ 𝑧)) → ((abs‘(𝑧 − 𝑦)) < 𝑒 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
174 | 31, 41, 42, 60, 173 | wlogle 11506 |
. . . . . . . 8
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ (𝑦 ∈ ℝ
∧ 𝑧 ∈ ℝ))
→ ((abs‘(𝑧
− 𝑦)) < 𝑒 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
175 | 174 | anassrs 468 |
. . . . . . 7
⊢
(((((𝐴 ∈ dom
vol ∧ 𝐵 ∈ ℝ)
∧ 𝑒 ∈
ℝ+) ∧ 𝑦 ∈ ℝ) ∧ 𝑧 ∈ ℝ) → ((abs‘(𝑧 − 𝑦)) < 𝑒 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
176 | 175 | ralrimiva 3103 |
. . . . . 6
⊢ ((((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ 𝑒 ∈ ℝ+)
∧ 𝑦 ∈ ℝ)
→ ∀𝑧 ∈
ℝ ((abs‘(𝑧
− 𝑦)) < 𝑒 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
177 | 176 | anasss 467 |
. . . . 5
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑒 ∈ ℝ+
∧ 𝑦 ∈ ℝ))
→ ∀𝑧 ∈
ℝ ((abs‘(𝑧
− 𝑦)) < 𝑒 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
178 | 177 | ancom2s 647 |
. . . 4
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑦 ∈ ℝ ∧ 𝑒 ∈ ℝ+))
→ ∀𝑧 ∈
ℝ ((abs‘(𝑧
− 𝑦)) < 𝑒 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
179 | | breq2 5080 |
. . . . 5
⊢ (𝑑 = 𝑒 → ((abs‘(𝑧 − 𝑦)) < 𝑑 ↔ (abs‘(𝑧 − 𝑦)) < 𝑒)) |
180 | 179 | rspceaimv 3566 |
. . . 4
⊢ ((𝑒 ∈ ℝ+
∧ ∀𝑧 ∈
ℝ ((abs‘(𝑧
− 𝑦)) < 𝑒 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) → ∃𝑑 ∈ ℝ+ ∀𝑧 ∈ ℝ
((abs‘(𝑧 −
𝑦)) < 𝑑 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
181 | 21, 178, 180 | syl2anc 584 |
. . 3
⊢ (((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) ∧ (𝑦 ∈ ℝ ∧ 𝑒 ∈ ℝ+))
→ ∃𝑑 ∈
ℝ+ ∀𝑧 ∈ ℝ ((abs‘(𝑧 − 𝑦)) < 𝑑 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
182 | 181 | ralrimivva 3111 |
. 2
⊢ ((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) →
∀𝑦 ∈ ℝ
∀𝑒 ∈
ℝ+ ∃𝑑 ∈ ℝ+ ∀𝑧 ∈ ℝ
((abs‘(𝑧 −
𝑦)) < 𝑑 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)) |
183 | | ax-resscn 10926 |
. . 3
⊢ ℝ
⊆ ℂ |
184 | | elcncf2 24051 |
. . 3
⊢ ((ℝ
⊆ ℂ ∧ ℝ ⊆ ℂ) → (𝐹 ∈ (ℝ–cn→ℝ) ↔ (𝐹:ℝ⟶ℝ ∧ ∀𝑦 ∈ ℝ ∀𝑒 ∈ ℝ+
∃𝑑 ∈
ℝ+ ∀𝑧 ∈ ℝ ((abs‘(𝑧 − 𝑦)) < 𝑑 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒)))) |
185 | 183, 183,
184 | mp2an 689 |
. 2
⊢ (𝐹 ∈ (ℝ–cn→ℝ) ↔ (𝐹:ℝ⟶ℝ ∧ ∀𝑦 ∈ ℝ ∀𝑒 ∈ ℝ+
∃𝑑 ∈
ℝ+ ∀𝑧 ∈ ℝ ((abs‘(𝑧 − 𝑦)) < 𝑑 → (abs‘((𝐹‘𝑧) − (𝐹‘𝑦))) < 𝑒))) |
186 | 20, 182, 185 | sylanbrc 583 |
1
⊢ ((𝐴 ∈ dom vol ∧ 𝐵 ∈ ℝ) → 𝐹 ∈ (ℝ–cn→ℝ)) |