Proof of Theorem abs00ap
| Step | Hyp | Ref
| Expression |
| 1 | | absval2 11239 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℂ →
(abs‘𝐴) =
(√‘(((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)))) |
| 2 | 1 | breq1d 4044 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℂ →
((abs‘𝐴) # 0 ↔
(√‘(((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) #
0)) |
| 3 | | sqrt0 11186 |
. . . . . . . . . 10
⊢
(√‘0) = 0 |
| 4 | 3 | breq2i 4042 |
. . . . . . . . 9
⊢
((√‘(((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) # (√‘0)
↔ (√‘(((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) #
0) |
| 5 | 2, 4 | bitr4di 198 |
. . . . . . . 8
⊢ (𝐴 ∈ ℂ →
((abs‘𝐴) # 0 ↔
(√‘(((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) #
(√‘0))) |
| 6 | | recl 11035 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℝ) |
| 7 | 6 | resqcld 10808 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℂ →
((ℜ‘𝐴)↑2)
∈ ℝ) |
| 8 | | imcl 11036 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℝ) |
| 9 | 8 | resqcld 10808 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴)↑2)
∈ ℝ) |
| 10 | 7, 9 | readdcld 8073 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴)↑2)
+ ((ℑ‘𝐴)↑2)) ∈ ℝ) |
| 11 | 6 | sqge0d 10809 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℂ → 0 ≤
((ℜ‘𝐴)↑2)) |
| 12 | 8 | sqge0d 10809 |
. . . . . . . . . 10
⊢ (𝐴 ∈ ℂ → 0 ≤
((ℑ‘𝐴)↑2)) |
| 13 | 7, 9, 11, 12 | addge0d 8566 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℂ → 0 ≤
(((ℜ‘𝐴)↑2)
+ ((ℑ‘𝐴)↑2))) |
| 14 | | 0red 8044 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℂ → 0 ∈
ℝ) |
| 15 | 14 | leidd 8558 |
. . . . . . . . 9
⊢ (𝐴 ∈ ℂ → 0 ≤
0) |
| 16 | | sqrt11ap 11220 |
. . . . . . . . 9
⊢
((((((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)) ∈ ℝ ∧
0 ≤ (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) ∧ (0 ∈
ℝ ∧ 0 ≤ 0)) → ((√‘(((ℜ‘𝐴)↑2) +
((ℑ‘𝐴)↑2))) # (√‘0) ↔
(((ℜ‘𝐴)↑2)
+ ((ℑ‘𝐴)↑2)) # 0)) |
| 17 | 10, 13, 14, 15, 16 | syl22anc 1250 |
. . . . . . . 8
⊢ (𝐴 ∈ ℂ →
((√‘(((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2))) # (√‘0)
↔ (((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)) #
0)) |
| 18 | 5, 17 | bitrd 188 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
((abs‘𝐴) # 0 ↔
(((ℜ‘𝐴)↑2)
+ ((ℑ‘𝐴)↑2)) # 0)) |
| 19 | | 00id 8184 |
. . . . . . . 8
⊢ (0 + 0) =
0 |
| 20 | 19 | breq2i 4042 |
. . . . . . 7
⊢
((((ℜ‘𝐴)↑2) + ((ℑ‘𝐴)↑2)) # (0 + 0) ↔
(((ℜ‘𝐴)↑2)
+ ((ℑ‘𝐴)↑2)) # 0) |
| 21 | 18, 20 | bitr4di 198 |
. . . . . 6
⊢ (𝐴 ∈ ℂ →
((abs‘𝐴) # 0 ↔
(((ℜ‘𝐴)↑2)
+ ((ℑ‘𝐴)↑2)) # (0 + 0))) |
| 22 | 7 | recnd 8072 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
((ℜ‘𝐴)↑2)
∈ ℂ) |
| 23 | 9 | recnd 8072 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
((ℑ‘𝐴)↑2)
∈ ℂ) |
| 24 | | 0cnd 8036 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ → 0 ∈
ℂ) |
| 25 | | addext 8654 |
. . . . . . 7
⊢
(((((ℜ‘𝐴)↑2) ∈ ℂ ∧
((ℑ‘𝐴)↑2)
∈ ℂ) ∧ (0 ∈ ℂ ∧ 0 ∈ ℂ)) →
((((ℜ‘𝐴)↑2)
+ ((ℑ‘𝐴)↑2)) # (0 + 0) →
(((ℜ‘𝐴)↑2)
# 0 ∨ ((ℑ‘𝐴)↑2) # 0))) |
| 26 | 22, 23, 24, 24, 25 | syl22anc 1250 |
. . . . . 6
⊢ (𝐴 ∈ ℂ →
((((ℜ‘𝐴)↑2)
+ ((ℑ‘𝐴)↑2)) # (0 + 0) →
(((ℜ‘𝐴)↑2)
# 0 ∨ ((ℑ‘𝐴)↑2) # 0))) |
| 27 | 21, 26 | sylbid 150 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
((abs‘𝐴) # 0 →
(((ℜ‘𝐴)↑2)
# 0 ∨ ((ℑ‘𝐴)↑2) # 0))) |
| 28 | 6 | recnd 8072 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
(ℜ‘𝐴) ∈
ℂ) |
| 29 | | 2nn 9169 |
. . . . . . 7
⊢ 2 ∈
ℕ |
| 30 | | expap0 10678 |
. . . . . . 7
⊢
(((ℜ‘𝐴)
∈ ℂ ∧ 2 ∈ ℕ) → (((ℜ‘𝐴)↑2) # 0 ↔ (ℜ‘𝐴) # 0)) |
| 31 | 28, 29, 30 | sylancl 413 |
. . . . . 6
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴)↑2)
# 0 ↔ (ℜ‘𝐴)
# 0)) |
| 32 | 8 | recnd 8072 |
. . . . . . 7
⊢ (𝐴 ∈ ℂ →
(ℑ‘𝐴) ∈
ℂ) |
| 33 | | expap0 10678 |
. . . . . . 7
⊢
(((ℑ‘𝐴)
∈ ℂ ∧ 2 ∈ ℕ) → (((ℑ‘𝐴)↑2) # 0 ↔
(ℑ‘𝐴) #
0)) |
| 34 | 32, 29, 33 | sylancl 413 |
. . . . . 6
⊢ (𝐴 ∈ ℂ →
(((ℑ‘𝐴)↑2)
# 0 ↔ (ℑ‘𝐴) # 0)) |
| 35 | 31, 34 | orbi12d 794 |
. . . . 5
⊢ (𝐴 ∈ ℂ →
((((ℜ‘𝐴)↑2)
# 0 ∨ ((ℑ‘𝐴)↑2) # 0) ↔ ((ℜ‘𝐴) # 0 ∨ (ℑ‘𝐴) # 0))) |
| 36 | 27, 35 | sylibd 149 |
. . . 4
⊢ (𝐴 ∈ ℂ →
((abs‘𝐴) # 0 →
((ℜ‘𝐴) # 0 ∨
(ℑ‘𝐴) #
0))) |
| 37 | | crap0 9002 |
. . . . 5
⊢
(((ℜ‘𝐴)
∈ ℝ ∧ (ℑ‘𝐴) ∈ ℝ) →
(((ℜ‘𝐴) # 0 ∨
(ℑ‘𝐴) # 0)
↔ ((ℜ‘𝐴) +
(i · (ℑ‘𝐴))) # 0)) |
| 38 | 6, 8, 37 | syl2anc 411 |
. . . 4
⊢ (𝐴 ∈ ℂ →
(((ℜ‘𝐴) # 0 ∨
(ℑ‘𝐴) # 0)
↔ ((ℜ‘𝐴) +
(i · (ℑ‘𝐴))) # 0)) |
| 39 | 36, 38 | sylibd 149 |
. . 3
⊢ (𝐴 ∈ ℂ →
((abs‘𝐴) # 0 →
((ℜ‘𝐴) + (i
· (ℑ‘𝐴))) # 0)) |
| 40 | | replim 11041 |
. . . 4
⊢ (𝐴 ∈ ℂ → 𝐴 = ((ℜ‘𝐴) + (i ·
(ℑ‘𝐴)))) |
| 41 | 40 | breq1d 4044 |
. . 3
⊢ (𝐴 ∈ ℂ → (𝐴 # 0 ↔ ((ℜ‘𝐴) + (i ·
(ℑ‘𝐴))) #
0)) |
| 42 | 39, 41 | sylibrd 169 |
. 2
⊢ (𝐴 ∈ ℂ →
((abs‘𝐴) # 0 →
𝐴 # 0)) |
| 43 | | absrpclap 11243 |
. . . 4
⊢ ((𝐴 ∈ ℂ ∧ 𝐴 # 0) → (abs‘𝐴) ∈
ℝ+) |
| 44 | 43 | rpap0d 9794 |
. . 3
⊢ ((𝐴 ∈ ℂ ∧ 𝐴 # 0) → (abs‘𝐴) # 0) |
| 45 | 44 | ex 115 |
. 2
⊢ (𝐴 ∈ ℂ → (𝐴 # 0 → (abs‘𝐴) # 0)) |
| 46 | 42, 45 | impbid 129 |
1
⊢ (𝐴 ∈ ℂ →
((abs‘𝐴) # 0 ↔
𝐴 # 0)) |