Step | Hyp | Ref
| Expression |
1 | | itgmulc2nc.1 |
. . . . . . . . 9
⊢ (𝜑 → 𝐶 ∈ ℂ) |
2 | 1 | recld 14905 |
. . . . . . . 8
⊢ (𝜑 → (ℜ‘𝐶) ∈
ℝ) |
3 | 2 | recnd 11003 |
. . . . . . 7
⊢ (𝜑 → (ℜ‘𝐶) ∈
ℂ) |
4 | 3 | adantr 481 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℜ‘𝐶) ∈ ℂ) |
5 | | itgmulc2nc.3 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈
𝐿1) |
6 | | iblmbf 24932 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ 𝐿1 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈ MblFn) |
7 | 5, 6 | syl 17 |
. . . . . . . . 9
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ 𝐵) ∈ MblFn) |
8 | | itgmulc2nc.2 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ 𝑉) |
9 | 7, 8 | mbfmptcl 24800 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐵 ∈ ℂ) |
10 | 9 | recld 14905 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℜ‘𝐵) ∈ ℝ) |
11 | 10 | recnd 11003 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℜ‘𝐵) ∈ ℂ) |
12 | 4, 11 | mulcld 10995 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ((ℜ‘𝐶) · (ℜ‘𝐵)) ∈ ℂ) |
13 | 9 | iblcn 24963 |
. . . . . . . 8
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ 𝐵) ∈ 𝐿1 ↔
((𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) ∈ 𝐿1
∧ (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) ∈
𝐿1))) |
14 | 5, 13 | mpbid 231 |
. . . . . . 7
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) ∈ 𝐿1 ∧ (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) ∈
𝐿1)) |
15 | 14 | simpld 495 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) ∈
𝐿1) |
16 | | itgmulc2nc.m |
. . . . . . . . 9
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∈ MblFn) |
17 | | ovexd 7310 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐶 · 𝐵) ∈ V) |
18 | 16, 17 | mbfdm2 24801 |
. . . . . . . 8
⊢ (𝜑 → 𝐴 ∈ dom vol) |
19 | | fconstmpt 5649 |
. . . . . . . . 9
⊢ (𝐴 × {(ℜ‘𝐶)}) = (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐶)) |
20 | 19 | a1i 11 |
. . . . . . . 8
⊢ (𝜑 → (𝐴 × {(ℜ‘𝐶)}) = (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐶))) |
21 | | eqidd 2739 |
. . . . . . . 8
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) = (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵))) |
22 | 18, 4, 10, 20, 21 | offval2 7553 |
. . . . . . 7
⊢ (𝜑 → ((𝐴 × {(ℜ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵))) = (𝑥 ∈ 𝐴 ↦ ((ℜ‘𝐶) · (ℜ‘𝐵)))) |
23 | | iblmbf 24932 |
. . . . . . . . 9
⊢ ((𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) ∈ 𝐿1 →
(𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) ∈ MblFn) |
24 | 15, 23 | syl 17 |
. . . . . . . 8
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)) ∈ MblFn) |
25 | 11 | fmpttd 6989 |
. . . . . . . 8
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵)):𝐴⟶ℂ) |
26 | 24, 2, 25 | mbfmulc2re 24812 |
. . . . . . 7
⊢ (𝜑 → ((𝐴 × {(ℜ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵))) ∈ MblFn) |
27 | 22, 26 | eqeltrrd 2840 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℜ‘𝐶) · (ℜ‘𝐵))) ∈ MblFn) |
28 | 3, 10, 15, 27 | iblmulc2nc 35842 |
. . . . 5
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℜ‘𝐶) · (ℜ‘𝐵))) ∈
𝐿1) |
29 | 12, 28 | itgcl 24948 |
. . . 4
⊢ (𝜑 → ∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 ∈ ℂ) |
30 | | ax-icn 10930 |
. . . . 5
⊢ i ∈
ℂ |
31 | 9 | imcld 14906 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℑ‘𝐵) ∈ ℝ) |
32 | 31 | recnd 11003 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℑ‘𝐵) ∈ ℂ) |
33 | 4, 32 | mulcld 10995 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ((ℜ‘𝐶) · (ℑ‘𝐵)) ∈ ℂ) |
34 | 14 | simprd 496 |
. . . . . . 7
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) ∈
𝐿1) |
35 | | eqidd 2739 |
. . . . . . . . 9
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) = (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵))) |
36 | 18, 4, 31, 20, 35 | offval2 7553 |
. . . . . . . 8
⊢ (𝜑 → ((𝐴 × {(ℜ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵))) = (𝑥 ∈ 𝐴 ↦ ((ℜ‘𝐶) · (ℑ‘𝐵)))) |
37 | | iblmbf 24932 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) ∈ 𝐿1 →
(𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) ∈ MblFn) |
38 | 34, 37 | syl 17 |
. . . . . . . . 9
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)) ∈ MblFn) |
39 | 32 | fmpttd 6989 |
. . . . . . . . 9
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵)):𝐴⟶ℂ) |
40 | 38, 2, 39 | mbfmulc2re 24812 |
. . . . . . . 8
⊢ (𝜑 → ((𝐴 × {(ℜ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵))) ∈ MblFn) |
41 | 36, 40 | eqeltrrd 2840 |
. . . . . . 7
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℜ‘𝐶) · (ℑ‘𝐵))) ∈ MblFn) |
42 | 3, 31, 34, 41 | iblmulc2nc 35842 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℜ‘𝐶) · (ℑ‘𝐵))) ∈
𝐿1) |
43 | 33, 42 | itgcl 24948 |
. . . . 5
⊢ (𝜑 → ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥 ∈ ℂ) |
44 | | mulcl 10955 |
. . . . 5
⊢ ((i
∈ ℂ ∧ ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥 ∈ ℂ) → (i ·
∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥) ∈ ℂ) |
45 | 30, 43, 44 | sylancr 587 |
. . . 4
⊢ (𝜑 → (i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥) ∈ ℂ) |
46 | 1 | imcld 14906 |
. . . . . . . . 9
⊢ (𝜑 → (ℑ‘𝐶) ∈
ℝ) |
47 | 46 | recnd 11003 |
. . . . . . . 8
⊢ (𝜑 → (ℑ‘𝐶) ∈
ℂ) |
48 | 47 | negcld 11319 |
. . . . . . 7
⊢ (𝜑 → -(ℑ‘𝐶) ∈
ℂ) |
49 | 48 | adantr 481 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → -(ℑ‘𝐶) ∈ ℂ) |
50 | 49, 32 | mulcld 10995 |
. . . . 5
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (-(ℑ‘𝐶) · (ℑ‘𝐵)) ∈ ℂ) |
51 | | fconstmpt 5649 |
. . . . . . . . 9
⊢ (𝐴 × {-(ℑ‘𝐶)}) = (𝑥 ∈ 𝐴 ↦ -(ℑ‘𝐶)) |
52 | 51 | a1i 11 |
. . . . . . . 8
⊢ (𝜑 → (𝐴 × {-(ℑ‘𝐶)}) = (𝑥 ∈ 𝐴 ↦ -(ℑ‘𝐶))) |
53 | 18, 49, 31, 52, 35 | offval2 7553 |
. . . . . . 7
⊢ (𝜑 → ((𝐴 × {-(ℑ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵))) = (𝑥 ∈ 𝐴 ↦ (-(ℑ‘𝐶) · (ℑ‘𝐵)))) |
54 | 46 | renegcld 11402 |
. . . . . . . 8
⊢ (𝜑 → -(ℑ‘𝐶) ∈
ℝ) |
55 | 38, 54, 39 | mbfmulc2re 24812 |
. . . . . . 7
⊢ (𝜑 → ((𝐴 × {-(ℑ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵))) ∈ MblFn) |
56 | 53, 55 | eqeltrrd 2840 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (-(ℑ‘𝐶) · (ℑ‘𝐵))) ∈ MblFn) |
57 | 48, 31, 34, 56 | iblmulc2nc 35842 |
. . . . 5
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (-(ℑ‘𝐶) · (ℑ‘𝐵))) ∈
𝐿1) |
58 | 50, 57 | itgcl 24948 |
. . . 4
⊢ (𝜑 → ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 ∈ ℂ) |
59 | 47 | adantr 481 |
. . . . . . 7
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℑ‘𝐶) ∈ ℂ) |
60 | 59, 11 | mulcld 10995 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ((ℑ‘𝐶) · (ℜ‘𝐵)) ∈ ℂ) |
61 | | fconstmpt 5649 |
. . . . . . . . . 10
⊢ (𝐴 × {(ℑ‘𝐶)}) = (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐶)) |
62 | 61 | a1i 11 |
. . . . . . . . 9
⊢ (𝜑 → (𝐴 × {(ℑ‘𝐶)}) = (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐶))) |
63 | 18, 59, 10, 62, 21 | offval2 7553 |
. . . . . . . 8
⊢ (𝜑 → ((𝐴 × {(ℑ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵))) = (𝑥 ∈ 𝐴 ↦ ((ℑ‘𝐶) · (ℜ‘𝐵)))) |
64 | 24, 46, 25 | mbfmulc2re 24812 |
. . . . . . . 8
⊢ (𝜑 → ((𝐴 × {(ℑ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℜ‘𝐵))) ∈ MblFn) |
65 | 63, 64 | eqeltrrd 2840 |
. . . . . . 7
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℑ‘𝐶) · (ℜ‘𝐵))) ∈ MblFn) |
66 | 47, 10, 15, 65 | iblmulc2nc 35842 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℑ‘𝐶) · (ℜ‘𝐵))) ∈
𝐿1) |
67 | 60, 66 | itgcl 24948 |
. . . . 5
⊢ (𝜑 → ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥 ∈ ℂ) |
68 | | mulcl 10955 |
. . . . 5
⊢ ((i
∈ ℂ ∧ ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥 ∈ ℂ) → (i ·
∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥) ∈ ℂ) |
69 | 30, 67, 68 | sylancr 587 |
. . . 4
⊢ (𝜑 → (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥) ∈ ℂ) |
70 | 29, 45, 58, 69 | add4d 11203 |
. . 3
⊢ (𝜑 → ((∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + (i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥)) + (∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥))) = ((∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) + ((i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥) + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥)))) |
71 | 30 | a1i 11 |
. . . . . 6
⊢ (𝜑 → i ∈
ℂ) |
72 | 71, 47 | mulcld 10995 |
. . . . 5
⊢ (𝜑 → (i ·
(ℑ‘𝐶)) ∈
ℂ) |
73 | 8, 5 | itgcl 24948 |
. . . . 5
⊢ (𝜑 → ∫𝐴𝐵 d𝑥 ∈ ℂ) |
74 | 3, 72, 73 | adddird 11000 |
. . . 4
⊢ (𝜑 → (((ℜ‘𝐶) + (i ·
(ℑ‘𝐶)))
· ∫𝐴𝐵 d𝑥) = (((ℜ‘𝐶) · ∫𝐴𝐵 d𝑥) + ((i · (ℑ‘𝐶)) · ∫𝐴𝐵 d𝑥))) |
75 | 8, 5 | itgcnval 24964 |
. . . . . . 7
⊢ (𝜑 → ∫𝐴𝐵 d𝑥 = (∫𝐴(ℜ‘𝐵) d𝑥 + (i · ∫𝐴(ℑ‘𝐵) d𝑥))) |
76 | 75 | oveq2d 7291 |
. . . . . 6
⊢ (𝜑 → ((ℜ‘𝐶) · ∫𝐴𝐵 d𝑥) = ((ℜ‘𝐶) · (∫𝐴(ℜ‘𝐵) d𝑥 + (i · ∫𝐴(ℑ‘𝐵) d𝑥)))) |
77 | 10, 15 | itgcl 24948 |
. . . . . . 7
⊢ (𝜑 → ∫𝐴(ℜ‘𝐵) d𝑥 ∈ ℂ) |
78 | 31, 34 | itgcl 24948 |
. . . . . . . 8
⊢ (𝜑 → ∫𝐴(ℑ‘𝐵) d𝑥 ∈ ℂ) |
79 | | mulcl 10955 |
. . . . . . . 8
⊢ ((i
∈ ℂ ∧ ∫𝐴(ℑ‘𝐵) d𝑥 ∈ ℂ) → (i ·
∫𝐴(ℑ‘𝐵) d𝑥) ∈ ℂ) |
80 | 30, 78, 79 | sylancr 587 |
. . . . . . 7
⊢ (𝜑 → (i · ∫𝐴(ℑ‘𝐵) d𝑥) ∈ ℂ) |
81 | 3, 77, 80 | adddid 10999 |
. . . . . 6
⊢ (𝜑 → ((ℜ‘𝐶) · (∫𝐴(ℜ‘𝐵) d𝑥 + (i · ∫𝐴(ℑ‘𝐵) d𝑥))) = (((ℜ‘𝐶) · ∫𝐴(ℜ‘𝐵) d𝑥) + ((ℜ‘𝐶) · (i · ∫𝐴(ℑ‘𝐵) d𝑥)))) |
82 | 3, 10, 15, 27, 2, 10 | itgmulc2nclem2 35844 |
. . . . . . 7
⊢ (𝜑 → ((ℜ‘𝐶) · ∫𝐴(ℜ‘𝐵) d𝑥) = ∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥) |
83 | 3, 71, 78 | mul12d 11184 |
. . . . . . . 8
⊢ (𝜑 → ((ℜ‘𝐶) · (i ·
∫𝐴(ℑ‘𝐵) d𝑥)) = (i · ((ℜ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥))) |
84 | 3, 31, 34, 41, 2, 31 | itgmulc2nclem2 35844 |
. . . . . . . . 9
⊢ (𝜑 → ((ℜ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥) = ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥) |
85 | 84 | oveq2d 7291 |
. . . . . . . 8
⊢ (𝜑 → (i ·
((ℜ‘𝐶) ·
∫𝐴(ℑ‘𝐵) d𝑥)) = (i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥)) |
86 | 83, 85 | eqtrd 2778 |
. . . . . . 7
⊢ (𝜑 → ((ℜ‘𝐶) · (i ·
∫𝐴(ℑ‘𝐵) d𝑥)) = (i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥)) |
87 | 82, 86 | oveq12d 7293 |
. . . . . 6
⊢ (𝜑 → (((ℜ‘𝐶) · ∫𝐴(ℜ‘𝐵) d𝑥) + ((ℜ‘𝐶) · (i · ∫𝐴(ℑ‘𝐵) d𝑥))) = (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + (i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥))) |
88 | 76, 81, 87 | 3eqtrd 2782 |
. . . . 5
⊢ (𝜑 → ((ℜ‘𝐶) · ∫𝐴𝐵 d𝑥) = (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + (i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥))) |
89 | 75 | oveq2d 7291 |
. . . . . 6
⊢ (𝜑 → ((i ·
(ℑ‘𝐶)) ·
∫𝐴𝐵 d𝑥) = ((i · (ℑ‘𝐶)) · (∫𝐴(ℜ‘𝐵) d𝑥 + (i · ∫𝐴(ℑ‘𝐵) d𝑥)))) |
90 | 72, 77, 80 | adddid 10999 |
. . . . . 6
⊢ (𝜑 → ((i ·
(ℑ‘𝐶)) ·
(∫𝐴(ℜ‘𝐵) d𝑥 + (i · ∫𝐴(ℑ‘𝐵) d𝑥))) = (((i · (ℑ‘𝐶)) · ∫𝐴(ℜ‘𝐵) d𝑥) + ((i · (ℑ‘𝐶)) · (i ·
∫𝐴(ℑ‘𝐵) d𝑥)))) |
91 | 71, 47, 77 | mulassd 10998 |
. . . . . . . . 9
⊢ (𝜑 → ((i ·
(ℑ‘𝐶)) ·
∫𝐴(ℜ‘𝐵) d𝑥) = (i · ((ℑ‘𝐶) · ∫𝐴(ℜ‘𝐵) d𝑥))) |
92 | 47, 10, 15, 65, 46, 10 | itgmulc2nclem2 35844 |
. . . . . . . . . 10
⊢ (𝜑 → ((ℑ‘𝐶) · ∫𝐴(ℜ‘𝐵) d𝑥) = ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥) |
93 | 92 | oveq2d 7291 |
. . . . . . . . 9
⊢ (𝜑 → (i ·
((ℑ‘𝐶) ·
∫𝐴(ℜ‘𝐵) d𝑥)) = (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥)) |
94 | 91, 93 | eqtrd 2778 |
. . . . . . . 8
⊢ (𝜑 → ((i ·
(ℑ‘𝐶)) ·
∫𝐴(ℜ‘𝐵) d𝑥) = (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥)) |
95 | 71, 47, 71, 78 | mul4d 11187 |
. . . . . . . . 9
⊢ (𝜑 → ((i ·
(ℑ‘𝐶)) ·
(i · ∫𝐴(ℑ‘𝐵) d𝑥)) = ((i · i) ·
((ℑ‘𝐶) ·
∫𝐴(ℑ‘𝐵) d𝑥))) |
96 | | ixi 11604 |
. . . . . . . . . . 11
⊢ (i
· i) = -1 |
97 | 96 | oveq1i 7285 |
. . . . . . . . . 10
⊢ ((i
· i) · ((ℑ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥)) = (-1 · ((ℑ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥)) |
98 | 47, 78 | mulcld 10995 |
. . . . . . . . . . 11
⊢ (𝜑 → ((ℑ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥) ∈ ℂ) |
99 | 98 | mulm1d 11427 |
. . . . . . . . . 10
⊢ (𝜑 → (-1 ·
((ℑ‘𝐶) ·
∫𝐴(ℑ‘𝐵) d𝑥)) = -((ℑ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥)) |
100 | 97, 99 | eqtrid 2790 |
. . . . . . . . 9
⊢ (𝜑 → ((i · i) ·
((ℑ‘𝐶) ·
∫𝐴(ℑ‘𝐵) d𝑥)) = -((ℑ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥)) |
101 | 47, 78 | mulneg1d 11428 |
. . . . . . . . . 10
⊢ (𝜑 → (-(ℑ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥) = -((ℑ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥)) |
102 | 48, 31, 34, 56, 54, 31 | itgmulc2nclem2 35844 |
. . . . . . . . . 10
⊢ (𝜑 → (-(ℑ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥) = ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) |
103 | 101, 102 | eqtr3d 2780 |
. . . . . . . . 9
⊢ (𝜑 → -((ℑ‘𝐶) · ∫𝐴(ℑ‘𝐵) d𝑥) = ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) |
104 | 95, 100, 103 | 3eqtrd 2782 |
. . . . . . . 8
⊢ (𝜑 → ((i ·
(ℑ‘𝐶)) ·
(i · ∫𝐴(ℑ‘𝐵) d𝑥)) = ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) |
105 | 94, 104 | oveq12d 7293 |
. . . . . . 7
⊢ (𝜑 → (((i ·
(ℑ‘𝐶)) ·
∫𝐴(ℜ‘𝐵) d𝑥) + ((i · (ℑ‘𝐶)) · (i ·
∫𝐴(ℑ‘𝐵) d𝑥))) = ((i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥) + ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥)) |
106 | 69, 58 | addcomd 11177 |
. . . . . . 7
⊢ (𝜑 → ((i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥) + ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) = (∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥))) |
107 | 105, 106 | eqtrd 2778 |
. . . . . 6
⊢ (𝜑 → (((i ·
(ℑ‘𝐶)) ·
∫𝐴(ℜ‘𝐵) d𝑥) + ((i · (ℑ‘𝐶)) · (i ·
∫𝐴(ℑ‘𝐵) d𝑥))) = (∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥))) |
108 | 89, 90, 107 | 3eqtrd 2782 |
. . . . 5
⊢ (𝜑 → ((i ·
(ℑ‘𝐶)) ·
∫𝐴𝐵 d𝑥) = (∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥))) |
109 | 88, 108 | oveq12d 7293 |
. . . 4
⊢ (𝜑 → (((ℜ‘𝐶) · ∫𝐴𝐵 d𝑥) + ((i · (ℑ‘𝐶)) · ∫𝐴𝐵 d𝑥)) = ((∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + (i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥)) + (∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥)))) |
110 | 74, 109 | eqtrd 2778 |
. . 3
⊢ (𝜑 → (((ℜ‘𝐶) + (i ·
(ℑ‘𝐶)))
· ∫𝐴𝐵 d𝑥) = ((∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + (i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥)) + (∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥)))) |
111 | 59, 32 | mulcld 10995 |
. . . . . 6
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → ((ℑ‘𝐶) · (ℑ‘𝐵)) ∈ ℂ) |
112 | 18, 59, 31, 62, 35 | offval2 7553 |
. . . . . . . 8
⊢ (𝜑 → ((𝐴 × {(ℑ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵))) = (𝑥 ∈ 𝐴 ↦ ((ℑ‘𝐶) · (ℑ‘𝐵)))) |
113 | 38, 46, 39 | mbfmulc2re 24812 |
. . . . . . . 8
⊢ (𝜑 → ((𝐴 × {(ℑ‘𝐶)}) ∘f · (𝑥 ∈ 𝐴 ↦ (ℑ‘𝐵))) ∈ MblFn) |
114 | 112, 113 | eqeltrrd 2840 |
. . . . . . 7
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℑ‘𝐶) · (ℑ‘𝐵))) ∈ MblFn) |
115 | 47, 31, 34, 114 | iblmulc2nc 35842 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ ((ℑ‘𝐶) · (ℑ‘𝐵))) ∈
𝐿1) |
116 | 1 | adantr 481 |
. . . . . . . . . 10
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → 𝐶 ∈ ℂ) |
117 | 116, 9 | mulcld 10995 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (𝐶 · 𝐵) ∈ ℂ) |
118 | | eqidd 2739 |
. . . . . . . . 9
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵)) = (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) |
119 | | ref 14823 |
. . . . . . . . . . 11
⊢
ℜ:ℂ⟶ℝ |
120 | 119 | a1i 11 |
. . . . . . . . . 10
⊢ (𝜑 →
ℜ:ℂ⟶ℝ) |
121 | 120 | feqmptd 6837 |
. . . . . . . . 9
⊢ (𝜑 → ℜ = (𝑘 ∈ ℂ ↦
(ℜ‘𝑘))) |
122 | | fveq2 6774 |
. . . . . . . . 9
⊢ (𝑘 = (𝐶 · 𝐵) → (ℜ‘𝑘) = (ℜ‘(𝐶 · 𝐵))) |
123 | 117, 118,
121, 122 | fmptco 7001 |
. . . . . . . 8
⊢ (𝜑 → (ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) = (𝑥 ∈ 𝐴 ↦ (ℜ‘(𝐶 · 𝐵)))) |
124 | 116, 9 | remuld 14929 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℜ‘(𝐶 · 𝐵)) = (((ℜ‘𝐶) · (ℜ‘𝐵)) − ((ℑ‘𝐶) · (ℑ‘𝐵)))) |
125 | 124 | mpteq2dva 5174 |
. . . . . . . 8
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℜ‘(𝐶 · 𝐵))) = (𝑥 ∈ 𝐴 ↦ (((ℜ‘𝐶) · (ℜ‘𝐵)) − ((ℑ‘𝐶) · (ℑ‘𝐵))))) |
126 | 123, 125 | eqtrd 2778 |
. . . . . . 7
⊢ (𝜑 → (ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) = (𝑥 ∈ 𝐴 ↦ (((ℜ‘𝐶) · (ℜ‘𝐵)) − ((ℑ‘𝐶) · (ℑ‘𝐵))))) |
127 | 117 | fmpttd 6989 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵)):𝐴⟶ℂ) |
128 | | ismbfcn 24793 |
. . . . . . . . . 10
⊢ ((𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵)):𝐴⟶ℂ → ((𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∈ MblFn ↔ ((ℜ ∘
(𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) ∈ MblFn ∧ (ℑ ∘
(𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) ∈ MblFn))) |
129 | 127, 128 | syl 17 |
. . . . . . . . 9
⊢ (𝜑 → ((𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∈ MblFn ↔ ((ℜ ∘
(𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) ∈ MblFn ∧ (ℑ ∘
(𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) ∈ MblFn))) |
130 | 16, 129 | mpbid 231 |
. . . . . . . 8
⊢ (𝜑 → ((ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) ∈ MblFn ∧ (ℑ ∘
(𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) ∈ MblFn)) |
131 | 130 | simpld 495 |
. . . . . . 7
⊢ (𝜑 → (ℜ ∘ (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) ∈ MblFn) |
132 | 126, 131 | eqeltrrd 2840 |
. . . . . 6
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (((ℜ‘𝐶) · (ℜ‘𝐵)) − ((ℑ‘𝐶) · (ℑ‘𝐵)))) ∈ MblFn) |
133 | 12, 28, 111, 115, 132 | itgsubnc 35839 |
. . . . 5
⊢ (𝜑 → ∫𝐴(((ℜ‘𝐶) · (ℜ‘𝐵)) − ((ℑ‘𝐶) · (ℑ‘𝐵))) d𝑥 = (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 − ∫𝐴((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥)) |
134 | 124 | itgeq2dv 24946 |
. . . . 5
⊢ (𝜑 → ∫𝐴(ℜ‘(𝐶 · 𝐵)) d𝑥 = ∫𝐴(((ℜ‘𝐶) · (ℜ‘𝐵)) − ((ℑ‘𝐶) · (ℑ‘𝐵))) d𝑥) |
135 | 111, 115 | itgneg 24968 |
. . . . . . . 8
⊢ (𝜑 → -∫𝐴((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 = ∫𝐴-((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) |
136 | 59, 32 | mulneg1d 11428 |
. . . . . . . . 9
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (-(ℑ‘𝐶) · (ℑ‘𝐵)) = -((ℑ‘𝐶) · (ℑ‘𝐵))) |
137 | 136 | itgeq2dv 24946 |
. . . . . . . 8
⊢ (𝜑 → ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 = ∫𝐴-((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) |
138 | 135, 137 | eqtr4d 2781 |
. . . . . . 7
⊢ (𝜑 → -∫𝐴((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 = ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) |
139 | 138 | oveq2d 7291 |
. . . . . 6
⊢ (𝜑 → (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + -∫𝐴((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) = (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥)) |
140 | 111, 115 | itgcl 24948 |
. . . . . . 7
⊢ (𝜑 → ∫𝐴((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥 ∈ ℂ) |
141 | 29, 140 | negsubd 11338 |
. . . . . 6
⊢ (𝜑 → (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + -∫𝐴((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) = (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 − ∫𝐴((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥)) |
142 | 139, 141 | eqtr3d 2780 |
. . . . 5
⊢ (𝜑 → (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) = (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 − ∫𝐴((ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥)) |
143 | 133, 134,
142 | 3eqtr4d 2788 |
. . . 4
⊢ (𝜑 → ∫𝐴(ℜ‘(𝐶 · 𝐵)) d𝑥 = (∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥)) |
144 | 116, 9 | immuld 14930 |
. . . . . . . 8
⊢ ((𝜑 ∧ 𝑥 ∈ 𝐴) → (ℑ‘(𝐶 · 𝐵)) = (((ℜ‘𝐶) · (ℑ‘𝐵)) + ((ℑ‘𝐶) · (ℜ‘𝐵)))) |
145 | 144 | itgeq2dv 24946 |
. . . . . . 7
⊢ (𝜑 → ∫𝐴(ℑ‘(𝐶 · 𝐵)) d𝑥 = ∫𝐴(((ℜ‘𝐶) · (ℑ‘𝐵)) + ((ℑ‘𝐶) · (ℜ‘𝐵))) d𝑥) |
146 | | imf 14824 |
. . . . . . . . . . . . 13
⊢
ℑ:ℂ⟶ℝ |
147 | 146 | a1i 11 |
. . . . . . . . . . . 12
⊢ (𝜑 →
ℑ:ℂ⟶ℝ) |
148 | 147 | feqmptd 6837 |
. . . . . . . . . . 11
⊢ (𝜑 → ℑ = (𝑘 ∈ ℂ ↦
(ℑ‘𝑘))) |
149 | | fveq2 6774 |
. . . . . . . . . . 11
⊢ (𝑘 = (𝐶 · 𝐵) → (ℑ‘𝑘) = (ℑ‘(𝐶 · 𝐵))) |
150 | 117, 118,
148, 149 | fmptco 7001 |
. . . . . . . . . 10
⊢ (𝜑 → (ℑ ∘ (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) = (𝑥 ∈ 𝐴 ↦ (ℑ‘(𝐶 · 𝐵)))) |
151 | 144 | mpteq2dva 5174 |
. . . . . . . . . 10
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (ℑ‘(𝐶 · 𝐵))) = (𝑥 ∈ 𝐴 ↦ (((ℜ‘𝐶) · (ℑ‘𝐵)) + ((ℑ‘𝐶) · (ℜ‘𝐵))))) |
152 | 150, 151 | eqtrd 2778 |
. . . . . . . . 9
⊢ (𝜑 → (ℑ ∘ (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) = (𝑥 ∈ 𝐴 ↦ (((ℜ‘𝐶) · (ℑ‘𝐵)) + ((ℑ‘𝐶) · (ℜ‘𝐵))))) |
153 | 130 | simprd 496 |
. . . . . . . . 9
⊢ (𝜑 → (ℑ ∘ (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵))) ∈ MblFn) |
154 | 152, 153 | eqeltrrd 2840 |
. . . . . . . 8
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (((ℜ‘𝐶) · (ℑ‘𝐵)) + ((ℑ‘𝐶) · (ℜ‘𝐵)))) ∈ MblFn) |
155 | 33, 42, 60, 66, 154 | itgaddnc 35837 |
. . . . . . 7
⊢ (𝜑 → ∫𝐴(((ℜ‘𝐶) · (ℑ‘𝐵)) + ((ℑ‘𝐶) · (ℜ‘𝐵))) d𝑥 = (∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥 + ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥)) |
156 | 145, 155 | eqtrd 2778 |
. . . . . 6
⊢ (𝜑 → ∫𝐴(ℑ‘(𝐶 · 𝐵)) d𝑥 = (∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥 + ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥)) |
157 | 156 | oveq2d 7291 |
. . . . 5
⊢ (𝜑 → (i · ∫𝐴(ℑ‘(𝐶 · 𝐵)) d𝑥) = (i · (∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥 + ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥))) |
158 | 71, 43, 67 | adddid 10999 |
. . . . 5
⊢ (𝜑 → (i · (∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥 + ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥)) = ((i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥) + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥))) |
159 | 157, 158 | eqtrd 2778 |
. . . 4
⊢ (𝜑 → (i · ∫𝐴(ℑ‘(𝐶 · 𝐵)) d𝑥) = ((i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥) + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥))) |
160 | 143, 159 | oveq12d 7293 |
. . 3
⊢ (𝜑 → (∫𝐴(ℜ‘(𝐶 · 𝐵)) d𝑥 + (i · ∫𝐴(ℑ‘(𝐶 · 𝐵)) d𝑥)) = ((∫𝐴((ℜ‘𝐶) · (ℜ‘𝐵)) d𝑥 + ∫𝐴(-(ℑ‘𝐶) · (ℑ‘𝐵)) d𝑥) + ((i · ∫𝐴((ℜ‘𝐶) · (ℑ‘𝐵)) d𝑥) + (i · ∫𝐴((ℑ‘𝐶) · (ℜ‘𝐵)) d𝑥)))) |
161 | 70, 110, 160 | 3eqtr4d 2788 |
. 2
⊢ (𝜑 → (((ℜ‘𝐶) + (i ·
(ℑ‘𝐶)))
· ∫𝐴𝐵 d𝑥) = (∫𝐴(ℜ‘(𝐶 · 𝐵)) d𝑥 + (i · ∫𝐴(ℑ‘(𝐶 · 𝐵)) d𝑥))) |
162 | 1 | replimd 14908 |
. . 3
⊢ (𝜑 → 𝐶 = ((ℜ‘𝐶) + (i · (ℑ‘𝐶)))) |
163 | 162 | oveq1d 7290 |
. 2
⊢ (𝜑 → (𝐶 · ∫𝐴𝐵 d𝑥) = (((ℜ‘𝐶) + (i · (ℑ‘𝐶))) · ∫𝐴𝐵 d𝑥)) |
164 | 1, 8, 5, 16 | iblmulc2nc 35842 |
. . 3
⊢ (𝜑 → (𝑥 ∈ 𝐴 ↦ (𝐶 · 𝐵)) ∈
𝐿1) |
165 | 117, 164 | itgcnval 24964 |
. 2
⊢ (𝜑 → ∫𝐴(𝐶 · 𝐵) d𝑥 = (∫𝐴(ℜ‘(𝐶 · 𝐵)) d𝑥 + (i · ∫𝐴(ℑ‘(𝐶 · 𝐵)) d𝑥))) |
166 | 161, 163,
165 | 3eqtr4d 2788 |
1
⊢ (𝜑 → (𝐶 · ∫𝐴𝐵 d𝑥) = ∫𝐴(𝐶 · 𝐵) d𝑥) |