Proof of Theorem root1eq1
| Step | Hyp | Ref | Expression | 
|---|
| 1 |  | 2re 12341 | . . . . . . . 8
⊢ 2 ∈
ℝ | 
| 2 |  | simpl 482 | . . . . . . . 8
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → 𝑁 ∈
ℕ) | 
| 3 |  | nndivre 12308 | . . . . . . . 8
⊢ ((2
∈ ℝ ∧ 𝑁
∈ ℕ) → (2 / 𝑁) ∈ ℝ) | 
| 4 | 1, 2, 3 | sylancr 587 | . . . . . . 7
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (2 /
𝑁) ∈
ℝ) | 
| 5 | 4 | recnd 11290 | . . . . . 6
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (2 /
𝑁) ∈
ℂ) | 
| 6 |  | ax-icn 11215 | . . . . . . . 8
⊢ i ∈
ℂ | 
| 7 |  | picn 26502 | . . . . . . . 8
⊢ π
∈ ℂ | 
| 8 | 6, 7 | mulcli 11269 | . . . . . . 7
⊢ (i
· π) ∈ ℂ | 
| 9 | 8 | a1i 11 | . . . . . 6
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (i
· π) ∈ ℂ) | 
| 10 | 5, 9 | mulcld 11282 | . . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → ((2 /
𝑁) · (i ·
π)) ∈ ℂ) | 
| 11 |  | efexp 16138 | . . . . 5
⊢ ((((2 /
𝑁) · (i ·
π)) ∈ ℂ ∧ 𝐾 ∈ ℤ) → (exp‘(𝐾 · ((2 / 𝑁) · (i · π))))
= ((exp‘((2 / 𝑁)
· (i · π)))↑𝐾)) | 
| 12 | 10, 11 | sylancom 588 | . . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
(exp‘(𝐾 · ((2
/ 𝑁) · (i ·
π)))) = ((exp‘((2 / 𝑁) · (i · π)))↑𝐾)) | 
| 13 |  | zcn 12620 | . . . . . . . . 9
⊢ (𝐾 ∈ ℤ → 𝐾 ∈
ℂ) | 
| 14 | 13 | adantl 481 | . . . . . . . 8
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → 𝐾 ∈
ℂ) | 
| 15 |  | nncn 12275 | . . . . . . . . 9
⊢ (𝑁 ∈ ℕ → 𝑁 ∈
ℂ) | 
| 16 | 15 | adantr 480 | . . . . . . . 8
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → 𝑁 ∈
ℂ) | 
| 17 |  | 2cn 12342 | . . . . . . . . 9
⊢ 2 ∈
ℂ | 
| 18 | 17 | a1i 11 | . . . . . . . 8
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → 2 ∈
ℂ) | 
| 19 |  | nnne0 12301 | . . . . . . . . 9
⊢ (𝑁 ∈ ℕ → 𝑁 ≠ 0) | 
| 20 | 19 | adantr 480 | . . . . . . . 8
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → 𝑁 ≠ 0) | 
| 21 | 14, 16, 18, 20 | div32d 12067 | . . . . . . 7
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → ((𝐾 / 𝑁) · 2) = (𝐾 · (2 / 𝑁))) | 
| 22 | 21 | oveq1d 7447 | . . . . . 6
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (((𝐾 / 𝑁) · 2) · (i · π)) =
((𝐾 · (2 / 𝑁)) · (i ·
π))) | 
| 23 | 14, 16, 20 | divcld 12044 | . . . . . . 7
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (𝐾 / 𝑁) ∈ ℂ) | 
| 24 | 23, 18, 9 | mulassd 11285 | . . . . . 6
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (((𝐾 / 𝑁) · 2) · (i · π)) =
((𝐾 / 𝑁) · (2 · (i ·
π)))) | 
| 25 | 14, 5, 9 | mulassd 11285 | . . . . . 6
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → ((𝐾 · (2 / 𝑁)) · (i · π)) = (𝐾 · ((2 / 𝑁) · (i ·
π)))) | 
| 26 | 22, 24, 25 | 3eqtr3d 2784 | . . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → ((𝐾 / 𝑁) · (2 · (i · π))) =
(𝐾 · ((2 / 𝑁) · (i ·
π)))) | 
| 27 | 26 | fveq2d 6909 | . . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
(exp‘((𝐾 / 𝑁) · (2 · (i
· π)))) = (exp‘(𝐾 · ((2 / 𝑁) · (i ·
π))))) | 
| 28 |  | neg1cn 12381 | . . . . . . . 8
⊢ -1 ∈
ℂ | 
| 29 | 28 | a1i 11 | . . . . . . 7
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → -1
∈ ℂ) | 
| 30 |  | neg1ne0 12383 | . . . . . . . 8
⊢ -1 ≠
0 | 
| 31 | 30 | a1i 11 | . . . . . . 7
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → -1 ≠
0) | 
| 32 | 29, 31, 5 | cxpefd 26755 | . . . . . 6
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
(-1↑𝑐(2 / 𝑁)) = (exp‘((2 / 𝑁) ·
(log‘-1)))) | 
| 33 |  | logm1 26632 | . . . . . . . 8
⊢
(log‘-1) = (i · π) | 
| 34 | 33 | oveq2i 7443 | . . . . . . 7
⊢ ((2 /
𝑁) · (log‘-1))
= ((2 / 𝑁) · (i
· π)) | 
| 35 | 34 | fveq2i 6908 | . . . . . 6
⊢
(exp‘((2 / 𝑁)
· (log‘-1))) = (exp‘((2 / 𝑁) · (i ·
π))) | 
| 36 | 32, 35 | eqtrdi 2792 | . . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
(-1↑𝑐(2 / 𝑁)) = (exp‘((2 / 𝑁) · (i ·
π)))) | 
| 37 | 36 | oveq1d 7447 | . . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
((-1↑𝑐(2 / 𝑁))↑𝐾) = ((exp‘((2 / 𝑁) · (i · π)))↑𝐾)) | 
| 38 | 12, 27, 37 | 3eqtr4rd 2787 | . . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
((-1↑𝑐(2 / 𝑁))↑𝐾) = (exp‘((𝐾 / 𝑁) · (2 · (i ·
π))))) | 
| 39 | 38 | eqeq1d 2738 | . 2
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
(((-1↑𝑐(2 / 𝑁))↑𝐾) = 1 ↔ (exp‘((𝐾 / 𝑁) · (2 · (i · π))))
= 1)) | 
| 40 | 17, 8 | mulcli 11269 | . . . 4
⊢ (2
· (i · π)) ∈ ℂ | 
| 41 |  | mulcl 11240 | . . . 4
⊢ (((𝐾 / 𝑁) ∈ ℂ ∧ (2 · (i
· π)) ∈ ℂ) → ((𝐾 / 𝑁) · (2 · (i · π)))
∈ ℂ) | 
| 42 | 23, 40, 41 | sylancl 586 | . . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → ((𝐾 / 𝑁) · (2 · (i · π)))
∈ ℂ) | 
| 43 |  | efeq1 26571 | . . 3
⊢ (((𝐾 / 𝑁) · (2 · (i · π)))
∈ ℂ → ((exp‘((𝐾 / 𝑁) · (2 · (i · π))))
= 1 ↔ (((𝐾 / 𝑁) · (2 · (i
· π))) / (i · (2 · π))) ∈
ℤ)) | 
| 44 | 42, 43 | syl 17 | . 2
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
((exp‘((𝐾 / 𝑁) · (2 · (i
· π)))) = 1 ↔ (((𝐾 / 𝑁) · (2 · (i · π))) /
(i · (2 · π))) ∈ ℤ)) | 
| 45 | 6, 17, 7 | mul12i 11457 | . . . . . 6
⊢ (i
· (2 · π)) = (2 · (i · π)) | 
| 46 | 45 | oveq2i 7443 | . . . . 5
⊢ (((𝐾 / 𝑁) · (2 · (i · π))) /
(i · (2 · π))) = (((𝐾 / 𝑁) · (2 · (i · π))) /
(2 · (i · π))) | 
| 47 | 40 | a1i 11 | . . . . . 6
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (2
· (i · π)) ∈ ℂ) | 
| 48 |  | 2ne0 12371 | . . . . . . . 8
⊢ 2 ≠
0 | 
| 49 |  | ine0 11699 | . . . . . . . . 9
⊢ i ≠
0 | 
| 50 |  | pire 26501 | . . . . . . . . . 10
⊢ π
∈ ℝ | 
| 51 |  | pipos 26503 | . . . . . . . . . 10
⊢ 0 <
π | 
| 52 | 50, 51 | gt0ne0ii 11800 | . . . . . . . . 9
⊢ π ≠
0 | 
| 53 | 6, 7, 49, 52 | mulne0i 11907 | . . . . . . . 8
⊢ (i
· π) ≠ 0 | 
| 54 | 17, 8, 48, 53 | mulne0i 11907 | . . . . . . 7
⊢ (2
· (i · π)) ≠ 0 | 
| 55 | 54 | a1i 11 | . . . . . 6
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (2
· (i · π)) ≠ 0) | 
| 56 | 23, 47, 55 | divcan4d 12050 | . . . . 5
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (((𝐾 / 𝑁) · (2 · (i · π))) /
(2 · (i · π))) = (𝐾 / 𝑁)) | 
| 57 | 46, 56 | eqtrid 2788 | . . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (((𝐾 / 𝑁) · (2 · (i · π))) /
(i · (2 · π))) = (𝐾 / 𝑁)) | 
| 58 | 57 | eleq1d 2825 | . . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
((((𝐾 / 𝑁) · (2 · (i · π))) /
(i · (2 · π))) ∈ ℤ ↔ (𝐾 / 𝑁) ∈ ℤ)) | 
| 59 |  | nnz 12636 | . . . . 5
⊢ (𝑁 ∈ ℕ → 𝑁 ∈
ℤ) | 
| 60 | 59 | adantr 480 | . . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → 𝑁 ∈
ℤ) | 
| 61 |  | simpr 484 | . . . 4
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → 𝐾 ∈
ℤ) | 
| 62 |  | dvdsval2 16294 | . . . 4
⊢ ((𝑁 ∈ ℤ ∧ 𝑁 ≠ 0 ∧ 𝐾 ∈ ℤ) → (𝑁 ∥ 𝐾 ↔ (𝐾 / 𝑁) ∈ ℤ)) | 
| 63 | 60, 20, 61, 62 | syl3anc 1372 | . . 3
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) → (𝑁 ∥ 𝐾 ↔ (𝐾 / 𝑁) ∈ ℤ)) | 
| 64 | 58, 63 | bitr4d 282 | . 2
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
((((𝐾 / 𝑁) · (2 · (i · π))) /
(i · (2 · π))) ∈ ℤ ↔ 𝑁 ∥ 𝐾)) | 
| 65 | 39, 44, 64 | 3bitrd 305 | 1
⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ ℤ) →
(((-1↑𝑐(2 / 𝑁))↑𝐾) = 1 ↔ 𝑁 ∥ 𝐾)) |