Proof of Theorem absexpz
Step | Hyp | Ref
| Expression |
1 | | elznn0nn 12333 |
. 2
⊢ (𝑁 ∈ ℤ ↔ (𝑁 ∈ ℕ0 ∨
(𝑁 ∈ ℝ ∧
-𝑁 ∈
ℕ))) |
2 | | absexp 15016 |
. . . . . 6
⊢ ((𝐴 ∈ ℂ ∧ 𝑁 ∈ ℕ0)
→ (abs‘(𝐴↑𝑁)) = ((abs‘𝐴)↑𝑁)) |
3 | 2 | ex 413 |
. . . . 5
⊢ (𝐴 ∈ ℂ → (𝑁 ∈ ℕ0
→ (abs‘(𝐴↑𝑁)) = ((abs‘𝐴)↑𝑁))) |
4 | 3 | adantr 481 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → (𝑁 ∈ ℕ0
→ (abs‘(𝐴↑𝑁)) = ((abs‘𝐴)↑𝑁))) |
5 | | 1cnd 10970 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → 1
∈ ℂ) |
6 | | simpll 764 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → 𝐴 ∈
ℂ) |
7 | | nnnn0 12240 |
. . . . . . . . . 10
⊢ (-𝑁 ∈ ℕ → -𝑁 ∈
ℕ0) |
8 | 7 | ad2antll 726 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → -𝑁 ∈
ℕ0) |
9 | 6, 8 | expcld 13864 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → (𝐴↑-𝑁) ∈ ℂ) |
10 | | simplr 766 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → 𝐴 ≠ 0) |
11 | | nnz 12342 |
. . . . . . . . . 10
⊢ (-𝑁 ∈ ℕ → -𝑁 ∈
ℤ) |
12 | 11 | ad2antll 726 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → -𝑁 ∈
ℤ) |
13 | 6, 10, 12 | expne0d 13870 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → (𝐴↑-𝑁) ≠ 0) |
14 | | absdiv 15007 |
. . . . . . . 8
⊢ ((1
∈ ℂ ∧ (𝐴↑-𝑁) ∈ ℂ ∧ (𝐴↑-𝑁) ≠ 0) → (abs‘(1 / (𝐴↑-𝑁))) = ((abs‘1) / (abs‘(𝐴↑-𝑁)))) |
15 | 5, 9, 13, 14 | syl3anc 1370 |
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) →
(abs‘(1 / (𝐴↑-𝑁))) = ((abs‘1) / (abs‘(𝐴↑-𝑁)))) |
16 | | abs1 15009 |
. . . . . . . . 9
⊢
(abs‘1) = 1 |
17 | 16 | oveq1i 7285 |
. . . . . . . 8
⊢
((abs‘1) / (abs‘(𝐴↑-𝑁))) = (1 / (abs‘(𝐴↑-𝑁))) |
18 | | absexp 15016 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℂ ∧ -𝑁 ∈ ℕ0)
→ (abs‘(𝐴↑-𝑁)) = ((abs‘𝐴)↑-𝑁)) |
19 | 6, 8, 18 | syl2anc 584 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) →
(abs‘(𝐴↑-𝑁)) = ((abs‘𝐴)↑-𝑁)) |
20 | 19 | oveq2d 7291 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → (1 /
(abs‘(𝐴↑-𝑁))) = (1 / ((abs‘𝐴)↑-𝑁))) |
21 | 17, 20 | eqtrid 2790 |
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) →
((abs‘1) / (abs‘(𝐴↑-𝑁))) = (1 / ((abs‘𝐴)↑-𝑁))) |
22 | 15, 21 | eqtrd 2778 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) →
(abs‘(1 / (𝐴↑-𝑁))) = (1 / ((abs‘𝐴)↑-𝑁))) |
23 | | simprl 768 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → 𝑁 ∈
ℝ) |
24 | 23 | recnd 11003 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → 𝑁 ∈
ℂ) |
25 | | expneg2 13791 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℂ ∧ 𝑁 ∈ ℂ ∧ -𝑁 ∈ ℕ0)
→ (𝐴↑𝑁) = (1 / (𝐴↑-𝑁))) |
26 | 6, 24, 8, 25 | syl3anc 1370 |
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) → (𝐴↑𝑁) = (1 / (𝐴↑-𝑁))) |
27 | 26 | fveq2d 6778 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) →
(abs‘(𝐴↑𝑁)) = (abs‘(1 / (𝐴↑-𝑁)))) |
28 | | abscl 14990 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℂ →
(abs‘𝐴) ∈
ℝ) |
29 | 28 | ad2antrr 723 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) →
(abs‘𝐴) ∈
ℝ) |
30 | 29 | recnd 11003 |
. . . . . . 7
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) →
(abs‘𝐴) ∈
ℂ) |
31 | | expneg2 13791 |
. . . . . . 7
⊢
(((abs‘𝐴)
∈ ℂ ∧ 𝑁
∈ ℂ ∧ -𝑁
∈ ℕ0) → ((abs‘𝐴)↑𝑁) = (1 / ((abs‘𝐴)↑-𝑁))) |
32 | 30, 24, 8, 31 | syl3anc 1370 |
. . . . . 6
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) →
((abs‘𝐴)↑𝑁) = (1 / ((abs‘𝐴)↑-𝑁))) |
33 | 22, 27, 32 | 3eqtr4d 2788 |
. . . . 5
⊢ (((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) ∧ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ)) →
(abs‘(𝐴↑𝑁)) = ((abs‘𝐴)↑𝑁)) |
34 | 33 | ex 413 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → ((𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ) →
(abs‘(𝐴↑𝑁)) = ((abs‘𝐴)↑𝑁))) |
35 | 4, 34 | jaod 856 |
. . 3
⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0) → ((𝑁 ∈ ℕ0 ∨
(𝑁 ∈ ℝ ∧
-𝑁 ∈ ℕ)) →
(abs‘(𝐴↑𝑁)) = ((abs‘𝐴)↑𝑁))) |
36 | 35 | 3impia 1116 |
. 2
⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ (𝑁 ∈ ℕ0 ∨ (𝑁 ∈ ℝ ∧ -𝑁 ∈ ℕ))) →
(abs‘(𝐴↑𝑁)) = ((abs‘𝐴)↑𝑁)) |
37 | 1, 36 | syl3an3b 1404 |
1
⊢ ((𝐴 ∈ ℂ ∧ 𝐴 ≠ 0 ∧ 𝑁 ∈ ℤ) → (abs‘(𝐴↑𝑁)) = ((abs‘𝐴)↑𝑁)) |