Proof of Theorem pythagtriplem12
| Step | Hyp | Ref
| Expression |
| 1 | | pythagtriplem11.1 |
. . 3
⊢ 𝑀 = (((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵))) / 2) |
| 2 | 1 | oveq1i 5932 |
. 2
⊢ (𝑀↑2) =
((((√‘(𝐶 +
𝐵)) + (√‘(𝐶 − 𝐵))) / 2)↑2) |
| 3 | | simp3 1001 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐶 ∈
ℕ) |
| 4 | | simp2 1000 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐵 ∈
ℕ) |
| 5 | 3, 4 | nnaddcld 9038 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 + 𝐵) ∈ ℕ) |
| 6 | 5 | nnrpd 9769 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 + 𝐵) ∈
ℝ+) |
| 7 | 6 | rpsqrtcld 11323 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) →
(√‘(𝐶 + 𝐵)) ∈
ℝ+) |
| 8 | 7 | rpcnd 9773 |
. . . . . 6
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) →
(√‘(𝐶 + 𝐵)) ∈
ℂ) |
| 9 | 8 | 3ad2ant1 1020 |
. . . . 5
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (√‘(𝐶 + 𝐵)) ∈ ℂ) |
| 10 | 3 | nnred 9003 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐶 ∈
ℝ) |
| 11 | 10 | adantr 276 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → 𝐶 ∈ ℝ) |
| 12 | 4 | nnred 9003 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐵 ∈
ℝ) |
| 13 | 12 | adantr 276 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → 𝐵 ∈ ℝ) |
| 14 | 11, 13 | resubcld 8407 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (𝐶 − 𝐵) ∈ ℝ) |
| 15 | | pythagtriplem10 12438 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → 0 < (𝐶 − 𝐵)) |
| 16 | 14, 15 | elrpd 9768 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (𝐶 − 𝐵) ∈
ℝ+) |
| 17 | 16 | rpsqrtcld 11323 |
. . . . . . 7
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2)) → (√‘(𝐶 − 𝐵)) ∈
ℝ+) |
| 18 | 17 | 3adant3 1019 |
. . . . . 6
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (√‘(𝐶 − 𝐵)) ∈
ℝ+) |
| 19 | 18 | rpcnd 9773 |
. . . . 5
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (√‘(𝐶 − 𝐵)) ∈ ℂ) |
| 20 | 9, 19 | addcld 8046 |
. . . 4
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵))) ∈ ℂ) |
| 21 | | 2cn 9061 |
. . . . . 6
⊢ 2 ∈
ℂ |
| 22 | | 2ap0 9083 |
. . . . . 6
⊢ 2 #
0 |
| 23 | | sqdivap 10695 |
. . . . . 6
⊢
((((√‘(𝐶
+ 𝐵)) +
(√‘(𝐶 −
𝐵))) ∈ ℂ ∧ 2
∈ ℂ ∧ 2 # 0) → ((((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵))) / 2)↑2) = ((((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵)))↑2) / (2↑2))) |
| 24 | 21, 22, 23 | mp3an23 1340 |
. . . . 5
⊢
(((√‘(𝐶
+ 𝐵)) +
(√‘(𝐶 −
𝐵))) ∈ ℂ →
((((√‘(𝐶 +
𝐵)) + (√‘(𝐶 − 𝐵))) / 2)↑2) = ((((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵)))↑2) / (2↑2))) |
| 25 | 21 | sqvali 10711 |
. . . . . 6
⊢
(2↑2) = (2 · 2) |
| 26 | 25 | oveq2i 5933 |
. . . . 5
⊢
((((√‘(𝐶
+ 𝐵)) +
(√‘(𝐶 −
𝐵)))↑2) / (2↑2))
= ((((√‘(𝐶 +
𝐵)) + (√‘(𝐶 − 𝐵)))↑2) / (2 ·
2)) |
| 27 | 24, 26 | eqtrdi 2245 |
. . . 4
⊢
(((√‘(𝐶
+ 𝐵)) +
(√‘(𝐶 −
𝐵))) ∈ ℂ →
((((√‘(𝐶 +
𝐵)) + (√‘(𝐶 − 𝐵))) / 2)↑2) = ((((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵)))↑2) / (2 ·
2))) |
| 28 | 20, 27 | syl 14 |
. . 3
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) →
((((√‘(𝐶 +
𝐵)) + (√‘(𝐶 − 𝐵))) / 2)↑2) = ((((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵)))↑2) / (2 ·
2))) |
| 29 | | binom2 10743 |
. . . . . . 7
⊢
(((√‘(𝐶
+ 𝐵)) ∈ ℂ ∧
(√‘(𝐶 −
𝐵)) ∈ ℂ) →
(((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵)))↑2) = ((((√‘(𝐶 + 𝐵))↑2) + (2 ·
((√‘(𝐶 + 𝐵)) ·
(√‘(𝐶 −
𝐵))))) +
((√‘(𝐶 −
𝐵))↑2))) |
| 30 | 9, 19, 29 | syl2anc 411 |
. . . . . 6
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) →
(((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵)))↑2) = ((((√‘(𝐶 + 𝐵))↑2) + (2 ·
((√‘(𝐶 + 𝐵)) ·
(√‘(𝐶 −
𝐵))))) +
((√‘(𝐶 −
𝐵))↑2))) |
| 31 | | nnre 8997 |
. . . . . . . . . . . 12
⊢ (𝐶 ∈ ℕ → 𝐶 ∈
ℝ) |
| 32 | | nnre 8997 |
. . . . . . . . . . . 12
⊢ (𝐵 ∈ ℕ → 𝐵 ∈
ℝ) |
| 33 | | readdcl 8005 |
. . . . . . . . . . . 12
⊢ ((𝐶 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐶 + 𝐵) ∈ ℝ) |
| 34 | 31, 32, 33 | syl2anr 290 |
. . . . . . . . . . 11
⊢ ((𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 + 𝐵) ∈ ℝ) |
| 35 | 34 | 3adant1 1017 |
. . . . . . . . . 10
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 + 𝐵) ∈ ℝ) |
| 36 | 35 | 3ad2ant1 1020 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (𝐶 + 𝐵) ∈ ℝ) |
| 37 | 31 | 3ad2ant3 1022 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐶 ∈
ℝ) |
| 38 | 32 | 3ad2ant2 1021 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐵 ∈
ℝ) |
| 39 | | nngt0 9015 |
. . . . . . . . . . . . 13
⊢ (𝐶 ∈ ℕ → 0 <
𝐶) |
| 40 | 39 | 3ad2ant3 1022 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 0 <
𝐶) |
| 41 | | nngt0 9015 |
. . . . . . . . . . . . 13
⊢ (𝐵 ∈ ℕ → 0 <
𝐵) |
| 42 | 41 | 3ad2ant2 1021 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 0 <
𝐵) |
| 43 | 37, 38, 40, 42 | addgt0d 8548 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 0 <
(𝐶 + 𝐵)) |
| 44 | 43 | 3ad2ant1 1020 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 0 < (𝐶 + 𝐵)) |
| 45 | | 0re 8026 |
. . . . . . . . . . 11
⊢ 0 ∈
ℝ |
| 46 | | ltle 8114 |
. . . . . . . . . . 11
⊢ ((0
∈ ℝ ∧ (𝐶 +
𝐵) ∈ ℝ) →
(0 < (𝐶 + 𝐵) → 0 ≤ (𝐶 + 𝐵))) |
| 47 | 45, 46 | mpan 424 |
. . . . . . . . . 10
⊢ ((𝐶 + 𝐵) ∈ ℝ → (0 < (𝐶 + 𝐵) → 0 ≤ (𝐶 + 𝐵))) |
| 48 | 36, 44, 47 | sylc 62 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 0 ≤ (𝐶 + 𝐵)) |
| 49 | | resqrtth 11196 |
. . . . . . . . 9
⊢ (((𝐶 + 𝐵) ∈ ℝ ∧ 0 ≤ (𝐶 + 𝐵)) → ((√‘(𝐶 + 𝐵))↑2) = (𝐶 + 𝐵)) |
| 50 | 36, 48, 49 | syl2anc 411 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((√‘(𝐶 + 𝐵))↑2) = (𝐶 + 𝐵)) |
| 51 | 50 | oveq1d 5937 |
. . . . . . 7
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) →
(((√‘(𝐶 + 𝐵))↑2) + (2 ·
((√‘(𝐶 + 𝐵)) ·
(√‘(𝐶 −
𝐵))))) = ((𝐶 + 𝐵) + (2 · ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵)))))) |
| 52 | | resubcl 8290 |
. . . . . . . . . . 11
⊢ ((𝐶 ∈ ℝ ∧ 𝐵 ∈ ℝ) → (𝐶 − 𝐵) ∈ ℝ) |
| 53 | 31, 32, 52 | syl2anr 290 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 − 𝐵) ∈ ℝ) |
| 54 | 53 | 3adant1 1017 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 − 𝐵) ∈ ℝ) |
| 55 | 54 | 3ad2ant1 1020 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (𝐶 − 𝐵) ∈ ℝ) |
| 56 | 15 | 3adant3 1019 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 0 < (𝐶 − 𝐵)) |
| 57 | | ltle 8114 |
. . . . . . . . . 10
⊢ ((0
∈ ℝ ∧ (𝐶
− 𝐵) ∈ ℝ)
→ (0 < (𝐶 −
𝐵) → 0 ≤ (𝐶 − 𝐵))) |
| 58 | 45, 57 | mpan 424 |
. . . . . . . . 9
⊢ ((𝐶 − 𝐵) ∈ ℝ → (0 < (𝐶 − 𝐵) → 0 ≤ (𝐶 − 𝐵))) |
| 59 | 55, 56, 58 | sylc 62 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 0 ≤ (𝐶 − 𝐵)) |
| 60 | | resqrtth 11196 |
. . . . . . . 8
⊢ (((𝐶 − 𝐵) ∈ ℝ ∧ 0 ≤ (𝐶 − 𝐵)) → ((√‘(𝐶 − 𝐵))↑2) = (𝐶 − 𝐵)) |
| 61 | 55, 59, 60 | syl2anc 411 |
. . . . . . 7
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((√‘(𝐶 − 𝐵))↑2) = (𝐶 − 𝐵)) |
| 62 | 51, 61 | oveq12d 5940 |
. . . . . 6
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) →
((((√‘(𝐶 +
𝐵))↑2) + (2 ·
((√‘(𝐶 + 𝐵)) ·
(√‘(𝐶 −
𝐵))))) +
((√‘(𝐶 −
𝐵))↑2)) = (((𝐶 + 𝐵) + (2 · ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵))))) + (𝐶 − 𝐵))) |
| 63 | | nncn 8998 |
. . . . . . . . . . . 12
⊢ (𝐶 ∈ ℕ → 𝐶 ∈
ℂ) |
| 64 | 63 | 3ad2ant3 1022 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐶 ∈
ℂ) |
| 65 | 64 | 3ad2ant1 1020 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 𝐶 ∈ ℂ) |
| 66 | | nncn 8998 |
. . . . . . . . . . . 12
⊢ (𝐵 ∈ ℕ → 𝐵 ∈
ℂ) |
| 67 | 66 | 3ad2ant2 1021 |
. . . . . . . . . . 11
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐵 ∈
ℂ) |
| 68 | 67 | 3ad2ant1 1020 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 𝐵 ∈ ℂ) |
| 69 | 65, 68, 65 | ppncand 8377 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((𝐶 + 𝐵) + (𝐶 − 𝐵)) = (𝐶 + 𝐶)) |
| 70 | 65 | 2timesd 9234 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (2 · 𝐶) = (𝐶 + 𝐶)) |
| 71 | 69, 70 | eqtr4d 2232 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((𝐶 + 𝐵) + (𝐶 − 𝐵)) = (2 · 𝐶)) |
| 72 | | oveq1 5929 |
. . . . . . . . . . . . 13
⊢ (((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) → (((𝐴↑2) + (𝐵↑2)) − (𝐵↑2)) = ((𝐶↑2) − (𝐵↑2))) |
| 73 | 72 | 3ad2ant2 1021 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (((𝐴↑2) + (𝐵↑2)) − (𝐵↑2)) = ((𝐶↑2) − (𝐵↑2))) |
| 74 | | nncn 8998 |
. . . . . . . . . . . . . . . 16
⊢ (𝐴 ∈ ℕ → 𝐴 ∈
ℂ) |
| 75 | 74 | 3ad2ant1 1020 |
. . . . . . . . . . . . . . 15
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐴 ∈
ℂ) |
| 76 | 75 | 3ad2ant1 1020 |
. . . . . . . . . . . . . 14
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 𝐴 ∈ ℂ) |
| 77 | 76 | sqcld 10763 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (𝐴↑2) ∈ ℂ) |
| 78 | 68 | sqcld 10763 |
. . . . . . . . . . . . 13
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (𝐵↑2) ∈ ℂ) |
| 79 | 77, 78 | pncand 8338 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (((𝐴↑2) + (𝐵↑2)) − (𝐵↑2)) = (𝐴↑2)) |
| 80 | | subsq 10738 |
. . . . . . . . . . . . 13
⊢ ((𝐶 ∈ ℂ ∧ 𝐵 ∈ ℂ) → ((𝐶↑2) − (𝐵↑2)) = ((𝐶 + 𝐵) · (𝐶 − 𝐵))) |
| 81 | 65, 68, 80 | syl2anc 411 |
. . . . . . . . . . . 12
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((𝐶↑2) − (𝐵↑2)) = ((𝐶 + 𝐵) · (𝐶 − 𝐵))) |
| 82 | 73, 79, 81 | 3eqtr3rd 2238 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((𝐶 + 𝐵) · (𝐶 − 𝐵)) = (𝐴↑2)) |
| 83 | 82 | fveq2d 5562 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (√‘((𝐶 + 𝐵) · (𝐶 − 𝐵))) = (√‘(𝐴↑2))) |
| 84 | 36, 48, 55, 59 | sqrtmuld 11334 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (√‘((𝐶 + 𝐵) · (𝐶 − 𝐵))) = ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵)))) |
| 85 | | nnre 8997 |
. . . . . . . . . . . . 13
⊢ (𝐴 ∈ ℕ → 𝐴 ∈
ℝ) |
| 86 | 85 | 3ad2ant1 1020 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 𝐴 ∈
ℝ) |
| 87 | 86 | 3ad2ant1 1020 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 𝐴 ∈ ℝ) |
| 88 | | nnnn0 9256 |
. . . . . . . . . . . . . 14
⊢ (𝐴 ∈ ℕ → 𝐴 ∈
ℕ0) |
| 89 | 88 | nn0ge0d 9305 |
. . . . . . . . . . . . 13
⊢ (𝐴 ∈ ℕ → 0 ≤
𝐴) |
| 90 | 89 | 3ad2ant1 1020 |
. . . . . . . . . . . 12
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → 0 ≤
𝐴) |
| 91 | 90 | 3ad2ant1 1020 |
. . . . . . . . . . 11
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 0 ≤ 𝐴) |
| 92 | 87, 91 | sqrtsqd 11330 |
. . . . . . . . . 10
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (√‘(𝐴↑2)) = 𝐴) |
| 93 | 83, 84, 92 | 3eqtr3d 2237 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵))) = 𝐴) |
| 94 | 93 | oveq2d 5938 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (2 ·
((√‘(𝐶 + 𝐵)) ·
(√‘(𝐶 −
𝐵)))) = (2 · 𝐴)) |
| 95 | 71, 94 | oveq12d 5940 |
. . . . . . 7
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (((𝐶 + 𝐵) + (𝐶 − 𝐵)) + (2 · ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵))))) = ((2 · 𝐶) + (2 · 𝐴))) |
| 96 | | addcl 8004 |
. . . . . . . . . . 11
⊢ ((𝐶 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐶 + 𝐵) ∈ ℂ) |
| 97 | 63, 66, 96 | syl2anr 290 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 + 𝐵) ∈ ℂ) |
| 98 | 97 | 3adant1 1017 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 + 𝐵) ∈ ℂ) |
| 99 | 98 | 3ad2ant1 1020 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (𝐶 + 𝐵) ∈ ℂ) |
| 100 | 9, 19 | mulcld 8047 |
. . . . . . . . 9
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵))) ∈ ℂ) |
| 101 | | mulcl 8006 |
. . . . . . . . 9
⊢ ((2
∈ ℂ ∧ ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵))) ∈ ℂ) → (2 ·
((√‘(𝐶 + 𝐵)) ·
(√‘(𝐶 −
𝐵)))) ∈
ℂ) |
| 102 | 21, 100, 101 | sylancr 414 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (2 ·
((√‘(𝐶 + 𝐵)) ·
(√‘(𝐶 −
𝐵)))) ∈
ℂ) |
| 103 | | subcl 8225 |
. . . . . . . . . . 11
⊢ ((𝐶 ∈ ℂ ∧ 𝐵 ∈ ℂ) → (𝐶 − 𝐵) ∈ ℂ) |
| 104 | 63, 66, 103 | syl2anr 290 |
. . . . . . . . . 10
⊢ ((𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 − 𝐵) ∈ ℂ) |
| 105 | 104 | 3adant1 1017 |
. . . . . . . . 9
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 − 𝐵) ∈ ℂ) |
| 106 | 105 | 3ad2ant1 1020 |
. . . . . . . 8
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (𝐶 − 𝐵) ∈ ℂ) |
| 107 | 99, 102, 106 | add32d 8194 |
. . . . . . 7
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (((𝐶 + 𝐵) + (2 · ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵))))) + (𝐶 − 𝐵)) = (((𝐶 + 𝐵) + (𝐶 − 𝐵)) + (2 · ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵)))))) |
| 108 | | adddi 8011 |
. . . . . . . 8
⊢ ((2
∈ ℂ ∧ 𝐶
∈ ℂ ∧ 𝐴
∈ ℂ) → (2 · (𝐶 + 𝐴)) = ((2 · 𝐶) + (2 · 𝐴))) |
| 109 | 21, 65, 76, 108 | mp3an2i 1353 |
. . . . . . 7
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (2 · (𝐶 + 𝐴)) = ((2 · 𝐶) + (2 · 𝐴))) |
| 110 | 95, 107, 109 | 3eqtr4d 2239 |
. . . . . 6
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (((𝐶 + 𝐵) + (2 · ((√‘(𝐶 + 𝐵)) · (√‘(𝐶 − 𝐵))))) + (𝐶 − 𝐵)) = (2 · (𝐶 + 𝐴))) |
| 111 | 30, 62, 110 | 3eqtrd 2233 |
. . . . 5
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) →
(((√‘(𝐶 + 𝐵)) + (√‘(𝐶 − 𝐵)))↑2) = (2 · (𝐶 + 𝐴))) |
| 112 | 111 | oveq1d 5937 |
. . . 4
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) →
((((√‘(𝐶 +
𝐵)) + (√‘(𝐶 − 𝐵)))↑2) / (2 · 2)) = ((2 ·
(𝐶 + 𝐴)) / (2 · 2))) |
| 113 | | addcl 8004 |
. . . . . . . . 9
⊢ ((𝐶 ∈ ℂ ∧ 𝐴 ∈ ℂ) → (𝐶 + 𝐴) ∈ ℂ) |
| 114 | 63, 74, 113 | syl2anr 290 |
. . . . . . . 8
⊢ ((𝐴 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 + 𝐴) ∈ ℂ) |
| 115 | 114 | 3adant2 1018 |
. . . . . . 7
⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) → (𝐶 + 𝐴) ∈ ℂ) |
| 116 | 115 | 3ad2ant1 1020 |
. . . . . 6
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (𝐶 + 𝐴) ∈ ℂ) |
| 117 | | mulcl 8006 |
. . . . . 6
⊢ ((2
∈ ℂ ∧ (𝐶 +
𝐴) ∈ ℂ) →
(2 · (𝐶 + 𝐴)) ∈
ℂ) |
| 118 | 21, 116, 117 | sylancr 414 |
. . . . 5
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (2 · (𝐶 + 𝐴)) ∈ ℂ) |
| 119 | 21 | a1i 9 |
. . . . 5
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 2 ∈
ℂ) |
| 120 | 22 | a1i 9 |
. . . . 5
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → 2 #
0) |
| 121 | 118, 119,
119, 120, 120 | divdivap1d 8849 |
. . . 4
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (((2 · (𝐶 + 𝐴)) / 2) / 2) = ((2 · (𝐶 + 𝐴)) / (2 · 2))) |
| 122 | 112, 121 | eqtr4d 2232 |
. . 3
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) →
((((√‘(𝐶 +
𝐵)) + (√‘(𝐶 − 𝐵)))↑2) / (2 · 2)) = (((2
· (𝐶 + 𝐴)) / 2) / 2)) |
| 123 | 116, 119,
120 | divcanap3d 8822 |
. . . 4
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → ((2 · (𝐶 + 𝐴)) / 2) = (𝐶 + 𝐴)) |
| 124 | 123 | oveq1d 5937 |
. . 3
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (((2 · (𝐶 + 𝐴)) / 2) / 2) = ((𝐶 + 𝐴) / 2)) |
| 125 | 28, 122, 124 | 3eqtrd 2233 |
. 2
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) →
((((√‘(𝐶 +
𝐵)) + (√‘(𝐶 − 𝐵))) / 2)↑2) = ((𝐶 + 𝐴) / 2)) |
| 126 | 2, 125 | eqtrid 2241 |
1
⊢ (((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ ∧ 𝐶 ∈ ℕ) ∧ ((𝐴↑2) + (𝐵↑2)) = (𝐶↑2) ∧ ((𝐴 gcd 𝐵) = 1 ∧ ¬ 2 ∥ 𝐴)) → (𝑀↑2) = ((𝐶 + 𝐴) / 2)) |