Proof of Theorem crim
Step | Hyp | Ref
| Expression |
1 | | recn 10892 |
. . . 4
⊢ (𝐴 ∈ ℝ → 𝐴 ∈
ℂ) |
2 | | ax-icn 10861 |
. . . . 5
⊢ i ∈
ℂ |
3 | | recn 10892 |
. . . . 5
⊢ (𝐵 ∈ ℝ → 𝐵 ∈
ℂ) |
4 | | mulcl 10886 |
. . . . 5
⊢ ((i
∈ ℂ ∧ 𝐵
∈ ℂ) → (i · 𝐵) ∈ ℂ) |
5 | 2, 3, 4 | sylancr 586 |
. . . 4
⊢ (𝐵 ∈ ℝ → (i
· 𝐵) ∈
ℂ) |
6 | | addcl 10884 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧ (i
· 𝐵) ∈ ℂ)
→ (𝐴 + (i ·
𝐵)) ∈
ℂ) |
7 | 1, 5, 6 | syl2an 595 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐴 + (i · 𝐵)) ∈ ℂ) |
8 | | imval 14746 |
. . 3
⊢ ((𝐴 + (i · 𝐵)) ∈ ℂ →
(ℑ‘(𝐴 + (i
· 𝐵))) =
(ℜ‘((𝐴 + (i
· 𝐵)) /
i))) |
9 | 7, 8 | syl 17 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
(ℑ‘(𝐴 + (i
· 𝐵))) =
(ℜ‘((𝐴 + (i
· 𝐵)) /
i))) |
10 | 2, 4 | mpan 686 |
. . . . . 6
⊢ (𝐵 ∈ ℂ → (i
· 𝐵) ∈
ℂ) |
11 | | ine0 11340 |
. . . . . . 7
⊢ i ≠
0 |
12 | | divdir 11588 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℂ ∧ (i
· 𝐵) ∈ ℂ
∧ (i ∈ ℂ ∧ i ≠ 0)) → ((𝐴 + (i · 𝐵)) / i) = ((𝐴 / i) + ((i · 𝐵) / i))) |
13 | 12 | 3expa 1116 |
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ (i
· 𝐵) ∈ ℂ)
∧ (i ∈ ℂ ∧ i ≠ 0)) → ((𝐴 + (i · 𝐵)) / i) = ((𝐴 / i) + ((i · 𝐵) / i))) |
14 | 2, 11, 13 | mpanr12 701 |
. . . . . 6
⊢ ((𝐴 ∈ ℂ ∧ (i
· 𝐵) ∈ ℂ)
→ ((𝐴 + (i ·
𝐵)) / i) = ((𝐴 / i) + ((i · 𝐵) / i))) |
15 | 10, 14 | sylan2 592 |
. . . . 5
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 + (i · 𝐵)) / i) = ((𝐴 / i) + ((i · 𝐵) / i))) |
16 | | divrec2 11580 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℂ ∧ i ∈
ℂ ∧ i ≠ 0) → (𝐴 / i) = ((1 / i) · 𝐴)) |
17 | 2, 11, 16 | mp3an23 1451 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ → (𝐴 / i) = ((1 / i) · 𝐴)) |
18 | | irec 13846 |
. . . . . . . . 9
⊢ (1 / i) =
-i |
19 | 18 | oveq1i 7265 |
. . . . . . . 8
⊢ ((1 / i)
· 𝐴) = (-i ·
𝐴) |
20 | 19 | a1i 11 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ → ((1 / i)
· 𝐴) = (-i ·
𝐴)) |
21 | | mulneg12 11343 |
. . . . . . . 8
⊢ ((i
∈ ℂ ∧ 𝐴
∈ ℂ) → (-i · 𝐴) = (i · -𝐴)) |
22 | 2, 21 | mpan 686 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ → (-i
· 𝐴) = (i ·
-𝐴)) |
23 | 17, 20, 22 | 3eqtrd 2782 |
. . . . . 6
⊢ (𝐴 ∈ ℂ → (𝐴 / i) = (i · -𝐴)) |
24 | | divcan3 11589 |
. . . . . . 7
⊢ ((𝐵 ∈ ℂ ∧ i ∈
ℂ ∧ i ≠ 0) → ((i · 𝐵) / i) = 𝐵) |
25 | 2, 11, 24 | mp3an23 1451 |
. . . . . 6
⊢ (𝐵 ∈ ℂ → ((i
· 𝐵) / i) = 𝐵) |
26 | 23, 25 | oveqan12d 7274 |
. . . . 5
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐴 / i) + ((i · 𝐵) / i)) = ((i · -𝐴) + 𝐵)) |
27 | | negcl 11151 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ → -𝐴 ∈
ℂ) |
28 | | mulcl 10886 |
. . . . . . 7
⊢ ((i
∈ ℂ ∧ -𝐴
∈ ℂ) → (i · -𝐴) ∈ ℂ) |
29 | 2, 27, 28 | sylancr 586 |
. . . . . 6
⊢ (𝐴 ∈ ℂ → (i
· -𝐴) ∈
ℂ) |
30 | | addcom 11091 |
. . . . . 6
⊢ (((i
· -𝐴) ∈ ℂ
∧ 𝐵 ∈ ℂ)
→ ((i · -𝐴) +
𝐵) = (𝐵 + (i · -𝐴))) |
31 | 29, 30 | sylan 579 |
. . . . 5
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((i
· -𝐴) + 𝐵) = (𝐵 + (i · -𝐴))) |
32 | 15, 26, 31 | 3eqtrrd 2783 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐵 + (i · -𝐴)) = ((𝐴 + (i · 𝐵)) / i)) |
33 | 1, 3, 32 | syl2an 595 |
. . 3
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐵 + (i · -𝐴)) = ((𝐴 + (i · 𝐵)) / i)) |
34 | 33 | fveq2d 6760 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
(ℜ‘(𝐵 + (i
· -𝐴))) =
(ℜ‘((𝐴 + (i
· 𝐵)) /
i))) |
35 | | id 22 |
. . 3
⊢ (𝐵 ∈ ℝ → 𝐵 ∈
ℝ) |
36 | | renegcl 11214 |
. . 3
⊢ (𝐴 ∈ ℝ → -𝐴 ∈
ℝ) |
37 | | crre 14753 |
. . 3
⊢ ((𝐵 ∈ ℝ ∧ -𝐴 ∈ ℝ) →
(ℜ‘(𝐵 + (i
· -𝐴))) = 𝐵) |
38 | 35, 36, 37 | syl2anr 596 |
. 2
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
(ℜ‘(𝐵 + (i
· -𝐴))) = 𝐵) |
39 | 9, 34, 38 | 3eqtr2d 2784 |
1
⊢ ((𝐴 ∈ ℝ ∧ 𝐵 ∈ ℝ) →
(ℑ‘(𝐴 + (i
· 𝐵))) = 𝐵) |