Step | Hyp | Ref
| Expression |
1 | | ax-rrecex 10943 |
. . . . 5
⊢ ((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) → ∃𝑥 ∈ ℝ (𝑅 · 𝑥) = 1) |
2 | | sn-inelr 40435 |
. . . . . 6
⊢ ¬ i
∈ ℝ |
3 | | ax-icn 10930 |
. . . . . . . . . . 11
⊢ i ∈
ℂ |
4 | 3 | a1i 11 |
. . . . . . . . . 10
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → i ∈
ℂ) |
5 | | simplll 772 |
. . . . . . . . . . 11
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → 𝑅 ∈ ℝ) |
6 | 5 | recnd 11003 |
. . . . . . . . . 10
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → 𝑅 ∈ ℂ) |
7 | | simplrl 774 |
. . . . . . . . . . 11
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → 𝑥 ∈ ℝ) |
8 | 7 | recnd 11003 |
. . . . . . . . . 10
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → 𝑥 ∈ ℂ) |
9 | 4, 6, 8 | mulassd 10998 |
. . . . . . . . 9
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → ((i · 𝑅) · 𝑥) = (i · (𝑅 · 𝑥))) |
10 | | simplrr 775 |
. . . . . . . . . 10
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → (𝑅 · 𝑥) = 1) |
11 | 10 | oveq2d 7291 |
. . . . . . . . 9
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → (i · (𝑅 · 𝑥)) = (i · 1)) |
12 | | it1ei 40418 |
. . . . . . . . . 10
⊢ (i
· 1) = i |
13 | 12 | a1i 11 |
. . . . . . . . 9
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → (i · 1) =
i) |
14 | 9, 11, 13 | 3eqtrd 2782 |
. . . . . . . 8
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → ((i · 𝑅) · 𝑥) = i) |
15 | | simpr 485 |
. . . . . . . . 9
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → (i · 𝑅) ∈
ℝ) |
16 | 15, 7 | remulcld 11005 |
. . . . . . . 8
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → ((i · 𝑅) · 𝑥) ∈ ℝ) |
17 | 14, 16 | eqeltrrd 2840 |
. . . . . . 7
⊢ ((((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) ∧ (i · 𝑅) ∈ ℝ) → i ∈
ℝ) |
18 | 17 | ex 413 |
. . . . . 6
⊢ (((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) → ((i · 𝑅) ∈ ℝ → i ∈
ℝ)) |
19 | 2, 18 | mtoi 198 |
. . . . 5
⊢ (((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) ∧ (𝑥 ∈ ℝ ∧ (𝑅 · 𝑥) = 1)) → ¬ (i · 𝑅) ∈
ℝ) |
20 | 1, 19 | rexlimddv 3220 |
. . . 4
⊢ ((𝑅 ∈ ℝ ∧ 𝑅 ≠ 0) → ¬ (i
· 𝑅) ∈
ℝ) |
21 | 20 | ex 413 |
. . 3
⊢ (𝑅 ∈ ℝ → (𝑅 ≠ 0 → ¬ (i ·
𝑅) ∈
ℝ)) |
22 | 21 | necon4ad 2962 |
. 2
⊢ (𝑅 ∈ ℝ → ((i
· 𝑅) ∈ ℝ
→ 𝑅 =
0)) |
23 | | oveq2 7283 |
. . 3
⊢ (𝑅 = 0 → (i · 𝑅) = (i ·
0)) |
24 | | sn-it0e0 40397 |
. . . 4
⊢ (i
· 0) = 0 |
25 | | 0re 10977 |
. . . 4
⊢ 0 ∈
ℝ |
26 | 24, 25 | eqeltri 2835 |
. . 3
⊢ (i
· 0) ∈ ℝ |
27 | 23, 26 | eqeltrdi 2847 |
. 2
⊢ (𝑅 = 0 → (i · 𝑅) ∈
ℝ) |
28 | 22, 27 | impbid1 224 |
1
⊢ (𝑅 ∈ ℝ → ((i
· 𝑅) ∈ ℝ
↔ 𝑅 =
0)) |