Proof of Theorem sqrtrirr
| Step | Hyp | Ref
| Expression |
| 1 | | nn0sqdcq 13004 |
. . 3
⊢ (𝐴 ∈ ℕ0
→ DECID ∃𝑞 ∈ ℚ 𝐴 = (𝑞↑2)) |
| 2 | | exmiddc 848 |
. . 3
⊢
(DECID ∃𝑞 ∈ ℚ 𝐴 = (𝑞↑2) → (∃𝑞 ∈ ℚ 𝐴 = (𝑞↑2) ∨ ¬ ∃𝑞 ∈ ℚ 𝐴 = (𝑞↑2))) |
| 3 | 1, 2 | syl 14 |
. 2
⊢ (𝐴 ∈ ℕ0
→ (∃𝑞 ∈
ℚ 𝐴 = (𝑞↑2) ∨ ¬ ∃𝑞 ∈ ℚ 𝐴 = (𝑞↑2))) |
| 4 | | simprr 537 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ0
∧ (𝑞 ∈ ℚ
∧ 𝐴 = (𝑞↑2))) → 𝐴 = (𝑞↑2)) |
| 5 | 4 | fveq2d 5699 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ0
∧ (𝑞 ∈ ℚ
∧ 𝐴 = (𝑞↑2))) →
(√‘𝐴) =
(√‘(𝑞↑2))) |
| 6 | | qre 10034 |
. . . . . . . 8
⊢ (𝑞 ∈ ℚ → 𝑞 ∈
ℝ) |
| 7 | 6 | ad2antrl 494 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ0
∧ (𝑞 ∈ ℚ
∧ 𝐴 = (𝑞↑2))) → 𝑞 ∈
ℝ) |
| 8 | 7 | absred 11943 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ0
∧ (𝑞 ∈ ℚ
∧ 𝐴 = (𝑞↑2))) →
(abs‘𝑞) =
(√‘(𝑞↑2))) |
| 9 | 5, 8 | eqtr4d 2274 |
. . . . 5
⊢ ((𝐴 ∈ ℕ0
∧ (𝑞 ∈ ℚ
∧ 𝐴 = (𝑞↑2))) →
(√‘𝐴) =
(abs‘𝑞)) |
| 10 | | qabscl 11857 |
. . . . . 6
⊢ (𝑞 ∈ ℚ →
(abs‘𝑞) ∈
ℚ) |
| 11 | 10 | ad2antrl 494 |
. . . . 5
⊢ ((𝐴 ∈ ℕ0
∧ (𝑞 ∈ ℚ
∧ 𝐴 = (𝑞↑2))) →
(abs‘𝑞) ∈
ℚ) |
| 12 | 9, 11 | eqeltrd 2315 |
. . . 4
⊢ ((𝐴 ∈ ℕ0
∧ (𝑞 ∈ ℚ
∧ 𝐴 = (𝑞↑2))) →
(√‘𝐴) ∈
ℚ) |
| 13 | 12 | rexlimdvaa 2669 |
. . 3
⊢ (𝐴 ∈ ℕ0
→ (∃𝑞 ∈
ℚ 𝐴 = (𝑞↑2) →
(√‘𝐴) ∈
ℚ)) |
| 14 | | ralnex 2538 |
. . . 4
⊢
(∀𝑞 ∈
ℚ ¬ 𝐴 = (𝑞↑2) ↔ ¬
∃𝑞 ∈ ℚ
𝐴 = (𝑞↑2)) |
| 15 | | simplr 533 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → ¬ 𝐴 = (𝑞↑2)) |
| 16 | 15 | neqned 2427 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → 𝐴 ≠ (𝑞↑2)) |
| 17 | | nn0z 9668 |
. . . . . . . . . . . . . 14
⊢ (𝐴 ∈ ℕ0
→ 𝐴 ∈
ℤ) |
| 18 | | zq 10035 |
. . . . . . . . . . . . . 14
⊢ (𝐴 ∈ ℤ → 𝐴 ∈
ℚ) |
| 19 | 17, 18 | syl 14 |
. . . . . . . . . . . . 13
⊢ (𝐴 ∈ ℕ0
→ 𝐴 ∈
ℚ) |
| 20 | 19 | ad3antrrr 496 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → 𝐴 ∈ ℚ) |
| 21 | | qsqcl 11061 |
. . . . . . . . . . . . 13
⊢ (𝑞 ∈ ℚ → (𝑞↑2) ∈
ℚ) |
| 22 | 21 | ad3antlr 497 |
. . . . . . . . . . . 12
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → (𝑞↑2) ∈ ℚ) |
| 23 | | qapne 10048 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℚ ∧ (𝑞↑2) ∈ ℚ) →
(𝐴 # (𝑞↑2) ↔ 𝐴 ≠ (𝑞↑2))) |
| 24 | 20, 22, 23 | syl2anc 415 |
. . . . . . . . . . 11
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → (𝐴 # (𝑞↑2) ↔ 𝐴 ≠ (𝑞↑2))) |
| 25 | 16, 24 | mpbird 167 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → 𝐴 # (𝑞↑2)) |
| 26 | | nn0re 9576 |
. . . . . . . . . . . . 13
⊢ (𝐴 ∈ ℕ0
→ 𝐴 ∈
ℝ) |
| 27 | | nn0ge0 9592 |
. . . . . . . . . . . . 13
⊢ (𝐴 ∈ ℕ0
→ 0 ≤ 𝐴) |
| 28 | | resqrtth 11811 |
. . . . . . . . . . . . 13
⊢ ((𝐴 ∈ ℝ ∧ 0 ≤
𝐴) →
((√‘𝐴)↑2)
= 𝐴) |
| 29 | 26, 27, 28 | syl2anc 415 |
. . . . . . . . . . . 12
⊢ (𝐴 ∈ ℕ0
→ ((√‘𝐴)↑2) = 𝐴) |
| 30 | 29 | breq1d 4140 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℕ0
→ (((√‘𝐴)↑2) # (𝑞↑2) ↔ 𝐴 # (𝑞↑2))) |
| 31 | 30 | ad3antrrr 496 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → (((√‘𝐴)↑2) # (𝑞↑2) ↔ 𝐴 # (𝑞↑2))) |
| 32 | 25, 31 | mpbird 167 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → ((√‘𝐴)↑2) # (𝑞↑2)) |
| 33 | 26, 27 | resqrtcld 11944 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℕ0
→ (√‘𝐴)
∈ ℝ) |
| 34 | 33 | ad3antrrr 496 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → (√‘𝐴) ∈
ℝ) |
| 35 | 26, 27 | sqrtge0d 11947 |
. . . . . . . . . . 11
⊢ (𝐴 ∈ ℕ0
→ 0 ≤ (√‘𝐴)) |
| 36 | 35 | ad3antrrr 496 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → 0 ≤
(√‘𝐴)) |
| 37 | 6 | ad3antlr 497 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → 𝑞 ∈ ℝ) |
| 38 | | simpr 110 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → 0 ≤ 𝑞) |
| 39 | | sq11ap 11158 |
. . . . . . . . . 10
⊢
((((√‘𝐴)
∈ ℝ ∧ 0 ≤ (√‘𝐴)) ∧ (𝑞 ∈ ℝ ∧ 0 ≤ 𝑞)) → (((√‘𝐴)↑2) # (𝑞↑2) ↔ (√‘𝐴) # 𝑞)) |
| 40 | 34, 36, 37, 38, 39 | syl22anc 1279 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → (((√‘𝐴)↑2) # (𝑞↑2) ↔ (√‘𝐴) # 𝑞)) |
| 41 | 32, 40 | mpbid 147 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 0 ≤ 𝑞) → (√‘𝐴) # 𝑞) |
| 42 | 6 | ad3antlr 497 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 𝑞 < 0) → 𝑞 ∈
ℝ) |
| 43 | 33 | ad3antrrr 496 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 𝑞 < 0) →
(√‘𝐴) ∈
ℝ) |
| 44 | | 0red 8327 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 𝑞 < 0) → 0 ∈
ℝ) |
| 45 | | simpr 110 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 𝑞 < 0) → 𝑞 < 0) |
| 46 | 35 | ad3antrrr 496 |
. . . . . . . . . 10
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 𝑞 < 0) → 0 ≤
(√‘𝐴)) |
| 47 | 42, 44, 43, 45, 46 | ltletrd 8752 |
. . . . . . . . 9
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 𝑞 < 0) → 𝑞 < (√‘𝐴)) |
| 48 | 42, 43, 47 | gtapd 8967 |
. . . . . . . 8
⊢ ((((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) ∧ 𝑞 < 0) →
(√‘𝐴) # 𝑞) |
| 49 | | 0z 9659 |
. . . . . . . . . . 11
⊢ 0 ∈
ℤ |
| 50 | | zq 10035 |
. . . . . . . . . . 11
⊢ (0 ∈
ℤ → 0 ∈ ℚ) |
| 51 | 49, 50 | ax-mp 5 |
. . . . . . . . . 10
⊢ 0 ∈
ℚ |
| 52 | | qlelttric 10687 |
. . . . . . . . . 10
⊢ ((0
∈ ℚ ∧ 𝑞
∈ ℚ) → (0 ≤ 𝑞 ∨ 𝑞 < 0)) |
| 53 | 51, 52 | mpan 428 |
. . . . . . . . 9
⊢ (𝑞 ∈ ℚ → (0 ≤
𝑞 ∨ 𝑞 < 0)) |
| 54 | 53 | ad2antlr 493 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) → (0 ≤ 𝑞 ∨ 𝑞 < 0)) |
| 55 | 41, 48, 54 | mpjaodan 810 |
. . . . . . 7
⊢ (((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
∧ ¬ 𝐴 = (𝑞↑2)) →
(√‘𝐴) # 𝑞) |
| 56 | 55 | ex 115 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ0
∧ 𝑞 ∈ ℚ)
→ (¬ 𝐴 = (𝑞↑2) →
(√‘𝐴) # 𝑞)) |
| 57 | 56 | ralimdva 2617 |
. . . . 5
⊢ (𝐴 ∈ ℕ0
→ (∀𝑞 ∈
ℚ ¬ 𝐴 = (𝑞↑2) → ∀𝑞 ∈ ℚ
(√‘𝐴) # 𝑞)) |
| 58 | 57, 33 | jctild 316 |
. . . 4
⊢ (𝐴 ∈ ℕ0
→ (∀𝑞 ∈
ℚ ¬ 𝐴 = (𝑞↑2) →
((√‘𝐴) ∈
ℝ ∧ ∀𝑞
∈ ℚ (√‘𝐴) # 𝑞))) |
| 59 | 14, 58 | biimtrrid 153 |
. . 3
⊢ (𝐴 ∈ ℕ0
→ (¬ ∃𝑞
∈ ℚ 𝐴 = (𝑞↑2) →
((√‘𝐴) ∈
ℝ ∧ ∀𝑞
∈ ℚ (√‘𝐴) # 𝑞))) |
| 60 | 13, 59 | orim12d 798 |
. 2
⊢ (𝐴 ∈ ℕ0
→ ((∃𝑞 ∈
ℚ 𝐴 = (𝑞↑2) ∨ ¬ ∃𝑞 ∈ ℚ 𝐴 = (𝑞↑2)) → ((√‘𝐴) ∈ ℚ ∨
((√‘𝐴) ∈
ℝ ∧ ∀𝑞
∈ ℚ (√‘𝐴) # 𝑞)))) |
| 61 | 3, 60 | mpd 13 |
1
⊢ (𝐴 ∈ ℕ0
→ ((√‘𝐴)
∈ ℚ ∨ ((√‘𝐴) ∈ ℝ ∧ ∀𝑞 ∈ ℚ
(√‘𝐴) # 𝑞))) |