Proof of Theorem isosctrlem3
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | simp1l 1198 | . . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → 𝐴 ∈ ℂ) | 
| 2 |  | simp21 1207 | . . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → 𝐴 ≠ 0) | 
| 3 |  | simp1r 1199 | . . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → 𝐵 ∈ ℂ) | 
| 4 | 1, 3 | subcld 11620 | . . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴 − 𝐵) ∈ ℂ) | 
| 5 |  | simp23 1209 | . . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → 𝐴 ≠ 𝐵) | 
| 6 | 1, 3, 5 | subne0d 11629 | . . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴 − 𝐵) ≠ 0) | 
| 7 |  | isosctrlem3.1 | . . . 4
⊢ 𝐹 = (𝑥 ∈ (ℂ ∖ {0}), 𝑦 ∈ (ℂ ∖ {0})
↦ (ℑ‘(log‘(𝑦 / 𝑥)))) | 
| 8 | 7 | angneg 26846 | . . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ ((𝐴 − 𝐵) ∈ ℂ ∧ (𝐴 − 𝐵) ≠ 0)) → (-𝐴𝐹-(𝐴 − 𝐵)) = (𝐴𝐹(𝐴 − 𝐵))) | 
| 9 | 1, 2, 4, 6, 8 | syl22anc 839 | . 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (-𝐴𝐹-(𝐴 − 𝐵)) = (𝐴𝐹(𝐴 − 𝐵))) | 
| 10 | 1, 3 | negsubdi2d 11636 | . . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → -(𝐴 − 𝐵) = (𝐵 − 𝐴)) | 
| 11 | 10 | oveq2d 7447 | . 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (-𝐴𝐹-(𝐴 − 𝐵)) = (-𝐴𝐹(𝐵 − 𝐴))) | 
| 12 |  | 1cnd 11256 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → 1 ∈ ℂ) | 
| 13 |  | ax-1ne0 11224 | . . . . . 6
⊢ 1 ≠
0 | 
| 14 | 13 | a1i 11 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → 1 ≠ 0) | 
| 15 | 3, 1, 2 | divcld 12043 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐵 / 𝐴) ∈ ℂ) | 
| 16 | 12, 15 | subcld 11620 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (1 − (𝐵 / 𝐴)) ∈ ℂ) | 
| 17 | 5 | necomd 2996 | . . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → 𝐵 ≠ 𝐴) | 
| 18 | 3, 1, 2, 17 | divne1d 12054 | . . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐵 / 𝐴) ≠ 1) | 
| 19 | 18 | necomd 2996 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → 1 ≠ (𝐵 / 𝐴)) | 
| 20 | 12, 15, 19 | subne0d 11629 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (1 − (𝐵 / 𝐴)) ≠ 0) | 
| 21 | 7, 12, 14, 16, 20 | angvald 26847 | . . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (1𝐹(1 − (𝐵 / 𝐴))) = (ℑ‘(log‘((1 −
(𝐵 / 𝐴)) / 1)))) | 
| 22 | 16 | div1d 12035 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((1 − (𝐵 / 𝐴)) / 1) = (1 − (𝐵 / 𝐴))) | 
| 23 | 22 | fveq2d 6910 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (log‘((1 − (𝐵 / 𝐴)) / 1)) = (log‘(1 − (𝐵 / 𝐴)))) | 
| 24 | 23 | fveq2d 6910 | . . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (ℑ‘(log‘((1
− (𝐵 / 𝐴)) / 1))) =
(ℑ‘(log‘(1 − (𝐵 / 𝐴))))) | 
| 25 | 3, 1, 2 | absdivd 15494 | . . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (abs‘(𝐵 / 𝐴)) = ((abs‘𝐵) / (abs‘𝐴))) | 
| 26 |  | simp3 1139 | . . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (abs‘𝐴) = (abs‘𝐵)) | 
| 27 | 26 | eqcomd 2743 | . . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (abs‘𝐵) = (abs‘𝐴)) | 
| 28 | 27 | oveq1d 7446 | . . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((abs‘𝐵) / (abs‘𝐴)) = ((abs‘𝐴) / (abs‘𝐴))) | 
| 29 | 1 | abscld 15475 | . . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (abs‘𝐴) ∈ ℝ) | 
| 30 | 29 | recnd 11289 | . . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (abs‘𝐴) ∈ ℂ) | 
| 31 | 1, 2 | absne0d 15486 | . . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (abs‘𝐴) ≠ 0) | 
| 32 | 30, 31 | dividd 12041 | . . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((abs‘𝐴) / (abs‘𝐴)) = 1) | 
| 33 | 25, 28, 32 | 3eqtrd 2781 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (abs‘(𝐵 / 𝐴)) = 1) | 
| 34 | 19 | neneqd 2945 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ¬ 1 = (𝐵 / 𝐴)) | 
| 35 |  | isosctrlem2 26862 | . . . . . 6
⊢ (((𝐵 / 𝐴) ∈ ℂ ∧ (abs‘(𝐵 / 𝐴)) = 1 ∧ ¬ 1 = (𝐵 / 𝐴)) → (ℑ‘(log‘(1
− (𝐵 / 𝐴)))) =
(ℑ‘(log‘(-(𝐵 / 𝐴) / (1 − (𝐵 / 𝐴)))))) | 
| 36 | 15, 33, 34, 35 | syl3anc 1373 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (ℑ‘(log‘(1
− (𝐵 / 𝐴)))) =
(ℑ‘(log‘(-(𝐵 / 𝐴) / (1 − (𝐵 / 𝐴)))))) | 
| 37 | 15 | negcld 11607 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → -(𝐵 / 𝐴) ∈ ℂ) | 
| 38 |  | simp22 1208 | . . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → 𝐵 ≠ 0) | 
| 39 | 3, 1, 38, 2 | divne0d 12059 | . . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐵 / 𝐴) ≠ 0) | 
| 40 | 15, 39 | negne0d 11618 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → -(𝐵 / 𝐴) ≠ 0) | 
| 41 | 7, 16, 20, 37, 40 | angvald 26847 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((1 − (𝐵 / 𝐴))𝐹-(𝐵 / 𝐴)) = (ℑ‘(log‘(-(𝐵 / 𝐴) / (1 − (𝐵 / 𝐴)))))) | 
| 42 | 36, 41 | eqtr4d 2780 | . . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (ℑ‘(log‘(1
− (𝐵 / 𝐴)))) = ((1 − (𝐵 / 𝐴))𝐹-(𝐵 / 𝐴))) | 
| 43 | 21, 24, 42 | 3eqtrd 2781 | . . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (1𝐹(1 − (𝐵 / 𝐴))) = ((1 − (𝐵 / 𝐴))𝐹-(𝐵 / 𝐴))) | 
| 44 | 1 | mulridd 11278 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴 · 1) = 𝐴) | 
| 45 | 1, 12, 15 | subdid 11719 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴 · (1 − (𝐵 / 𝐴))) = ((𝐴 · 1) − (𝐴 · (𝐵 / 𝐴)))) | 
| 46 | 3, 1, 2 | divcan2d 12045 | . . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴 · (𝐵 / 𝐴)) = 𝐵) | 
| 47 | 44, 46 | oveq12d 7449 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((𝐴 · 1) − (𝐴 · (𝐵 / 𝐴))) = (𝐴 − 𝐵)) | 
| 48 | 45, 47 | eqtrd 2777 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴 · (1 − (𝐵 / 𝐴))) = (𝐴 − 𝐵)) | 
| 49 | 44, 48 | oveq12d 7449 | . . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((𝐴 · 1)𝐹(𝐴 · (1 − (𝐵 / 𝐴)))) = (𝐴𝐹(𝐴 − 𝐵))) | 
| 50 | 7 | angcan 26845 | . . . . 5
⊢ (((1
∈ ℂ ∧ 1 ≠ 0) ∧ ((1 − (𝐵 / 𝐴)) ∈ ℂ ∧ (1 − (𝐵 / 𝐴)) ≠ 0) ∧ (𝐴 ∈ ℂ ∧ 𝐴 ≠ 0)) → ((𝐴 · 1)𝐹(𝐴 · (1 − (𝐵 / 𝐴)))) = (1𝐹(1 − (𝐵 / 𝐴)))) | 
| 51 | 12, 14, 16, 20, 1, 2, 50 | syl222anc 1388 | . . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((𝐴 · 1)𝐹(𝐴 · (1 − (𝐵 / 𝐴)))) = (1𝐹(1 − (𝐵 / 𝐴)))) | 
| 52 | 49, 51 | eqtr3d 2779 | . . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴𝐹(𝐴 − 𝐵)) = (1𝐹(1 − (𝐵 / 𝐴)))) | 
| 53 | 1, 15 | mulneg2d 11717 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴 · -(𝐵 / 𝐴)) = -(𝐴 · (𝐵 / 𝐴))) | 
| 54 | 46 | negeqd 11502 | . . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → -(𝐴 · (𝐵 / 𝐴)) = -𝐵) | 
| 55 | 53, 54 | eqtrd 2777 | . . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴 · -(𝐵 / 𝐴)) = -𝐵) | 
| 56 | 48, 55 | oveq12d 7449 | . . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((𝐴 · (1 − (𝐵 / 𝐴)))𝐹(𝐴 · -(𝐵 / 𝐴))) = ((𝐴 − 𝐵)𝐹-𝐵)) | 
| 57 | 7 | angcan 26845 | . . . . 5
⊢ ((((1
− (𝐵 / 𝐴)) ∈ ℂ ∧ (1
− (𝐵 / 𝐴)) ≠ 0) ∧ (-(𝐵 / 𝐴) ∈ ℂ ∧ -(𝐵 / 𝐴) ≠ 0) ∧ (𝐴 ∈ ℂ ∧ 𝐴 ≠ 0)) → ((𝐴 · (1 − (𝐵 / 𝐴)))𝐹(𝐴 · -(𝐵 / 𝐴))) = ((1 − (𝐵 / 𝐴))𝐹-(𝐵 / 𝐴))) | 
| 58 | 16, 20, 37, 40, 1, 2, 57 | syl222anc 1388 | . . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((𝐴 · (1 − (𝐵 / 𝐴)))𝐹(𝐴 · -(𝐵 / 𝐴))) = ((1 − (𝐵 / 𝐴))𝐹-(𝐵 / 𝐴))) | 
| 59 | 56, 58 | eqtr3d 2779 | . . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → ((𝐴 − 𝐵)𝐹-𝐵) = ((1 − (𝐵 / 𝐴))𝐹-(𝐵 / 𝐴))) | 
| 60 | 43, 52, 59 | 3eqtr4d 2787 | . 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (𝐴𝐹(𝐴 − 𝐵)) = ((𝐴 − 𝐵)𝐹-𝐵)) | 
| 61 | 9, 11, 60 | 3eqtr3d 2785 | 1
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ (𝐴 ≠ 0 ∧ 𝐵 ≠ 0 ∧ 𝐴 ≠ 𝐵) ∧ (abs‘𝐴) = (abs‘𝐵)) → (-𝐴𝐹(𝐵 − 𝐴)) = ((𝐴 − 𝐵)𝐹-𝐵)) |