Step | Hyp | Ref
| Expression |
1 | | ssdif0 4297 |
. . . 4
⊢ (𝑅 ⊆ ℝ ↔ (𝑅 ∖ ℝ) =
∅) |
2 | | simpr 485 |
. . . . . 6
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑅 ⊆ ℝ) → 𝑅 ⊆ ℝ) |
3 | | simplr 766 |
. . . . . 6
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑅 ⊆ ℝ) → ℝ ⊆
𝑅) |
4 | 2, 3 | eqssd 3938 |
. . . . 5
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑅 ⊆ ℝ) → 𝑅 = ℝ) |
5 | 4 | orcd 870 |
. . . 4
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑅 ⊆ ℝ) → (𝑅 = ℝ ∨ 𝑅 = ℂ)) |
6 | 1, 5 | sylan2br 595 |
. . 3
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑅 ∖ ℝ) = ∅) → (𝑅 = ℝ ∨ 𝑅 = ℂ)) |
7 | | n0 4280 |
. . . 4
⊢ ((𝑅 ∖ ℝ) ≠ ∅
↔ ∃𝑥 𝑥 ∈ (𝑅 ∖ ℝ)) |
8 | | simpll 764 |
. . . . . . . . . 10
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → 𝑅 ∈
(SubRing‘ℂfld)) |
9 | | cnfldbas 20601 |
. . . . . . . . . . 11
⊢ ℂ =
(Base‘ℂfld) |
10 | 9 | subrgss 20025 |
. . . . . . . . . 10
⊢ (𝑅 ∈
(SubRing‘ℂfld) → 𝑅 ⊆ ℂ) |
11 | 8, 10 | syl 17 |
. . . . . . . . 9
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → 𝑅 ⊆ ℂ) |
12 | | replim 14827 |
. . . . . . . . . . . . 13
⊢ (𝑦 ∈ ℂ → 𝑦 = ((ℜ‘𝑦) + (i ·
(ℑ‘𝑦)))) |
13 | 12 | ad2antll 726 |
. . . . . . . . . . . 12
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → 𝑦 = ((ℜ‘𝑦) + (i · (ℑ‘𝑦)))) |
14 | | simpll 764 |
. . . . . . . . . . . . 13
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → 𝑅 ∈
(SubRing‘ℂfld)) |
15 | | simplr 766 |
. . . . . . . . . . . . . 14
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → ℝ ⊆
𝑅) |
16 | | recl 14821 |
. . . . . . . . . . . . . . 15
⊢ (𝑦 ∈ ℂ →
(ℜ‘𝑦) ∈
ℝ) |
17 | 16 | ad2antll 726 |
. . . . . . . . . . . . . 14
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → (ℜ‘𝑦) ∈
ℝ) |
18 | 15, 17 | sseldd 3922 |
. . . . . . . . . . . . 13
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → (ℜ‘𝑦) ∈ 𝑅) |
19 | | ax-icn 10930 |
. . . . . . . . . . . . . . . . . . 19
⊢ i ∈
ℂ |
20 | 19 | a1i 11 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → i ∈
ℂ) |
21 | | eldifi 4061 |
. . . . . . . . . . . . . . . . . . . . . 22
⊢ (𝑥 ∈ (𝑅 ∖ ℝ) → 𝑥 ∈ 𝑅) |
22 | 21 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → 𝑥 ∈ 𝑅) |
23 | 11, 22 | sseldd 3922 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → 𝑥 ∈ ℂ) |
24 | | imcl 14822 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑥 ∈ ℂ →
(ℑ‘𝑥) ∈
ℝ) |
25 | 23, 24 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) →
(ℑ‘𝑥) ∈
ℝ) |
26 | 25 | recnd 11003 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) →
(ℑ‘𝑥) ∈
ℂ) |
27 | | eldifn 4062 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑥 ∈ (𝑅 ∖ ℝ) → ¬ 𝑥 ∈
ℝ) |
28 | 27 | adantl 482 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → ¬ 𝑥 ∈
ℝ) |
29 | | reim0b 14830 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝑥 ∈ ℂ → (𝑥 ∈ ℝ ↔
(ℑ‘𝑥) =
0)) |
30 | 29 | necon3bbid 2981 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (𝑥 ∈ ℂ → (¬
𝑥 ∈ ℝ ↔
(ℑ‘𝑥) ≠
0)) |
31 | 23, 30 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (¬ 𝑥 ∈ ℝ ↔
(ℑ‘𝑥) ≠
0)) |
32 | 28, 31 | mpbid 231 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) →
(ℑ‘𝑥) ≠
0) |
33 | 20, 26, 32 | divcan4d 11757 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → ((i ·
(ℑ‘𝑥)) /
(ℑ‘𝑥)) =
i) |
34 | | mulcl 10955 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((i
∈ ℂ ∧ (ℑ‘𝑥) ∈ ℂ) → (i ·
(ℑ‘𝑥)) ∈
ℂ) |
35 | 19, 26, 34 | sylancr 587 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (i ·
(ℑ‘𝑥)) ∈
ℂ) |
36 | 35, 26, 32 | divrecd 11754 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → ((i ·
(ℑ‘𝑥)) /
(ℑ‘𝑥)) = ((i
· (ℑ‘𝑥))
· (1 / (ℑ‘𝑥)))) |
37 | 33, 36 | eqtr3d 2780 |
. . . . . . . . . . . . . . . 16
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → i = ((i ·
(ℑ‘𝑥)) ·
(1 / (ℑ‘𝑥)))) |
38 | 23 | recld 14905 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) →
(ℜ‘𝑥) ∈
ℝ) |
39 | 38 | recnd 11003 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) →
(ℜ‘𝑥) ∈
ℂ) |
40 | 23, 39 | negsubd 11338 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (𝑥 + -(ℜ‘𝑥)) = (𝑥 − (ℜ‘𝑥))) |
41 | | replim 14827 |
. . . . . . . . . . . . . . . . . . . . 21
⊢ (𝑥 ∈ ℂ → 𝑥 = ((ℜ‘𝑥) + (i ·
(ℑ‘𝑥)))) |
42 | 23, 41 | syl 17 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → 𝑥 = ((ℜ‘𝑥) + (i · (ℑ‘𝑥)))) |
43 | 42 | oveq1d 7290 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (𝑥 − (ℜ‘𝑥)) = (((ℜ‘𝑥) + (i ·
(ℑ‘𝑥))) −
(ℜ‘𝑥))) |
44 | 39, 35 | pncan2d 11334 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) →
(((ℜ‘𝑥) + (i
· (ℑ‘𝑥))) − (ℜ‘𝑥)) = (i · (ℑ‘𝑥))) |
45 | 40, 43, 44 | 3eqtrd 2782 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (𝑥 + -(ℜ‘𝑥)) = (i ·
(ℑ‘𝑥))) |
46 | | simplr 766 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → ℝ ⊆
𝑅) |
47 | 38 | renegcld 11402 |
. . . . . . . . . . . . . . . . . . . 20
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) →
-(ℜ‘𝑥) ∈
ℝ) |
48 | 46, 47 | sseldd 3922 |
. . . . . . . . . . . . . . . . . . 19
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) →
-(ℜ‘𝑥) ∈
𝑅) |
49 | | cnfldadd 20602 |
. . . . . . . . . . . . . . . . . . . 20
⊢ + =
(+g‘ℂfld) |
50 | 49 | subrgacl 20035 |
. . . . . . . . . . . . . . . . . . 19
⊢ ((𝑅 ∈
(SubRing‘ℂfld) ∧ 𝑥 ∈ 𝑅 ∧ -(ℜ‘𝑥) ∈ 𝑅) → (𝑥 + -(ℜ‘𝑥)) ∈ 𝑅) |
51 | 8, 22, 48, 50 | syl3anc 1370 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (𝑥 + -(ℜ‘𝑥)) ∈ 𝑅) |
52 | 45, 51 | eqeltrrd 2840 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (i ·
(ℑ‘𝑥)) ∈
𝑅) |
53 | 25, 32 | rereccld 11802 |
. . . . . . . . . . . . . . . . . 18
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (1 /
(ℑ‘𝑥)) ∈
ℝ) |
54 | 46, 53 | sseldd 3922 |
. . . . . . . . . . . . . . . . 17
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (1 /
(ℑ‘𝑥)) ∈
𝑅) |
55 | | cnfldmul 20603 |
. . . . . . . . . . . . . . . . . 18
⊢ ·
= (.r‘ℂfld) |
56 | 55 | subrgmcl 20036 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑅 ∈
(SubRing‘ℂfld) ∧ (i · (ℑ‘𝑥)) ∈ 𝑅 ∧ (1 / (ℑ‘𝑥)) ∈ 𝑅) → ((i · (ℑ‘𝑥)) · (1 /
(ℑ‘𝑥))) ∈
𝑅) |
57 | 8, 52, 54, 56 | syl3anc 1370 |
. . . . . . . . . . . . . . . 16
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → ((i ·
(ℑ‘𝑥)) ·
(1 / (ℑ‘𝑥)))
∈ 𝑅) |
58 | 37, 57 | eqeltrd 2839 |
. . . . . . . . . . . . . . 15
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → i ∈ 𝑅) |
59 | 58 | adantrr 714 |
. . . . . . . . . . . . . 14
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → i ∈ 𝑅) |
60 | | imcl 14822 |
. . . . . . . . . . . . . . . 16
⊢ (𝑦 ∈ ℂ →
(ℑ‘𝑦) ∈
ℝ) |
61 | 60 | ad2antll 726 |
. . . . . . . . . . . . . . 15
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → (ℑ‘𝑦) ∈
ℝ) |
62 | 15, 61 | sseldd 3922 |
. . . . . . . . . . . . . 14
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → (ℑ‘𝑦) ∈ 𝑅) |
63 | 55 | subrgmcl 20036 |
. . . . . . . . . . . . . 14
⊢ ((𝑅 ∈
(SubRing‘ℂfld) ∧ i ∈ 𝑅 ∧ (ℑ‘𝑦) ∈ 𝑅) → (i · (ℑ‘𝑦)) ∈ 𝑅) |
64 | 14, 59, 62, 63 | syl3anc 1370 |
. . . . . . . . . . . . 13
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → (i ·
(ℑ‘𝑦)) ∈
𝑅) |
65 | 49 | subrgacl 20035 |
. . . . . . . . . . . . 13
⊢ ((𝑅 ∈
(SubRing‘ℂfld) ∧ (ℜ‘𝑦) ∈ 𝑅 ∧ (i · (ℑ‘𝑦)) ∈ 𝑅) → ((ℜ‘𝑦) + (i · (ℑ‘𝑦))) ∈ 𝑅) |
66 | 14, 18, 64, 65 | syl3anc 1370 |
. . . . . . . . . . . 12
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → ((ℜ‘𝑦) + (i ·
(ℑ‘𝑦))) ∈
𝑅) |
67 | 13, 66 | eqeltrd 2839 |
. . . . . . . . . . 11
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑥 ∈ (𝑅 ∖ ℝ) ∧ 𝑦 ∈ ℂ)) → 𝑦 ∈ 𝑅) |
68 | 67 | expr 457 |
. . . . . . . . . 10
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (𝑦 ∈ ℂ → 𝑦 ∈ 𝑅)) |
69 | 68 | ssrdv 3927 |
. . . . . . . . 9
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → ℂ ⊆
𝑅) |
70 | 11, 69 | eqssd 3938 |
. . . . . . . 8
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → 𝑅 = ℂ) |
71 | 70 | olcd 871 |
. . . . . . 7
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ 𝑥 ∈ (𝑅 ∖ ℝ)) → (𝑅 = ℝ ∨ 𝑅 = ℂ)) |
72 | 71 | ex 413 |
. . . . . 6
⊢ ((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) → (𝑥 ∈ (𝑅 ∖ ℝ) → (𝑅 = ℝ ∨ 𝑅 = ℂ))) |
73 | 72 | exlimdv 1936 |
. . . . 5
⊢ ((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) → (∃𝑥 𝑥 ∈ (𝑅 ∖ ℝ) → (𝑅 = ℝ ∨ 𝑅 = ℂ))) |
74 | 73 | imp 407 |
. . . 4
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ ∃𝑥 𝑥 ∈ (𝑅 ∖ ℝ)) → (𝑅 = ℝ ∨ 𝑅 = ℂ)) |
75 | 7, 74 | sylan2b 594 |
. . 3
⊢ (((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) ∧ (𝑅 ∖ ℝ) ≠ ∅) →
(𝑅 = ℝ ∨ 𝑅 = ℂ)) |
76 | 6, 75 | pm2.61dane 3032 |
. 2
⊢ ((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) → (𝑅 = ℝ ∨ 𝑅 = ℂ)) |
77 | | elprg 4582 |
. . 3
⊢ (𝑅 ∈
(SubRing‘ℂfld) → (𝑅 ∈ {ℝ, ℂ} ↔ (𝑅 = ℝ ∨ 𝑅 = ℂ))) |
78 | 77 | adantr 481 |
. 2
⊢ ((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) → (𝑅 ∈ {ℝ, ℂ} ↔ (𝑅 = ℝ ∨ 𝑅 = ℂ))) |
79 | 76, 78 | mpbird 256 |
1
⊢ ((𝑅 ∈
(SubRing‘ℂfld) ∧ ℝ ⊆ 𝑅) → 𝑅 ∈ {ℝ, ℂ}) |