Proof of Theorem crulem
| Step | Hyp | Ref
| Expression |
| 1 | | inelr 4527 |
. . 3
⊢ ¬ i ∈ ℝ |
| 2 | | cru.3 |
. . . . . . . . . . . . 13
⊢ C
∈ ℝ |
| 3 | | cru.1 |
. . . . . . . . . . . . . 14
⊢ A
∈ ℝ |
| 4 | 3 | renegcl 4171 |
. . . . . . . . . . . . 13
⊢ -A
∈ ℝ |
| 5 | 2, 4 | readdcl 4118 |
. . . . . . . . . . . 12
⊢ (C +
-A) ∈ ℝ |
| 6 | 5 | recn 4098 |
. . . . . . . . . . 11
⊢ (C +
-A) ∈ ℂ |
| 7 | | cru.2 |
. . . . . . . . . . . . 13
⊢ B
∈ ℝ |
| 8 | 7 | recn 4098 |
. . . . . . . . . . . 12
⊢ B
∈ ℂ |
| 9 | | cru.4 |
. . . . . . . . . . . . 13
⊢ D
∈ ℝ |
| 10 | 9 | recn 4098 |
. . . . . . . . . . . 12
⊢ D
∈ ℂ |
| 11 | 8, 10 | subcl 4139 |
. . . . . . . . . . 11
⊢ (B
− D) ∈ ℂ |
| 12 | | axicn 4065 |
. . . . . . . . . . 11
⊢ i ∈ ℂ |
| 13 | 6, 11, 12 | divmulz 4219 |
. . . . . . . . . 10
⊢ ((B
− D) ≠ 0 → (((C + -A) /
(B − D)) = i ↔ ((B − D)
· i) = (C + -A))) |
| 14 | | opreq1 3006 |
. . . . . . . . . . . 12
⊢ ((A +
(B · i)) = (C + (D ·
i)) → ((A + (B · i)) + (-A + -(D ·
i))) = ((C + (D · i)) + (-A + -(D ·
i)))) |
| 15 | 3 | recn 4098 |
. . . . . . . . . . . . . 14
⊢ A
∈ ℂ |
| 16 | 8, 12 | mulcl 4105 |
. . . . . . . . . . . . . 14
⊢ (B
· i) ∈ ℂ |
| 17 | 4 | recn 4098 |
. . . . . . . . . . . . . 14
⊢ -A
∈ ℂ |
| 18 | 10, 12 | mulcl 4105 |
. . . . . . . . . . . . . . 15
⊢ (D
· i) ∈ ℂ |
| 19 | 18 | negcl 4142 |
. . . . . . . . . . . . . 14
⊢ -(D
· i) ∈ ℂ |
| 20 | 15, 16, 17, 19 | add4 4130 |
. . . . . . . . . . . . 13
⊢ ((A +
(B · i)) + (-A + -(D ·
i))) = ((A + -A) + ((B
· i) + -(D ·
i))) |
| 21 | 15 | negid 4147 |
. . . . . . . . . . . . . 14
⊢ (A +
-A) = 0 |
| 22 | 21 | opreq1i 3009 |
. . . . . . . . . . . . 13
⊢ ((A +
-A) + ((B · i) + -(D · i))) = (0 + ((B · i) + -(D · i))) |
| 23 | 16, 19 | addcl 4104 |
. . . . . . . . . . . . . 14
⊢ ((B
· i) + -(D ·
i)) ∈ ℂ |
| 24 | 23 | addid2 4113 |
. . . . . . . . . . . . 13
⊢ (0 + ((B · i) + -(D · i))) = ((B · i) + -(D · i)) |
| 25 | 20, 22, 24 | 3eqtr 1123 |
. . . . . . . . . . . 12
⊢ ((A +
(B · i)) + (-A + -(D ·
i))) = ((B · i) +
-(D · i)) |
| 26 | 2 | recn 4098 |
. . . . . . . . . . . . . 14
⊢ C
∈ ℂ |
| 27 | 26, 18, 17, 19 | add4 4130 |
. . . . . . . . . . . . 13
⊢ ((C +
(D · i)) + (-A + -(D ·
i))) = ((C + -A) + ((D
· i) + -(D ·
i))) |
| 28 | 18 | negid 4147 |
. . . . . . . . . . . . . 14
⊢ ((D
· i) + -(D ·
i)) = 0 |
| 29 | 28 | opreq2i 3010 |
. . . . . . . . . . . . 13
⊢ ((C +
-A) + ((D · i) + -(D · i))) = ((C + -A) +
0) |
| 30 | 6 | addid1 4112 |
. . . . . . . . . . . . 13
⊢ ((C +
-A) + 0) = (C + -A) |
| 31 | 27, 29, 30 | 3eqtr 1123 |
. . . . . . . . . . . 12
⊢ ((C +
(D · i)) + (-A + -(D ·
i))) = (C + -A) |
| 32 | 14, 25, 31 | 3eqtr3g 1146 |
. . . . . . . . . . 11
⊢ ((A +
(B · i)) = (C + (D ·
i)) → ((B · i) +
-(D · i)) = (C + -A)) |
| 33 | 8, 10, 12 | subdir 4183 |
. . . . . . . . . . . 12
⊢ ((B
− D) · i) = ((B · i) − (D · i)) |
| 34 | 16, 18 | subneg 4148 |
. . . . . . . . . . . 12
⊢ ((B
· i) − (D ·
i)) = ((B · i) +
-(D · i)) |
| 35 | 33, 34 | eqtr 1119 |
. . . . . . . . . . 11
⊢ ((B
− D) · i) = ((B · i) + -(D · i)) |
| 36 | 32, 35 | syl5eq 1136 |
. . . . . . . . . 10
⊢ ((A +
(B · i)) = (C + (D ·
i)) → ((B − D) · i) = (C + -A)) |
| 37 | 13, 36 | syl5bir 184 |
. . . . . . . . 9
⊢ ((B
− D) ≠ 0 → ((A + (B ·
i)) = (C + (D · i)) → ((C + -A) /
(B − D)) = i)) |
| 38 | 37 | imp 277 |
. . . . . . . 8
⊢ (((B
− D) ≠ 0 ∧ (A + (B ·
i)) = (C + (D · i))) → ((C + -A) /
(B − D)) = i) |
39 | 38 | eleq1d 1155 |
. . . . . . 7
⊢ (((B
− D) ≠ 0 ∧ (A + (B ·
i)) = (C + (D · i))) → (((C + -A) /
(B − D)) ∈ ℝ ↔ i ∈
ℝ)) |
| 40 | 7, 9 | resubcl 4174 |
. . . . . . . 8
⊢ (B
− D) ∈ ℝ |
| 41 | 5, 40 | redivclz 4275 |
. . . . . . 7
⊢ ((B
− D) ≠ 0 → ((C + -A) /
(B − D)) ∈ ℝ) |
| 42 | 39, 41 | syl5bi 183 |
. . . . . 6
⊢ (((B
− D) ≠ 0 ∧ (A + (B ·
i)) = (C + (D · i))) → ((B − D)
≠ 0 → i ∈ ℝ)) |
| 43 | 42 | exp 291 |
. . . . 5
⊢ ((B
− D) ≠ 0 → ((A + (B ·
i)) = (C + (D · i)) → ((B − D)
≠ 0 → i ∈ ℝ))) |
| 44 | 43 | pm2.43b 61 |
. . . 4
⊢ ((A +
(B · i)) = (C + (D ·
i)) → ((B − D) ≠ 0 → i ∈ ℝ)) |
| 45 | | df-ne 1192 |
. . . 4
⊢ ((B
− D) ≠ 0 ↔ ¬ (B − D) =
0) |
| 46 | 44, 45 | syl5ibr 182 |
. . 3
⊢ ((A +
(B · i)) = (C + (D ·
i)) → (¬ (B −
D) = 0 → i ∈
ℝ)) |
| 47 | 1, 46 | mt3i 100 |
. 2
⊢ ((A +
(B · i)) = (C + (D ·
i)) → (B − D) = 0) |
| 48 | 8, 10 | subeq0 4163 |
. 2
⊢ ((B
− D) = 0 ↔ B = D) |
| 49 | 47, 48 | sylib 173 |
1
⊢ ((A +
(B · i)) = (C + (D ·
i)) → B = D) |