Proof of Theorem divsubdivap
Step | Hyp | Ref
| Expression |
1 | | negcl 8119 |
. . . 4
⊢ (𝐵 ∈ ℂ → -𝐵 ∈
ℂ) |
2 | | divadddivap 8644 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ -𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + (-𝐵 / 𝐷)) = (((𝐴 · 𝐷) + (-𝐵 · 𝐶)) / (𝐶 · 𝐷))) |
3 | 1, 2 | sylanl2 401 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + (-𝐵 / 𝐷)) = (((𝐴 · 𝐷) + (-𝐵 · 𝐶)) / (𝐶 · 𝐷))) |
4 | | simplr 525 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐵 ∈ ℂ) |
5 | | simprrl 534 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐷 ∈ ℂ) |
6 | | simprrr 535 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐷 # 0) |
7 | | divnegap 8623 |
. . . . . 6
⊢ ((𝐵 ∈ ℂ ∧ 𝐷 ∈ ℂ ∧ 𝐷 # 0) → -(𝐵 / 𝐷) = (-𝐵 / 𝐷)) |
8 | 4, 5, 6, 7 | syl3anc 1233 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → -(𝐵 / 𝐷) = (-𝐵 / 𝐷)) |
9 | 8 | oveq2d 5869 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + -(𝐵 / 𝐷)) = ((𝐴 / 𝐶) + (-𝐵 / 𝐷))) |
10 | | simpll 524 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐴 ∈ ℂ) |
11 | | simprll 532 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐶 ∈ ℂ) |
12 | | simprlr 533 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐶 # 0) |
13 | | divclap 8595 |
. . . . . 6
⊢ ((𝐴 ∈ ℂ ∧ 𝐶 ∈ ℂ ∧ 𝐶 # 0) → (𝐴 / 𝐶) ∈ ℂ) |
14 | 10, 11, 12, 13 | syl3anc 1233 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (𝐴 / 𝐶) ∈ ℂ) |
15 | | divclap 8595 |
. . . . . 6
⊢ ((𝐵 ∈ ℂ ∧ 𝐷 ∈ ℂ ∧ 𝐷 # 0) → (𝐵 / 𝐷) ∈ ℂ) |
16 | 4, 5, 6, 15 | syl3anc 1233 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (𝐵 / 𝐷) ∈ ℂ) |
17 | 14, 16 | negsubd 8236 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + -(𝐵 / 𝐷)) = ((𝐴 / 𝐶) − (𝐵 / 𝐷))) |
18 | 9, 17 | eqtr3d 2205 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + (-𝐵 / 𝐷)) = ((𝐴 / 𝐶) − (𝐵 / 𝐷))) |
19 | 3, 18 | eqtr3d 2205 |
. 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (((𝐴 · 𝐷) + (-𝐵 · 𝐶)) / (𝐶 · 𝐷)) = ((𝐴 / 𝐶) − (𝐵 / 𝐷))) |
20 | 4, 11 | mulneg1d 8330 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (-𝐵 · 𝐶) = -(𝐵 · 𝐶)) |
21 | 20 | oveq2d 5869 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 · 𝐷) + (-𝐵 · 𝐶)) = ((𝐴 · 𝐷) + -(𝐵 · 𝐶))) |
22 | 10, 5 | mulcld 7940 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (𝐴 · 𝐷) ∈ ℂ) |
23 | 4, 11 | mulcld 7940 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (𝐵 · 𝐶) ∈ ℂ) |
24 | 22, 23 | negsubd 8236 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 · 𝐷) + -(𝐵 · 𝐶)) = ((𝐴 · 𝐷) − (𝐵 · 𝐶))) |
25 | 21, 24 | eqtrd 2203 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 · 𝐷) + (-𝐵 · 𝐶)) = ((𝐴 · 𝐷) − (𝐵 · 𝐶))) |
26 | 25 | oveq1d 5868 |
. 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (((𝐴 · 𝐷) + (-𝐵 · 𝐶)) / (𝐶 · 𝐷)) = (((𝐴 · 𝐷) − (𝐵 · 𝐶)) / (𝐶 · 𝐷))) |
27 | 19, 26 | eqtr3d 2205 |
1
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) − (𝐵 / 𝐷)) = (((𝐴 · 𝐷) − (𝐵 · 𝐶)) / (𝐶 · 𝐷))) |