Step | Hyp | Ref
| Expression |
1 | | itgabs.1 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ 𝑉) |
2 | | itgabs.2 |
. . . . . . . . . . . 12
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈
𝐿1) |
3 | 1, 2 | itgcl 23356 |
. . . . . . . . . . 11
⊢ (𝜑 → ∫𝐴𝐵 d𝑥 ∈ ℂ) |
4 | 3 | cjcld 13784 |
. . . . . . . . . 10
⊢ (𝜑 → (∗‘∫𝐴𝐵 d𝑥) ∈ ℂ) |
5 | | iblmbf 23340 |
. . . . . . . . . . . . . . 15
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ 𝐿1 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈ MblFn) |
6 | 2, 5 | syl 17 |
. . . . . . . . . . . . . 14
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈ MblFn) |
7 | 6, 1 | mbfmptcl 23210 |
. . . . . . . . . . . . 13
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℂ) |
8 | 7 | ralrimiva 2949 |
. . . . . . . . . . . 12
⊢ (𝜑 → ∀𝑥 ∈ 𝐴 𝐵 ∈ ℂ) |
9 | | nfv 1830 |
. . . . . . . . . . . . 13
⊢
Ⅎ𝑦 𝐵 ∈ ℂ |
10 | | nfcsb1v 3515 |
. . . . . . . . . . . . . 14
⊢
Ⅎ𝑥⦋𝑦 / 𝑥⦌𝐵 |
11 | 10 | nfel1 2765 |
. . . . . . . . . . . . 13
⊢
Ⅎ𝑥⦋𝑦 / 𝑥⦌𝐵 ∈ ℂ |
12 | | csbeq1a 3508 |
. . . . . . . . . . . . . 14
⊢ (𝑥 = 𝑦 → 𝐵 = ⦋𝑦 / 𝑥⦌𝐵) |
13 | 12 | eleq1d 2672 |
. . . . . . . . . . . . 13
⊢ (𝑥 = 𝑦 → (𝐵 ∈ ℂ ↔ ⦋𝑦 / 𝑥⦌𝐵 ∈ ℂ)) |
14 | 9, 11, 13 | cbvral 3143 |
. . . . . . . . . . . 12
⊢
(∀𝑥 ∈
𝐴 𝐵 ∈ ℂ ↔ ∀𝑦 ∈ 𝐴 ⦋𝑦 / 𝑥⦌𝐵 ∈ ℂ) |
15 | 8, 14 | sylib 207 |
. . . . . . . . . . 11
⊢ (𝜑 → ∀𝑦 ∈ 𝐴 ⦋𝑦 / 𝑥⦌𝐵 ∈ ℂ) |
16 | 15 | r19.21bi 2916 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → ⦋𝑦 / 𝑥⦌𝐵 ∈ ℂ) |
17 | | nfcv 2751 |
. . . . . . . . . . . 12
⊢
Ⅎ𝑦𝐵 |
18 | 17, 10, 12 | cbvmpt 4677 |
. . . . . . . . . . 11
⊢ (𝑥 ∈ 𝐴 ↦ 𝐵) = (𝑦 ∈ 𝐴 ↦ ⦋𝑦 / 𝑥⦌𝐵) |
19 | 18, 2 | syl5eqelr 2693 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑦 ∈ 𝐴 ↦ ⦋𝑦 / 𝑥⦌𝐵) ∈
𝐿1) |
20 | 4, 16, 19 | iblmulc2 23403 |
. . . . . . . . 9
⊢ (𝜑 → (𝑦 ∈ 𝐴 ↦ ((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) ∈
𝐿1) |
21 | 4 | adantr 480 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → (∗‘∫𝐴𝐵 d𝑥) ∈ ℂ) |
22 | 21, 16 | mulcld 9939 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → ((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵) ∈ ℂ) |
23 | 22 | iblcn 23371 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑦 ∈ 𝐴 ↦ ((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) ∈ 𝐿1 ↔
((𝑦 ∈ 𝐴 ↦
(ℜ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵))) ∈ 𝐿1 ∧
(𝑦 ∈ 𝐴 ↦
(ℑ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵))) ∈
𝐿1))) |
24 | 20, 23 | mpbid 221 |
. . . . . . . 8
⊢ (𝜑 → ((𝑦 ∈ 𝐴 ↦
(ℜ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵))) ∈ 𝐿1 ∧
(𝑦 ∈ 𝐴 ↦
(ℑ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵))) ∈
𝐿1)) |
25 | 24 | simpld 474 |
. . . . . . 7
⊢ (𝜑 → (𝑦 ∈ 𝐴 ↦
(ℜ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵))) ∈
𝐿1) |
26 | | ovex 6577 |
. . . . . . . . 9
⊢
((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵) ∈ V |
27 | 26 | a1i 11 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → ((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵) ∈ V) |
28 | 27, 20 | iblabs 23401 |
. . . . . . 7
⊢ (𝜑 → (𝑦 ∈ 𝐴 ↦
(abs‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵))) ∈
𝐿1) |
29 | 22 | recld 13782 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) →
(ℜ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) ∈ ℝ) |
30 | 22 | abscld 14023 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) →
(abs‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) ∈ ℝ) |
31 | 22 | releabsd 14038 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) →
(ℜ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) ≤
(abs‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵))) |
32 | 25, 28, 29, 30, 31 | itgle 23382 |
. . . . . 6
⊢ (𝜑 → ∫𝐴(ℜ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) d𝑦 ≤ ∫𝐴(abs‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) d𝑦) |
33 | 3 | abscld 14023 |
. . . . . . . . 9
⊢ (𝜑 → (abs‘∫𝐴𝐵 d𝑥) ∈ ℝ) |
34 | 33 | recnd 9947 |
. . . . . . . 8
⊢ (𝜑 → (abs‘∫𝐴𝐵 d𝑥) ∈ ℂ) |
35 | 34 | sqvald 12867 |
. . . . . . 7
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥)↑2) = ((abs‘∫𝐴𝐵 d𝑥) · (abs‘∫𝐴𝐵 d𝑥))) |
36 | 3 | absvalsqd 14029 |
. . . . . . . . . 10
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥)↑2) = (∫𝐴𝐵 d𝑥 · (∗‘∫𝐴𝐵 d𝑥))) |
37 | 3, 4 | mulcomd 9940 |
. . . . . . . . . 10
⊢ (𝜑 → (∫𝐴𝐵 d𝑥 · (∗‘∫𝐴𝐵 d𝑥)) = ((∗‘∫𝐴𝐵 d𝑥) · ∫𝐴𝐵 d𝑥)) |
38 | 12, 17, 10 | cbvitg 23348 |
. . . . . . . . . . . 12
⊢
∫𝐴𝐵 d𝑥 = ∫𝐴⦋𝑦 / 𝑥⦌𝐵 d𝑦 |
39 | 38 | oveq2i 6560 |
. . . . . . . . . . 11
⊢
((∗‘∫𝐴𝐵 d𝑥) · ∫𝐴𝐵 d𝑥) = ((∗‘∫𝐴𝐵 d𝑥) · ∫𝐴⦋𝑦 / 𝑥⦌𝐵 d𝑦) |
40 | 4, 16, 19 | itgmulc2 23406 |
. . . . . . . . . . 11
⊢ (𝜑 →
((∗‘∫𝐴𝐵 d𝑥) · ∫𝐴⦋𝑦 / 𝑥⦌𝐵 d𝑦) = ∫𝐴((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵) d𝑦) |
41 | 39, 40 | syl5eq 2656 |
. . . . . . . . . 10
⊢ (𝜑 →
((∗‘∫𝐴𝐵 d𝑥) · ∫𝐴𝐵 d𝑥) = ∫𝐴((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵) d𝑦) |
42 | 36, 37, 41 | 3eqtrd 2648 |
. . . . . . . . 9
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥)↑2) = ∫𝐴((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵) d𝑦) |
43 | 42 | fveq2d 6107 |
. . . . . . . 8
⊢ (𝜑 →
(ℜ‘((abs‘∫𝐴𝐵 d𝑥)↑2)) = (ℜ‘∫𝐴((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵) d𝑦)) |
44 | 33 | resqcld 12897 |
. . . . . . . . 9
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥)↑2) ∈ ℝ) |
45 | 44 | rered 13812 |
. . . . . . . 8
⊢ (𝜑 →
(ℜ‘((abs‘∫𝐴𝐵 d𝑥)↑2)) = ((abs‘∫𝐴𝐵 d𝑥)↑2)) |
46 | 27, 20 | itgre 23373 |
. . . . . . . 8
⊢ (𝜑 → (ℜ‘∫𝐴((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵) d𝑦) = ∫𝐴(ℜ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) d𝑦) |
47 | 43, 45, 46 | 3eqtr3d 2652 |
. . . . . . 7
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥)↑2) = ∫𝐴(ℜ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) d𝑦) |
48 | 35, 47 | eqtr3d 2646 |
. . . . . 6
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥) · (abs‘∫𝐴𝐵 d𝑥)) = ∫𝐴(ℜ‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) d𝑦) |
49 | 12 | fveq2d 6107 |
. . . . . . . . 9
⊢ (𝑥 = 𝑦 → (abs‘𝐵) = (abs‘⦋𝑦 / 𝑥⦌𝐵)) |
50 | | nfcv 2751 |
. . . . . . . . 9
⊢
Ⅎ𝑦(abs‘𝐵) |
51 | | nfcv 2751 |
. . . . . . . . . 10
⊢
Ⅎ𝑥abs |
52 | 51, 10 | nffv 6110 |
. . . . . . . . 9
⊢
Ⅎ𝑥(abs‘⦋𝑦 / 𝑥⦌𝐵) |
53 | 49, 50, 52 | cbvitg 23348 |
. . . . . . . 8
⊢
∫𝐴(abs‘𝐵) d𝑥 = ∫𝐴(abs‘⦋𝑦 / 𝑥⦌𝐵) d𝑦 |
54 | 53 | oveq2i 6560 |
. . . . . . 7
⊢
((abs‘∫𝐴𝐵 d𝑥) · ∫𝐴(abs‘𝐵) d𝑥) = ((abs‘∫𝐴𝐵 d𝑥) · ∫𝐴(abs‘⦋𝑦 / 𝑥⦌𝐵) d𝑦) |
55 | 16 | abscld 14023 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → (abs‘⦋𝑦 / 𝑥⦌𝐵) ∈ ℝ) |
56 | 16, 19 | iblabs 23401 |
. . . . . . . . 9
⊢ (𝜑 → (𝑦 ∈ 𝐴 ↦ (abs‘⦋𝑦 / 𝑥⦌𝐵)) ∈
𝐿1) |
57 | 34, 55, 56 | itgmulc2 23406 |
. . . . . . . 8
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥) · ∫𝐴(abs‘⦋𝑦 / 𝑥⦌𝐵) d𝑦) = ∫𝐴((abs‘∫𝐴𝐵 d𝑥) · (abs‘⦋𝑦 / 𝑥⦌𝐵)) d𝑦) |
58 | 21, 16 | absmuld 14041 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) →
(abs‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) = ((abs‘(∗‘∫𝐴𝐵 d𝑥)) · (abs‘⦋𝑦 / 𝑥⦌𝐵))) |
59 | 3 | adantr 480 |
. . . . . . . . . . . 12
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) → ∫𝐴𝐵 d𝑥 ∈ ℂ) |
60 | 59 | abscjd 14037 |
. . . . . . . . . . 11
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) →
(abs‘(∗‘∫𝐴𝐵 d𝑥)) = (abs‘∫𝐴𝐵 d𝑥)) |
61 | 60 | oveq1d 6564 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) →
((abs‘(∗‘∫𝐴𝐵 d𝑥)) · (abs‘⦋𝑦 / 𝑥⦌𝐵)) = ((abs‘∫𝐴𝐵 d𝑥) · (abs‘⦋𝑦 / 𝑥⦌𝐵))) |
62 | 58, 61 | eqtrd 2644 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑦 ∈ 𝐴) →
(abs‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) = ((abs‘∫𝐴𝐵 d𝑥) · (abs‘⦋𝑦 / 𝑥⦌𝐵))) |
63 | 62 | itgeq2dv 23354 |
. . . . . . . 8
⊢ (𝜑 → ∫𝐴(abs‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) d𝑦 = ∫𝐴((abs‘∫𝐴𝐵 d𝑥) · (abs‘⦋𝑦 / 𝑥⦌𝐵)) d𝑦) |
64 | 57, 63 | eqtr4d 2647 |
. . . . . . 7
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥) · ∫𝐴(abs‘⦋𝑦 / 𝑥⦌𝐵) d𝑦) = ∫𝐴(abs‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) d𝑦) |
65 | 54, 64 | syl5eq 2656 |
. . . . . 6
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥) · ∫𝐴(abs‘𝐵) d𝑥) = ∫𝐴(abs‘((∗‘∫𝐴𝐵 d𝑥) · ⦋𝑦 / 𝑥⦌𝐵)) d𝑦) |
66 | 32, 48, 65 | 3brtr4d 4615 |
. . . . 5
⊢ (𝜑 → ((abs‘∫𝐴𝐵 d𝑥) · (abs‘∫𝐴𝐵 d𝑥)) ≤ ((abs‘∫𝐴𝐵 d𝑥) · ∫𝐴(abs‘𝐵) d𝑥)) |
67 | 66 | adantr 480 |
. . . 4
⊢ ((𝜑 ∧ 0 <
(abs‘∫𝐴𝐵 d𝑥)) → ((abs‘∫𝐴𝐵 d𝑥) · (abs‘∫𝐴𝐵 d𝑥)) ≤ ((abs‘∫𝐴𝐵 d𝑥) · ∫𝐴(abs‘𝐵) d𝑥)) |
68 | 33 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 0 <
(abs‘∫𝐴𝐵 d𝑥)) → (abs‘∫𝐴𝐵 d𝑥) ∈ ℝ) |
69 | 7 | abscld 14023 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (abs‘𝐵) ∈ ℝ) |
70 | 1, 2 | iblabs 23401 |
. . . . . . 7
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (abs‘𝐵)) ∈
𝐿1) |
71 | 69, 70 | itgrecl 23370 |
. . . . . 6
⊢ (𝜑 → ∫𝐴(abs‘𝐵) d𝑥 ∈ ℝ) |
72 | 71 | adantr 480 |
. . . . 5
⊢ ((𝜑 ∧ 0 <
(abs‘∫𝐴𝐵 d𝑥)) → ∫𝐴(abs‘𝐵) d𝑥 ∈ ℝ) |
73 | | simpr 476 |
. . . . 5
⊢ ((𝜑 ∧ 0 <
(abs‘∫𝐴𝐵 d𝑥)) → 0 < (abs‘∫𝐴𝐵 d𝑥)) |
74 | | lemul2 10755 |
. . . . 5
⊢
(((abs‘∫𝐴𝐵 d𝑥) ∈ ℝ ∧ ∫𝐴(abs‘𝐵) d𝑥 ∈ ℝ ∧ ((abs‘∫𝐴𝐵 d𝑥) ∈ ℝ ∧ 0 <
(abs‘∫𝐴𝐵 d𝑥))) → ((abs‘∫𝐴𝐵 d𝑥) ≤ ∫𝐴(abs‘𝐵) d𝑥 ↔ ((abs‘∫𝐴𝐵 d𝑥) · (abs‘∫𝐴𝐵 d𝑥)) ≤ ((abs‘∫𝐴𝐵 d𝑥) · ∫𝐴(abs‘𝐵) d𝑥))) |
75 | 68, 72, 68, 73, 74 | syl112anc 1322 |
. . . 4
⊢ ((𝜑 ∧ 0 <
(abs‘∫𝐴𝐵 d𝑥)) → ((abs‘∫𝐴𝐵 d𝑥) ≤ ∫𝐴(abs‘𝐵) d𝑥 ↔ ((abs‘∫𝐴𝐵 d𝑥) · (abs‘∫𝐴𝐵 d𝑥)) ≤ ((abs‘∫𝐴𝐵 d𝑥) · ∫𝐴(abs‘𝐵) d𝑥))) |
76 | 67, 75 | mpbird 246 |
. . 3
⊢ ((𝜑 ∧ 0 <
(abs‘∫𝐴𝐵 d𝑥)) → (abs‘∫𝐴𝐵 d𝑥) ≤ ∫𝐴(abs‘𝐵) d𝑥) |
77 | 76 | ex 449 |
. 2
⊢ (𝜑 → (0 <
(abs‘∫𝐴𝐵 d𝑥) → (abs‘∫𝐴𝐵 d𝑥) ≤ ∫𝐴(abs‘𝐵) d𝑥)) |
78 | 7 | absge0d 14031 |
. . . 4
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 0 ≤ (abs‘𝐵)) |
79 | 70, 69, 78 | itgge0 23383 |
. . 3
⊢ (𝜑 → 0 ≤ ∫𝐴(abs‘𝐵) d𝑥) |
80 | | breq1 4586 |
. . 3
⊢ (0 =
(abs‘∫𝐴𝐵 d𝑥) → (0 ≤ ∫𝐴(abs‘𝐵) d𝑥 ↔ (abs‘∫𝐴𝐵 d𝑥) ≤ ∫𝐴(abs‘𝐵) d𝑥)) |
81 | 79, 80 | syl5ibcom 234 |
. 2
⊢ (𝜑 → (0 = (abs‘∫𝐴𝐵 d𝑥) → (abs‘∫𝐴𝐵 d𝑥) ≤ ∫𝐴(abs‘𝐵) d𝑥)) |
82 | 3 | absge0d 14031 |
. . 3
⊢ (𝜑 → 0 ≤
(abs‘∫𝐴𝐵 d𝑥)) |
83 | | 0re 9919 |
. . . 4
⊢ 0 ∈
ℝ |
84 | | leloe 10003 |
. . . 4
⊢ ((0
∈ ℝ ∧ (abs‘∫𝐴𝐵 d𝑥) ∈ ℝ) → (0 ≤
(abs‘∫𝐴𝐵 d𝑥) ↔ (0 < (abs‘∫𝐴𝐵 d𝑥) ∨ 0 = (abs‘∫𝐴𝐵 d𝑥)))) |
85 | 83, 33, 84 | sylancr 694 |
. . 3
⊢ (𝜑 → (0 ≤
(abs‘∫𝐴𝐵 d𝑥) ↔ (0 < (abs‘∫𝐴𝐵 d𝑥) ∨ 0 = (abs‘∫𝐴𝐵 d𝑥)))) |
86 | 82, 85 | mpbid 221 |
. 2
⊢ (𝜑 → (0 <
(abs‘∫𝐴𝐵 d𝑥) ∨ 0 = (abs‘∫𝐴𝐵 d𝑥))) |
87 | 77, 81, 86 | mpjaod 395 |
1
⊢ (𝜑 → (abs‘∫𝐴𝐵 d𝑥) ≤ ∫𝐴(abs‘𝐵) d𝑥) |