Proof of Theorem divsubdivap
Step | Hyp | Ref
| Expression |
1 | | negcl 8098 |
. . . 4
⊢ (𝐵 ∈ ℂ → -𝐵 ∈
ℂ) |
2 | | divadddivap 8623 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ -𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + (-𝐵 / 𝐷)) = (((𝐴 · 𝐷) + (-𝐵 · 𝐶)) / (𝐶 · 𝐷))) |
3 | 1, 2 | sylanl2 401 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + (-𝐵 / 𝐷)) = (((𝐴 · 𝐷) + (-𝐵 · 𝐶)) / (𝐶 · 𝐷))) |
4 | | simplr 520 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐵 ∈ ℂ) |
5 | | simprrl 529 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐷 ∈ ℂ) |
6 | | simprrr 530 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐷 # 0) |
7 | | divnegap 8602 |
. . . . . 6
⊢ ((𝐵 ∈ ℂ ∧ 𝐷 ∈ ℂ ∧ 𝐷 # 0) → -(𝐵 / 𝐷) = (-𝐵 / 𝐷)) |
8 | 4, 5, 6, 7 | syl3anc 1228 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → -(𝐵 / 𝐷) = (-𝐵 / 𝐷)) |
9 | 8 | oveq2d 5858 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + -(𝐵 / 𝐷)) = ((𝐴 / 𝐶) + (-𝐵 / 𝐷))) |
10 | | simpll 519 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐴 ∈ ℂ) |
11 | | simprll 527 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐶 ∈ ℂ) |
12 | | simprlr 528 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → 𝐶 # 0) |
13 | | divclap 8574 |
. . . . . 6
⊢ ((𝐴 ∈ ℂ ∧ 𝐶 ∈ ℂ ∧ 𝐶 # 0) → (𝐴 / 𝐶) ∈ ℂ) |
14 | 10, 11, 12, 13 | syl3anc 1228 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (𝐴 / 𝐶) ∈ ℂ) |
15 | | divclap 8574 |
. . . . . 6
⊢ ((𝐵 ∈ ℂ ∧ 𝐷 ∈ ℂ ∧ 𝐷 # 0) → (𝐵 / 𝐷) ∈ ℂ) |
16 | 4, 5, 6, 15 | syl3anc 1228 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (𝐵 / 𝐷) ∈ ℂ) |
17 | 14, 16 | negsubd 8215 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + -(𝐵 / 𝐷)) = ((𝐴 / 𝐶) − (𝐵 / 𝐷))) |
18 | 9, 17 | eqtr3d 2200 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) + (-𝐵 / 𝐷)) = ((𝐴 / 𝐶) − (𝐵 / 𝐷))) |
19 | 3, 18 | eqtr3d 2200 |
. 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (((𝐴 · 𝐷) + (-𝐵 · 𝐶)) / (𝐶 · 𝐷)) = ((𝐴 / 𝐶) − (𝐵 / 𝐷))) |
20 | 4, 11 | mulneg1d 8309 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (-𝐵 · 𝐶) = -(𝐵 · 𝐶)) |
21 | 20 | oveq2d 5858 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 · 𝐷) + (-𝐵 · 𝐶)) = ((𝐴 · 𝐷) + -(𝐵 · 𝐶))) |
22 | 10, 5 | mulcld 7919 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (𝐴 · 𝐷) ∈ ℂ) |
23 | 4, 11 | mulcld 7919 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (𝐵 · 𝐶) ∈ ℂ) |
24 | 22, 23 | negsubd 8215 |
. . . 4
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 · 𝐷) + -(𝐵 · 𝐶)) = ((𝐴 · 𝐷) − (𝐵 · 𝐶))) |
25 | 21, 24 | eqtrd 2198 |
. . 3
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 · 𝐷) + (-𝐵 · 𝐶)) = ((𝐴 · 𝐷) − (𝐵 · 𝐶))) |
26 | 25 | oveq1d 5857 |
. 2
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → (((𝐴 · 𝐷) + (-𝐵 · 𝐶)) / (𝐶 · 𝐷)) = (((𝐴 · 𝐷) − (𝐵 · 𝐶)) / (𝐶 · 𝐷))) |
27 | 19, 26 | eqtr3d 2200 |
1
⊢ (((𝐴 ∈ ℂ ∧ 𝐵 ∈ ℂ) ∧ ((𝐶 ∈ ℂ ∧ 𝐶 # 0) ∧ (𝐷 ∈ ℂ ∧ 𝐷 # 0))) → ((𝐴 / 𝐶) − (𝐵 / 𝐷)) = (((𝐴 · 𝐷) − (𝐵 · 𝐶)) / (𝐶 · 𝐷))) |