Step | Hyp | Ref
| Expression |
1 | | 4sqlem5.3 |
. . . . . 6
โข (๐ โ ๐ โ โ) |
2 | 1 | adantr 276 |
. . . . 5
โข ((๐ โง ๐) โ ๐ โ โ) |
3 | 2 | nnzd 9374 |
. . . 4
โข ((๐ โง ๐) โ ๐ โ โค) |
4 | | zsqcl 10591 |
. . . 4
โข (๐ โ โค โ (๐โ2) โ
โค) |
5 | 3, 4 | syl 14 |
. . 3
โข ((๐ โง ๐) โ (๐โ2) โ โค) |
6 | | 4sqlem5.2 |
. . . . . 6
โข (๐ โ ๐ด โ โค) |
7 | 6 | adantr 276 |
. . . . 5
โข ((๐ โง ๐) โ ๐ด โ โค) |
8 | 2 | nnred 8932 |
. . . . . . . . 9
โข ((๐ โง ๐) โ ๐ โ โ) |
9 | 8 | rehalfcld 9165 |
. . . . . . . 8
โข ((๐ โง ๐) โ (๐ / 2) โ โ) |
10 | 9 | recnd 7986 |
. . . . . . 7
โข ((๐ โง ๐) โ (๐ / 2) โ โ) |
11 | 10 | negnegd 8259 |
. . . . . 6
โข ((๐ โง ๐) โ --(๐ / 2) = (๐ / 2)) |
12 | | 4sqlem5.4 |
. . . . . . . . . . . . . . 15
โข ๐ต = (((๐ด + (๐ / 2)) mod ๐) โ (๐ / 2)) |
13 | 6, 1, 12 | 4sqlem5 12380 |
. . . . . . . . . . . . . 14
โข (๐ โ (๐ต โ โค โง ((๐ด โ ๐ต) / ๐) โ โค)) |
14 | 13 | adantr 276 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐) โ (๐ต โ โค โง ((๐ด โ ๐ต) / ๐) โ โค)) |
15 | 14 | simpld 112 |
. . . . . . . . . . . 12
โข ((๐ โง ๐) โ ๐ต โ โค) |
16 | 15 | zred 9375 |
. . . . . . . . . . 11
โข ((๐ โง ๐) โ ๐ต โ โ) |
17 | 6, 1, 12 | 4sqlem6 12381 |
. . . . . . . . . . . . 13
โข (๐ โ (-(๐ / 2) โค ๐ต โง ๐ต < (๐ / 2))) |
18 | 17 | adantr 276 |
. . . . . . . . . . . 12
โข ((๐ โง ๐) โ (-(๐ / 2) โค ๐ต โง ๐ต < (๐ / 2))) |
19 | 18 | simprd 114 |
. . . . . . . . . . 11
โข ((๐ โง ๐) โ ๐ต < (๐ / 2)) |
20 | 16, 19 | ltned 8071 |
. . . . . . . . . 10
โข ((๐ โง ๐) โ ๐ต โ (๐ / 2)) |
21 | 20 | neneqd 2368 |
. . . . . . . . 9
โข ((๐ โง ๐) โ ยฌ ๐ต = (๐ / 2)) |
22 | | 2cnd 8992 |
. . . . . . . . . . . . . . 15
โข ((๐ โง ๐) โ 2 โ โ) |
23 | 22 | sqvald 10651 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐) โ (2โ2) = (2 ยท
2)) |
24 | 23 | oveq2d 5891 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐) โ ((๐โ2) / (2โ2)) = ((๐โ2) / (2 ยท 2))) |
25 | 2 | nncnd 8933 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐) โ ๐ โ โ) |
26 | | 2ap0 9012 |
. . . . . . . . . . . . . . 15
โข 2 #
0 |
27 | 26 | a1i 9 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐) โ 2 # 0) |
28 | 25, 22, 27 | sqdivapd 10667 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐) โ ((๐ / 2)โ2) = ((๐โ2) / (2โ2))) |
29 | 25 | sqcld 10652 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐) โ (๐โ2) โ โ) |
30 | 29, 22, 22, 27, 27 | divdivap1d 8779 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐) โ (((๐โ2) / 2) / 2) = ((๐โ2) / (2 ยท 2))) |
31 | 24, 28, 30 | 3eqtr4d 2220 |
. . . . . . . . . . . 12
โข ((๐ โง ๐) โ ((๐ / 2)โ2) = (((๐โ2) / 2) / 2)) |
32 | 29 | halfcld 9163 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐) โ ((๐โ2) / 2) โ
โ) |
33 | 32 | halfcld 9163 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐) โ (((๐โ2) / 2) / 2) โ
โ) |
34 | 15 | zcnd 9376 |
. . . . . . . . . . . . . 14
โข ((๐ โง ๐) โ ๐ต โ โ) |
35 | 34 | sqcld 10652 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐) โ (๐ตโ2) โ โ) |
36 | | 4sqlem10.5 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐) โ ((((๐โ2) / 2) / 2) โ (๐ตโ2)) = 0) |
37 | 33, 35, 36 | subeq0d 8276 |
. . . . . . . . . . . 12
โข ((๐ โง ๐) โ (((๐โ2) / 2) / 2) = (๐ตโ2)) |
38 | 31, 37 | eqtr2d 2211 |
. . . . . . . . . . 11
โข ((๐ โง ๐) โ (๐ตโ2) = ((๐ / 2)โ2)) |
39 | | zq 9626 |
. . . . . . . . . . . . 13
โข (๐ต โ โค โ ๐ต โ
โ) |
40 | 15, 39 | syl 14 |
. . . . . . . . . . . 12
โข ((๐ โง ๐) โ ๐ต โ โ) |
41 | | 2nn 9080 |
. . . . . . . . . . . . . 14
โข 2 โ
โ |
42 | 41 | a1i 9 |
. . . . . . . . . . . . 13
โข ((๐ โง ๐) โ 2 โ โ) |
43 | | znq 9624 |
. . . . . . . . . . . . 13
โข ((๐ โ โค โง 2 โ
โ) โ (๐ / 2)
โ โ) |
44 | 3, 42, 43 | syl2anc 411 |
. . . . . . . . . . . 12
โข ((๐ โง ๐) โ (๐ / 2) โ โ) |
45 | | qsqeqor 10631 |
. . . . . . . . . . . 12
โข ((๐ต โ โ โง (๐ / 2) โ โ) โ
((๐ตโ2) = ((๐ / 2)โ2) โ (๐ต = (๐ / 2) โจ ๐ต = -(๐ / 2)))) |
46 | 40, 44, 45 | syl2anc 411 |
. . . . . . . . . . 11
โข ((๐ โง ๐) โ ((๐ตโ2) = ((๐ / 2)โ2) โ (๐ต = (๐ / 2) โจ ๐ต = -(๐ / 2)))) |
47 | 38, 46 | mpbid 147 |
. . . . . . . . . 10
โข ((๐ โง ๐) โ (๐ต = (๐ / 2) โจ ๐ต = -(๐ / 2))) |
48 | 47 | ord 724 |
. . . . . . . . 9
โข ((๐ โง ๐) โ (ยฌ ๐ต = (๐ / 2) โ ๐ต = -(๐ / 2))) |
49 | 21, 48 | mpd 13 |
. . . . . . . 8
โข ((๐ โง ๐) โ ๐ต = -(๐ / 2)) |
50 | 49, 15 | eqeltrrd 2255 |
. . . . . . 7
โข ((๐ โง ๐) โ -(๐ / 2) โ โค) |
51 | 50 | znegcld 9377 |
. . . . . 6
โข ((๐ โง ๐) โ --(๐ / 2) โ โค) |
52 | 11, 51 | eqeltrrd 2255 |
. . . . 5
โข ((๐ โง ๐) โ (๐ / 2) โ โค) |
53 | 7, 52 | zaddcld 9379 |
. . . 4
โข ((๐ โง ๐) โ (๐ด + (๐ / 2)) โ โค) |
54 | | zsqcl 10591 |
. . . 4
โข ((๐ด + (๐ / 2)) โ โค โ ((๐ด + (๐ / 2))โ2) โ
โค) |
55 | 53, 54 | syl 14 |
. . 3
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2))โ2) โ
โค) |
56 | 53, 3 | zmulcld 9381 |
. . 3
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) ยท ๐) โ โค) |
57 | | zq 9626 |
. . . . . . . . . 10
โข (๐ด โ โค โ ๐ด โ
โ) |
58 | 7, 57 | syl 14 |
. . . . . . . . 9
โข ((๐ โง ๐) โ ๐ด โ โ) |
59 | | qaddcl 9635 |
. . . . . . . . 9
โข ((๐ด โ โ โง (๐ / 2) โ โ) โ
(๐ด + (๐ / 2)) โ โ) |
60 | 58, 44, 59 | syl2anc 411 |
. . . . . . . 8
โข ((๐ โง ๐) โ (๐ด + (๐ / 2)) โ โ) |
61 | | nnq 9633 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โ) |
62 | 2, 61 | syl 14 |
. . . . . . . 8
โข ((๐ โง ๐) โ ๐ โ โ) |
63 | 2 | nngt0d 8963 |
. . . . . . . 8
โข ((๐ โง ๐) โ 0 < ๐) |
64 | 60, 62, 63 | modqcld 10328 |
. . . . . . 7
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) mod ๐) โ โ) |
65 | | qcn 9634 |
. . . . . . 7
โข (((๐ด + (๐ / 2)) mod ๐) โ โ โ ((๐ด + (๐ / 2)) mod ๐) โ โ) |
66 | 64, 65 | syl 14 |
. . . . . 6
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) mod ๐) โ โ) |
67 | | 0cnd 7950 |
. . . . . 6
โข ((๐ โง ๐) โ 0 โ โ) |
68 | | df-neg 8131 |
. . . . . . 7
โข -(๐ / 2) = (0 โ (๐ / 2)) |
69 | 49, 12, 68 | 3eqtr3g 2233 |
. . . . . 6
โข ((๐ โง ๐) โ (((๐ด + (๐ / 2)) mod ๐) โ (๐ / 2)) = (0 โ (๐ / 2))) |
70 | 66, 67, 10, 69 | subcan2d 8310 |
. . . . 5
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) mod ๐) = 0) |
71 | | dvdsval3 11798 |
. . . . . 6
โข ((๐ โ โ โง (๐ด + (๐ / 2)) โ โค) โ (๐ โฅ (๐ด + (๐ / 2)) โ ((๐ด + (๐ / 2)) mod ๐) = 0)) |
72 | 2, 53, 71 | syl2anc 411 |
. . . . 5
โข ((๐ โง ๐) โ (๐ โฅ (๐ด + (๐ / 2)) โ ((๐ด + (๐ / 2)) mod ๐) = 0)) |
73 | 70, 72 | mpbird 167 |
. . . 4
โข ((๐ โง ๐) โ ๐ โฅ (๐ด + (๐ / 2))) |
74 | | dvdssq 12032 |
. . . . 5
โข ((๐ โ โค โง (๐ด + (๐ / 2)) โ โค) โ (๐ โฅ (๐ด + (๐ / 2)) โ (๐โ2) โฅ ((๐ด + (๐ / 2))โ2))) |
75 | 3, 53, 74 | syl2anc 411 |
. . . 4
โข ((๐ โง ๐) โ (๐ โฅ (๐ด + (๐ / 2)) โ (๐โ2) โฅ ((๐ด + (๐ / 2))โ2))) |
76 | 73, 75 | mpbid 147 |
. . 3
โข ((๐ โง ๐) โ (๐โ2) โฅ ((๐ด + (๐ / 2))โ2)) |
77 | 25 | sqvald 10651 |
. . . 4
โข ((๐ โง ๐) โ (๐โ2) = (๐ ยท ๐)) |
78 | 2 | nnne0d 8964 |
. . . . . 6
โข ((๐ โง ๐) โ ๐ โ 0) |
79 | | dvdsmulcr 11828 |
. . . . . 6
โข ((๐ โ โค โง (๐ด + (๐ / 2)) โ โค โง (๐ โ โค โง ๐ โ 0)) โ ((๐ ยท ๐) โฅ ((๐ด + (๐ / 2)) ยท ๐) โ ๐ โฅ (๐ด + (๐ / 2)))) |
80 | 3, 53, 3, 78, 79 | syl112anc 1242 |
. . . . 5
โข ((๐ โง ๐) โ ((๐ ยท ๐) โฅ ((๐ด + (๐ / 2)) ยท ๐) โ ๐ โฅ (๐ด + (๐ / 2)))) |
81 | 73, 80 | mpbird 167 |
. . . 4
โข ((๐ โง ๐) โ (๐ ยท ๐) โฅ ((๐ด + (๐ / 2)) ยท ๐)) |
82 | 77, 81 | eqbrtrd 4026 |
. . 3
โข ((๐ โง ๐) โ (๐โ2) โฅ ((๐ด + (๐ / 2)) ยท ๐)) |
83 | 5, 55, 56, 76, 82 | dvds2subd 11834 |
. 2
โข ((๐ โง ๐) โ (๐โ2) โฅ (((๐ด + (๐ / 2))โ2) โ ((๐ด + (๐ / 2)) ยท ๐))) |
84 | 53 | zcnd 9376 |
. . . . 5
โข ((๐ โง ๐) โ (๐ด + (๐ / 2)) โ โ) |
85 | 84 | sqvald 10651 |
. . . 4
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2))โ2) = ((๐ด + (๐ / 2)) ยท (๐ด + (๐ / 2)))) |
86 | 85 | oveq1d 5890 |
. . 3
โข ((๐ โง ๐) โ (((๐ด + (๐ / 2))โ2) โ ((๐ด + (๐ / 2)) ยท ๐)) = (((๐ด + (๐ / 2)) ยท (๐ด + (๐ / 2))) โ ((๐ด + (๐ / 2)) ยท ๐))) |
87 | 84, 84, 25 | subdid 8371 |
. . 3
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) ยท ((๐ด + (๐ / 2)) โ ๐)) = (((๐ด + (๐ / 2)) ยท (๐ด + (๐ / 2))) โ ((๐ด + (๐ / 2)) ยท ๐))) |
88 | 25 | 2halvesd 9164 |
. . . . . . 7
โข ((๐ โง ๐) โ ((๐ / 2) + (๐ / 2)) = ๐) |
89 | 88 | oveq2d 5891 |
. . . . . 6
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) โ ((๐ / 2) + (๐ / 2))) = ((๐ด + (๐ / 2)) โ ๐)) |
90 | 7 | zcnd 9376 |
. . . . . . 7
โข ((๐ โง ๐) โ ๐ด โ โ) |
91 | 90, 10, 10 | pnpcan2d 8306 |
. . . . . 6
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) โ ((๐ / 2) + (๐ / 2))) = (๐ด โ (๐ / 2))) |
92 | 89, 91 | eqtr3d 2212 |
. . . . 5
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) โ ๐) = (๐ด โ (๐ / 2))) |
93 | 92 | oveq2d 5891 |
. . . 4
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) ยท ((๐ด + (๐ / 2)) โ ๐)) = ((๐ด + (๐ / 2)) ยท (๐ด โ (๐ / 2)))) |
94 | | subsq 10627 |
. . . . 5
โข ((๐ด โ โ โง (๐ / 2) โ โ) โ
((๐ดโ2) โ ((๐ / 2)โ2)) = ((๐ด + (๐ / 2)) ยท (๐ด โ (๐ / 2)))) |
95 | 90, 10, 94 | syl2anc 411 |
. . . 4
โข ((๐ โง ๐) โ ((๐ดโ2) โ ((๐ / 2)โ2)) = ((๐ด + (๐ / 2)) ยท (๐ด โ (๐ / 2)))) |
96 | 31 | oveq2d 5891 |
. . . 4
โข ((๐ โง ๐) โ ((๐ดโ2) โ ((๐ / 2)โ2)) = ((๐ดโ2) โ (((๐โ2) / 2) / 2))) |
97 | 93, 95, 96 | 3eqtr2d 2216 |
. . 3
โข ((๐ โง ๐) โ ((๐ด + (๐ / 2)) ยท ((๐ด + (๐ / 2)) โ ๐)) = ((๐ดโ2) โ (((๐โ2) / 2) / 2))) |
98 | 86, 87, 97 | 3eqtr2d 2216 |
. 2
โข ((๐ โง ๐) โ (((๐ด + (๐ / 2))โ2) โ ((๐ด + (๐ / 2)) ยท ๐)) = ((๐ดโ2) โ (((๐โ2) / 2) / 2))) |
99 | 83, 98 | breqtrd 4030 |
1
โข ((๐ โง ๐) โ (๐โ2) โฅ ((๐ดโ2) โ (((๐โ2) / 2) / 2))) |