Step | Hyp | Ref
| Expression |
1 | | pythagtriplem11.1 |
. . 3
โข ๐ = (((โโ(๐ถ + ๐ต)) + (โโ(๐ถ โ ๐ต))) / 2) |
2 | 1 | oveq1i 5887 |
. 2
โข (๐โ2) =
((((โโ(๐ถ +
๐ต)) + (โโ(๐ถ โ ๐ต))) / 2)โ2) |
3 | | simp3 999 |
. . . . . . . . . 10
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ถ โ
โ) |
4 | | simp2 998 |
. . . . . . . . . 10
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ต โ
โ) |
5 | 3, 4 | nnaddcld 8969 |
. . . . . . . . 9
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ (๐ถ + ๐ต) โ โ) |
6 | 5 | nnrpd 9696 |
. . . . . . . 8
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ (๐ถ + ๐ต) โ
โ+) |
7 | 6 | rpsqrtcld 11169 |
. . . . . . 7
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ
(โโ(๐ถ + ๐ต)) โ
โ+) |
8 | 7 | rpcnd 9700 |
. . . . . 6
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ
(โโ(๐ถ + ๐ต)) โ
โ) |
9 | 8 | 3ad2ant1 1018 |
. . . . 5
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (โโ(๐ถ + ๐ต)) โ โ) |
10 | 3 | nnred 8934 |
. . . . . . . . . . 11
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ถ โ
โ) |
11 | 10 | adantr 276 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2)) โ ๐ถ โ โ) |
12 | 4 | nnred 8934 |
. . . . . . . . . . 11
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ต โ
โ) |
13 | 12 | adantr 276 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2)) โ ๐ต โ โ) |
14 | 11, 13 | resubcld 8340 |
. . . . . . . . 9
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2)) โ (๐ถ โ ๐ต) โ โ) |
15 | | pythagtriplem10 12271 |
. . . . . . . . 9
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2)) โ 0 < (๐ถ โ ๐ต)) |
16 | 14, 15 | elrpd 9695 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2)) โ (๐ถ โ ๐ต) โ
โ+) |
17 | 16 | rpsqrtcld 11169 |
. . . . . . 7
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2)) โ (โโ(๐ถ โ ๐ต)) โ
โ+) |
18 | 17 | 3adant3 1017 |
. . . . . 6
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (โโ(๐ถ โ ๐ต)) โ
โ+) |
19 | 18 | rpcnd 9700 |
. . . . 5
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (โโ(๐ถ โ ๐ต)) โ โ) |
20 | 9, 19 | addcld 7979 |
. . . 4
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((โโ(๐ถ + ๐ต)) + (โโ(๐ถ โ ๐ต))) โ โ) |
21 | | 2cn 8992 |
. . . . . 6
โข 2 โ
โ |
22 | | 2ap0 9014 |
. . . . . 6
โข 2 #
0 |
23 | | sqdivap 10586 |
. . . . . 6
โข
((((โโ(๐ถ
+ ๐ต)) +
(โโ(๐ถ โ
๐ต))) โ โ โง 2
โ โ โง 2 # 0) โ ((((โโ(๐ถ + ๐ต)) + (โโ(๐ถ โ ๐ต))) / 2)โ2) = ((((โโ(๐ถ + ๐ต)) + (โโ(๐ถ โ ๐ต)))โ2) / (2โ2))) |
24 | 21, 22, 23 | mp3an23 1329 |
. . . . 5
โข
(((โโ(๐ถ
+ ๐ต)) +
(โโ(๐ถ โ
๐ต))) โ โ โ
((((โโ(๐ถ +
๐ต)) + (โโ(๐ถ โ ๐ต))) / 2)โ2) = ((((โโ(๐ถ + ๐ต)) + (โโ(๐ถ โ ๐ต)))โ2) / (2โ2))) |
25 | 21 | sqvali 10602 |
. . . . . 6
โข
(2โ2) = (2 ยท 2) |
26 | 25 | oveq2i 5888 |
. . . . 5
โข
((((โโ(๐ถ
+ ๐ต)) +
(โโ(๐ถ โ
๐ต)))โ2) / (2โ2))
= ((((โโ(๐ถ +
๐ต)) + (โโ(๐ถ โ ๐ต)))โ2) / (2 ยท
2)) |
27 | 24, 26 | eqtrdi 2226 |
. . . 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 10634 |
. . . . . . 7
โข
(((โโ(๐ถ
+ ๐ต)) โ โ โง
(โโ(๐ถ โ
๐ต)) โ โ) โ
(((โโ(๐ถ + ๐ต)) + (โโ(๐ถ โ ๐ต)))โ2) = ((((โโ(๐ถ + ๐ต))โ2) + (2 ยท
((โโ(๐ถ + ๐ต)) ยท
(โโ(๐ถ โ
๐ต))))) +
((โโ(๐ถ โ
๐ต))โ2))) |
30 | 9, 19, 29 | syl2anc 411 |
. . . . . 6
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ
(((โโ(๐ถ + ๐ต)) + (โโ(๐ถ โ ๐ต)))โ2) = ((((โโ(๐ถ + ๐ต))โ2) + (2 ยท
((โโ(๐ถ + ๐ต)) ยท
(โโ(๐ถ โ
๐ต))))) +
((โโ(๐ถ โ
๐ต))โ2))) |
31 | | nnre 8928 |
. . . . . . . . . . . 12
โข (๐ถ โ โ โ ๐ถ โ
โ) |
32 | | nnre 8928 |
. . . . . . . . . . . 12
โข (๐ต โ โ โ ๐ต โ
โ) |
33 | | readdcl 7939 |
. . . . . . . . . . . 12
โข ((๐ถ โ โ โง ๐ต โ โ) โ (๐ถ + ๐ต) โ โ) |
34 | 31, 32, 33 | syl2anr 290 |
. . . . . . . . . . 11
โข ((๐ต โ โ โง ๐ถ โ โ) โ (๐ถ + ๐ต) โ โ) |
35 | 34 | 3adant1 1015 |
. . . . . . . . . 10
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ (๐ถ + ๐ต) โ โ) |
36 | 35 | 3ad2ant1 1018 |
. . . . . . . . 9
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (๐ถ + ๐ต) โ โ) |
37 | 31 | 3ad2ant3 1020 |
. . . . . . . . . . . 12
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ถ โ
โ) |
38 | 32 | 3ad2ant2 1019 |
. . . . . . . . . . . 12
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ต โ
โ) |
39 | | nngt0 8946 |
. . . . . . . . . . . . 13
โข (๐ถ โ โ โ 0 <
๐ถ) |
40 | 39 | 3ad2ant3 1020 |
. . . . . . . . . . . 12
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ 0 <
๐ถ) |
41 | | nngt0 8946 |
. . . . . . . . . . . . 13
โข (๐ต โ โ โ 0 <
๐ต) |
42 | 41 | 3ad2ant2 1019 |
. . . . . . . . . . . 12
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ 0 <
๐ต) |
43 | 37, 38, 40, 42 | addgt0d 8480 |
. . . . . . . . . . 11
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ 0 <
(๐ถ + ๐ต)) |
44 | 43 | 3ad2ant1 1018 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ 0 < (๐ถ + ๐ต)) |
45 | | 0re 7959 |
. . . . . . . . . . 11
โข 0 โ
โ |
46 | | ltle 8047 |
. . . . . . . . . . 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 11042 |
. . . . . . . . 9
โข (((๐ถ + ๐ต) โ โ โง 0 โค (๐ถ + ๐ต)) โ ((โโ(๐ถ + ๐ต))โ2) = (๐ถ + ๐ต)) |
50 | 36, 48, 49 | syl2anc 411 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((โโ(๐ถ + ๐ต))โ2) = (๐ถ + ๐ต)) |
51 | 50 | oveq1d 5892 |
. . . . . . 7
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ
(((โโ(๐ถ + ๐ต))โ2) + (2 ยท
((โโ(๐ถ + ๐ต)) ยท
(โโ(๐ถ โ
๐ต))))) = ((๐ถ + ๐ต) + (2 ยท ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต)))))) |
52 | | resubcl 8223 |
. . . . . . . . . . 11
โข ((๐ถ โ โ โง ๐ต โ โ) โ (๐ถ โ ๐ต) โ โ) |
53 | 31, 32, 52 | syl2anr 290 |
. . . . . . . . . 10
โข ((๐ต โ โ โง ๐ถ โ โ) โ (๐ถ โ ๐ต) โ โ) |
54 | 53 | 3adant1 1015 |
. . . . . . . . 9
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ (๐ถ โ ๐ต) โ โ) |
55 | 54 | 3ad2ant1 1018 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (๐ถ โ ๐ต) โ โ) |
56 | 15 | 3adant3 1017 |
. . . . . . . . 9
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ 0 < (๐ถ โ ๐ต)) |
57 | | ltle 8047 |
. . . . . . . . . 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 11042 |
. . . . . . . 8
โข (((๐ถ โ ๐ต) โ โ โง 0 โค (๐ถ โ ๐ต)) โ ((โโ(๐ถ โ ๐ต))โ2) = (๐ถ โ ๐ต)) |
61 | 55, 59, 60 | syl2anc 411 |
. . . . . . 7
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((โโ(๐ถ โ ๐ต))โ2) = (๐ถ โ ๐ต)) |
62 | 51, 61 | oveq12d 5895 |
. . . . . 6
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ
((((โโ(๐ถ +
๐ต))โ2) + (2 ยท
((โโ(๐ถ + ๐ต)) ยท
(โโ(๐ถ โ
๐ต))))) +
((โโ(๐ถ โ
๐ต))โ2)) = (((๐ถ + ๐ต) + (2 ยท ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต))))) + (๐ถ โ ๐ต))) |
63 | | nncn 8929 |
. . . . . . . . . . . 12
โข (๐ถ โ โ โ ๐ถ โ
โ) |
64 | 63 | 3ad2ant3 1020 |
. . . . . . . . . . 11
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ถ โ
โ) |
65 | 64 | 3ad2ant1 1018 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ๐ถ โ โ) |
66 | | nncn 8929 |
. . . . . . . . . . . 12
โข (๐ต โ โ โ ๐ต โ
โ) |
67 | 66 | 3ad2ant2 1019 |
. . . . . . . . . . 11
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ต โ
โ) |
68 | 67 | 3ad2ant1 1018 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ๐ต โ โ) |
69 | 65, 68, 65 | ppncand 8310 |
. . . . . . . . 9
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((๐ถ + ๐ต) + (๐ถ โ ๐ต)) = (๐ถ + ๐ถ)) |
70 | 65 | 2timesd 9163 |
. . . . . . . . 9
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (2 ยท ๐ถ) = (๐ถ + ๐ถ)) |
71 | 69, 70 | eqtr4d 2213 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((๐ถ + ๐ต) + (๐ถ โ ๐ต)) = (2 ยท ๐ถ)) |
72 | | oveq1 5884 |
. . . . . . . . . . . . 13
โข (((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โ (((๐ดโ2) + (๐ตโ2)) โ (๐ตโ2)) = ((๐ถโ2) โ (๐ตโ2))) |
73 | 72 | 3ad2ant2 1019 |
. . . . . . . . . . . 12
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (((๐ดโ2) + (๐ตโ2)) โ (๐ตโ2)) = ((๐ถโ2) โ (๐ตโ2))) |
74 | | nncn 8929 |
. . . . . . . . . . . . . . . 16
โข (๐ด โ โ โ ๐ด โ
โ) |
75 | 74 | 3ad2ant1 1018 |
. . . . . . . . . . . . . . 15
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ด โ
โ) |
76 | 75 | 3ad2ant1 1018 |
. . . . . . . . . . . . . 14
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ๐ด โ โ) |
77 | 76 | sqcld 10654 |
. . . . . . . . . . . . 13
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (๐ดโ2) โ โ) |
78 | 68 | sqcld 10654 |
. . . . . . . . . . . . 13
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (๐ตโ2) โ โ) |
79 | 77, 78 | pncand 8271 |
. . . . . . . . . . . 12
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (((๐ดโ2) + (๐ตโ2)) โ (๐ตโ2)) = (๐ดโ2)) |
80 | | subsq 10629 |
. . . . . . . . . . . . 13
โข ((๐ถ โ โ โง ๐ต โ โ) โ ((๐ถโ2) โ (๐ตโ2)) = ((๐ถ + ๐ต) ยท (๐ถ โ ๐ต))) |
81 | 65, 68, 80 | syl2anc 411 |
. . . . . . . . . . . 12
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((๐ถโ2) โ (๐ตโ2)) = ((๐ถ + ๐ต) ยท (๐ถ โ ๐ต))) |
82 | 73, 79, 81 | 3eqtr3rd 2219 |
. . . . . . . . . . 11
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((๐ถ + ๐ต) ยท (๐ถ โ ๐ต)) = (๐ดโ2)) |
83 | 82 | fveq2d 5521 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (โโ((๐ถ + ๐ต) ยท (๐ถ โ ๐ต))) = (โโ(๐ดโ2))) |
84 | 36, 48, 55, 59 | sqrtmuld 11180 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (โโ((๐ถ + ๐ต) ยท (๐ถ โ ๐ต))) = ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต)))) |
85 | | nnre 8928 |
. . . . . . . . . . . . 13
โข (๐ด โ โ โ ๐ด โ
โ) |
86 | 85 | 3ad2ant1 1018 |
. . . . . . . . . . . 12
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ ๐ด โ
โ) |
87 | 86 | 3ad2ant1 1018 |
. . . . . . . . . . 11
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ๐ด โ โ) |
88 | | nnnn0 9185 |
. . . . . . . . . . . . . 14
โข (๐ด โ โ โ ๐ด โ
โ0) |
89 | 88 | nn0ge0d 9234 |
. . . . . . . . . . . . 13
โข (๐ด โ โ โ 0 โค
๐ด) |
90 | 89 | 3ad2ant1 1018 |
. . . . . . . . . . . 12
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ 0 โค
๐ด) |
91 | 90 | 3ad2ant1 1018 |
. . . . . . . . . . 11
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ 0 โค ๐ด) |
92 | 87, 91 | sqrtsqd 11176 |
. . . . . . . . . 10
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (โโ(๐ดโ2)) = ๐ด) |
93 | 83, 84, 92 | 3eqtr3d 2218 |
. . . . . . . . 9
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต))) = ๐ด) |
94 | 93 | oveq2d 5893 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (2 ยท
((โโ(๐ถ + ๐ต)) ยท
(โโ(๐ถ โ
๐ต)))) = (2 ยท ๐ด)) |
95 | 71, 94 | oveq12d 5895 |
. . . . . . 7
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (((๐ถ + ๐ต) + (๐ถ โ ๐ต)) + (2 ยท ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต))))) = ((2 ยท ๐ถ) + (2 ยท ๐ด))) |
96 | | addcl 7938 |
. . . . . . . . . . 11
โข ((๐ถ โ โ โง ๐ต โ โ) โ (๐ถ + ๐ต) โ โ) |
97 | 63, 66, 96 | syl2anr 290 |
. . . . . . . . . 10
โข ((๐ต โ โ โง ๐ถ โ โ) โ (๐ถ + ๐ต) โ โ) |
98 | 97 | 3adant1 1015 |
. . . . . . . . 9
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ (๐ถ + ๐ต) โ โ) |
99 | 98 | 3ad2ant1 1018 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (๐ถ + ๐ต) โ โ) |
100 | 9, 19 | mulcld 7980 |
. . . . . . . . 9
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต))) โ โ) |
101 | | mulcl 7940 |
. . . . . . . . 9
โข ((2
โ โ โง ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต))) โ โ) โ (2 ยท
((โโ(๐ถ + ๐ต)) ยท
(โโ(๐ถ โ
๐ต)))) โ
โ) |
102 | 21, 100, 101 | sylancr 414 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (2 ยท
((โโ(๐ถ + ๐ต)) ยท
(โโ(๐ถ โ
๐ต)))) โ
โ) |
103 | | subcl 8158 |
. . . . . . . . . . 11
โข ((๐ถ โ โ โง ๐ต โ โ) โ (๐ถ โ ๐ต) โ โ) |
104 | 63, 66, 103 | syl2anr 290 |
. . . . . . . . . 10
โข ((๐ต โ โ โง ๐ถ โ โ) โ (๐ถ โ ๐ต) โ โ) |
105 | 104 | 3adant1 1015 |
. . . . . . . . 9
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ (๐ถ โ ๐ต) โ โ) |
106 | 105 | 3ad2ant1 1018 |
. . . . . . . 8
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (๐ถ โ ๐ต) โ โ) |
107 | 99, 102, 106 | add32d 8127 |
. . . . . . 7
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (((๐ถ + ๐ต) + (2 ยท ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต))))) + (๐ถ โ ๐ต)) = (((๐ถ + ๐ต) + (๐ถ โ ๐ต)) + (2 ยท ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต)))))) |
108 | | adddi 7945 |
. . . . . . . 8
โข ((2
โ โ โง ๐ถ
โ โ โง ๐ด
โ โ) โ (2 ยท (๐ถ + ๐ด)) = ((2 ยท ๐ถ) + (2 ยท ๐ด))) |
109 | 21, 65, 76, 108 | mp3an2i 1342 |
. . . . . . 7
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (2 ยท (๐ถ + ๐ด)) = ((2 ยท ๐ถ) + (2 ยท ๐ด))) |
110 | 95, 107, 109 | 3eqtr4d 2220 |
. . . . . 6
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (((๐ถ + ๐ต) + (2 ยท ((โโ(๐ถ + ๐ต)) ยท (โโ(๐ถ โ ๐ต))))) + (๐ถ โ ๐ต)) = (2 ยท (๐ถ + ๐ด))) |
111 | 30, 62, 110 | 3eqtrd 2214 |
. . . . 5
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ
(((โโ(๐ถ + ๐ต)) + (โโ(๐ถ โ ๐ต)))โ2) = (2 ยท (๐ถ + ๐ด))) |
112 | 111 | oveq1d 5892 |
. . . 4
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ
((((โโ(๐ถ +
๐ต)) + (โโ(๐ถ โ ๐ต)))โ2) / (2 ยท 2)) = ((2 ยท
(๐ถ + ๐ด)) / (2 ยท 2))) |
113 | | addcl 7938 |
. . . . . . . . 9
โข ((๐ถ โ โ โง ๐ด โ โ) โ (๐ถ + ๐ด) โ โ) |
114 | 63, 74, 113 | syl2anr 290 |
. . . . . . . 8
โข ((๐ด โ โ โง ๐ถ โ โ) โ (๐ถ + ๐ด) โ โ) |
115 | 114 | 3adant2 1016 |
. . . . . . 7
โข ((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โ (๐ถ + ๐ด) โ โ) |
116 | 115 | 3ad2ant1 1018 |
. . . . . 6
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (๐ถ + ๐ด) โ โ) |
117 | | mulcl 7940 |
. . . . . 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 8781 |
. . . 4
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (((2 ยท (๐ถ + ๐ด)) / 2) / 2) = ((2 ยท (๐ถ + ๐ด)) / (2 ยท 2))) |
122 | 112, 121 | eqtr4d 2213 |
. . 3
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ
((((โโ(๐ถ +
๐ต)) + (โโ(๐ถ โ ๐ต)))โ2) / (2 ยท 2)) = (((2
ยท (๐ถ + ๐ด)) / 2) / 2)) |
123 | 116, 119,
120 | divcanap3d 8754 |
. . . 4
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ ((2 ยท (๐ถ + ๐ด)) / 2) = (๐ถ + ๐ด)) |
124 | 123 | oveq1d 5892 |
. . 3
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (((2 ยท (๐ถ + ๐ด)) / 2) / 2) = ((๐ถ + ๐ด) / 2)) |
125 | 28, 122, 124 | 3eqtrd 2214 |
. 2
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ
((((โโ(๐ถ +
๐ต)) + (โโ(๐ถ โ ๐ต))) / 2)โ2) = ((๐ถ + ๐ด) / 2)) |
126 | 2, 125 | eqtrid 2222 |
1
โข (((๐ด โ โ โง ๐ต โ โ โง ๐ถ โ โ) โง ((๐ดโ2) + (๐ตโ2)) = (๐ถโ2) โง ((๐ด gcd ๐ต) = 1 โง ยฌ 2 โฅ ๐ด)) โ (๐โ2) = ((๐ถ + ๐ด) / 2)) |