Step | Hyp | Ref
| Expression |
1 | | simprl 769 |
. . . . . . . . 9
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β π΄ β
(β€β₯β2)) |
2 | | simprrr 780 |
. . . . . . . . 9
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β π β β€) |
3 | | frmx 41637 |
. . . . . . . . . . 11
β’
Xrm :((β€β₯β2) Γ
β€)βΆβ0 |
4 | 3 | fovcl 7533 |
. . . . . . . . . 10
β’ ((π΄ β
(β€β₯β2) β§ π β β€) β (π΄ Xrm π) β
β0) |
5 | 4 | nn0zd 12580 |
. . . . . . . . 9
β’ ((π΄ β
(β€β₯β2) β§ π β β€) β (π΄ Xrm π) β β€) |
6 | 1, 2, 5 | syl2anc 584 |
. . . . . . . 8
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β β€) |
7 | | simprrl 779 |
. . . . . . . . 9
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β π β β€) |
8 | | frmy 41638 |
. . . . . . . . . 10
β’
Yrm :((β€β₯β2) Γ
β€)βΆβ€ |
9 | 8 | fovcl 7533 |
. . . . . . . . 9
β’ ((π΄ β
(β€β₯β2) β§ π β β€) β (π΄ Yrm π) β β€) |
10 | 1, 7, 9 | syl2anc 584 |
. . . . . . . 8
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm π) β β€) |
11 | | congid 41695 |
. . . . . . . 8
β’ (((π΄ Xrm π) β β€ β§ (π΄ Yrm π) β β€) β (π΄ Xrm π) β₯ ((π΄ Yrm π) β (π΄ Yrm π))) |
12 | 6, 10, 11 | syl2anc 584 |
. . . . . . 7
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ ((π΄ Yrm π) β (π΄ Yrm π))) |
13 | | 2cnd 12286 |
. . . . . . . . . . . . . . 15
β’ (π β β€ β 2 β
β) |
14 | | zcn 12559 |
. . . . . . . . . . . . . . 15
β’ (π β β€ β π β
β) |
15 | 13, 14 | mulcld 11230 |
. . . . . . . . . . . . . 14
β’ (π β β€ β (2
Β· π) β
β) |
16 | 15 | mul02d 11408 |
. . . . . . . . . . . . 13
β’ (π β β€ β (0
Β· (2 Β· π)) =
0) |
17 | 16 | adantl 482 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ π β β€) β (0
Β· (2 Β· π)) =
0) |
18 | 17 | oveq2d 7421 |
. . . . . . . . . . 11
β’ ((π β β€ β§ π β β€) β (π + (0 Β· (2 Β· π))) = (π + 0)) |
19 | | zcn 12559 |
. . . . . . . . . . . . 13
β’ (π β β€ β π β
β) |
20 | 19 | addridd 11410 |
. . . . . . . . . . . 12
β’ (π β β€ β (π + 0) = π) |
21 | 20 | adantr 481 |
. . . . . . . . . . 11
β’ ((π β β€ β§ π β β€) β (π + 0) = π) |
22 | 18, 21 | eqtrd 2772 |
. . . . . . . . . 10
β’ ((π β β€ β§ π β β€) β (π + (0 Β· (2 Β· π))) = π) |
23 | 22 | ad2antll 727 |
. . . . . . . . 9
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π + (0 Β· (2 Β· π))) = π) |
24 | 23 | oveq2d 7421 |
. . . . . . . 8
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm (π + (0 Β· (2 Β· π)))) = (π΄ Yrm π)) |
25 | 24 | oveq1d 7420 |
. . . . . . 7
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β (π΄ Yrm π)) = ((π΄ Yrm π) β (π΄ Yrm π))) |
26 | 12, 25 | breqtrrd 5175 |
. . . . . 6
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β (π΄ Yrm π))) |
27 | 26 | orcd 871 |
. . . . 5
β’ ((πΌ β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β -(π΄ Yrm π)))) |
28 | 27 | ex 413 |
. . . 4
β’ (πΌ β β€ β ((π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€)) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β -(π΄ Yrm π))))) |
29 | | simprl 769 |
. . . . . . . 8
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β π΄ β
(β€β₯β2)) |
30 | | simprrr 780 |
. . . . . . . 8
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β π β β€) |
31 | 29, 30, 5 | syl2anc 584 |
. . . . . . 7
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β β€) |
32 | | simprrl 779 |
. . . . . . . 8
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β π β β€) |
33 | 29, 32, 9 | syl2anc 584 |
. . . . . . 7
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm π) β β€) |
34 | | simpl 483 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β π β β€) |
35 | 34 | peano2zd 12665 |
. . . . . . . . . 10
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π + 1) β
β€) |
36 | | eluzel2 12823 |
. . . . . . . . . . . 12
β’ (π΄ β
(β€β₯β2) β 2 β β€) |
37 | 36 | ad2antrl 726 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β 2 β
β€) |
38 | 37, 30 | zmulcld 12668 |
. . . . . . . . . 10
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (2 Β· π) β
β€) |
39 | 35, 38 | zmulcld 12668 |
. . . . . . . . 9
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π + 1) Β· (2 Β· π)) β
β€) |
40 | 32, 39 | zaddcld 12666 |
. . . . . . . 8
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π + ((π + 1) Β· (2 Β· π))) β β€) |
41 | 8 | fovcl 7533 |
. . . . . . . 8
β’ ((π΄ β
(β€β₯β2) β§ (π + ((π + 1) Β· (2 Β· π))) β β€) β (π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β β€) |
42 | 29, 40, 41 | syl2anc 584 |
. . . . . . 7
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β β€) |
43 | 34, 38 | zmulcld 12668 |
. . . . . . . . 9
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π Β· (2 Β· π)) β
β€) |
44 | 32, 43 | zaddcld 12666 |
. . . . . . . 8
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π + (π Β· (2 Β· π))) β β€) |
45 | 8 | fovcl 7533 |
. . . . . . . 8
β’ ((π΄ β
(β€β₯β2) β§ (π + (π Β· (2 Β· π))) β β€) β (π΄ Yrm (π + (π Β· (2 Β· π)))) β β€) |
46 | 29, 44, 45 | syl2anc 584 |
. . . . . . 7
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm (π + (π Β· (2 Β· π)))) β β€) |
47 | 3 | fovcl 7533 |
. . . . . . . . . . . . . 14
β’ ((π΄ β
(β€β₯β2) β§ (2 Β· π) β β€) β (π΄ Xrm (2 Β· π)) β
β0) |
48 | 47 | nn0zd 12580 |
. . . . . . . . . . . . 13
β’ ((π΄ β
(β€β₯β2) β§ (2 Β· π) β β€) β (π΄ Xrm (2 Β· π)) β
β€) |
49 | 29, 38, 48 | syl2anc 584 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm (2 Β· π)) β
β€) |
50 | 46, 49 | zmulcld 12668 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) β
β€) |
51 | 46 | znegcld 12664 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β -(π΄ Yrm (π + (π Β· (2 Β· π)))) β β€) |
52 | 50, 51 | zsubcld 12667 |
. . . . . . . . . 10
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))) β β€) |
53 | 3 | fovcl 7533 |
. . . . . . . . . . . . 13
β’ ((π΄ β
(β€β₯β2) β§ (π + (π Β· (2 Β· π))) β β€) β (π΄ Xrm (π + (π Β· (2 Β· π)))) β
β0) |
54 | 53 | nn0zd 12580 |
. . . . . . . . . . . 12
β’ ((π΄ β
(β€β₯β2) β§ (π + (π Β· (2 Β· π))) β β€) β (π΄ Xrm (π + (π Β· (2 Β· π)))) β β€) |
55 | 29, 44, 54 | syl2anc 584 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm (π + (π Β· (2 Β· π)))) β β€) |
56 | 8 | fovcl 7533 |
. . . . . . . . . . . 12
β’ ((π΄ β
(β€β₯β2) β§ (2 Β· π) β β€) β (π΄ Yrm (2 Β· π)) β
β€) |
57 | 29, 38, 56 | syl2anc 584 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm (2 Β· π)) β
β€) |
58 | 55, 57 | zmulcld 12668 |
. . . . . . . . . 10
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))) β
β€) |
59 | 37, 31 | zmulcld 12668 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (2 Β· (π΄ Xrm π)) β
β€) |
60 | | dvdsmul2 16218 |
. . . . . . . . . . . . . 14
β’ (((2
Β· (π΄ Xrm
π)) β β€ β§
(π΄ Xrm π) β β€) β (π΄ Xrm π) β₯ ((2 Β· (π΄ Xrm π)) Β· (π΄ Xrm π))) |
61 | 59, 31, 60 | syl2anc 584 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ ((2 Β· (π΄ Xrm π)) Β· (π΄ Xrm π))) |
62 | | rmxdbl 41663 |
. . . . . . . . . . . . . . . 16
β’ ((π΄ β
(β€β₯β2) β§ π β β€) β (π΄ Xrm (2 Β· π)) = ((2 Β· ((π΄ Xrm π)β2)) β
1)) |
63 | 29, 30, 62 | syl2anc 584 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm (2 Β· π)) = ((2 Β· ((π΄ Xrm π)β2)) β
1)) |
64 | 63 | oveq1d 7420 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm (2 Β·
π)) + 1) = (((2 Β·
((π΄ Xrm π)β2)) β 1) +
1)) |
65 | | 2cnd 12286 |
. . . . . . . . . . . . . . . 16
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β 2 β
β) |
66 | 29, 30, 4 | syl2anc 584 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β
β0) |
67 | 66 | nn0cnd 12530 |
. . . . . . . . . . . . . . . . 17
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β β) |
68 | 67 | sqcld 14105 |
. . . . . . . . . . . . . . . 16
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm π)β2) β
β) |
69 | 65, 68 | mulcld 11230 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (2 Β·
((π΄ Xrm π)β2)) β
β) |
70 | | 1cnd 11205 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β 1 β
β) |
71 | 69, 70 | npcand 11571 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (((2 Β·
((π΄ Xrm π)β2)) β 1) + 1) = (2
Β· ((π΄ Xrm
π)β2))) |
72 | 67 | sqvald 14104 |
. . . . . . . . . . . . . . . 16
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm π)β2) = ((π΄ Xrm π) Β· (π΄ Xrm π))) |
73 | 72 | oveq2d 7421 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (2 Β·
((π΄ Xrm π)β2)) = (2 Β· ((π΄ Xrm π) Β· (π΄ Xrm π)))) |
74 | | mulass 11194 |
. . . . . . . . . . . . . . . . 17
β’ ((2
β β β§ (π΄
Xrm π) β
β β§ (π΄
Xrm π) β
β) β ((2 Β· (π΄ Xrm π)) Β· (π΄ Xrm π)) = (2 Β· ((π΄ Xrm π) Β· (π΄ Xrm π)))) |
75 | 74 | eqcomd 2738 |
. . . . . . . . . . . . . . . 16
β’ ((2
β β β§ (π΄
Xrm π) β
β β§ (π΄
Xrm π) β
β) β (2 Β· ((π΄ Xrm π) Β· (π΄ Xrm π))) = ((2 Β· (π΄ Xrm π)) Β· (π΄ Xrm π))) |
76 | 65, 67, 67, 75 | syl3anc 1371 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (2 Β·
((π΄ Xrm π) Β· (π΄ Xrm π))) = ((2 Β· (π΄ Xrm π)) Β· (π΄ Xrm π))) |
77 | 73, 76 | eqtrd 2772 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (2 Β·
((π΄ Xrm π)β2)) = ((2 Β· (π΄ Xrm π)) Β· (π΄ Xrm π))) |
78 | 64, 71, 77 | 3eqtrd 2776 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm (2 Β·
π)) + 1) = ((2 Β·
(π΄ Xrm π)) Β· (π΄ Xrm π))) |
79 | 61, 78 | breqtrrd 5175 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ ((π΄ Xrm (2 Β· π)) + 1)) |
80 | 49 | peano2zd 12665 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm (2 Β·
π)) + 1) β
β€) |
81 | | dvdsmultr2 16237 |
. . . . . . . . . . . . 13
β’ (((π΄ Xrm π) β β€ β§ (π΄ Yrm (π + (π Β· (2 Β· π)))) β β€ β§ ((π΄ Xrm (2 Β·
π)) + 1) β β€)
β ((π΄ Xrm
π) β₯ ((π΄ Xrm (2 Β·
π)) + 1) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· ((π΄ Xrm (2 Β· π)) + 1)))) |
82 | 31, 46, 80, 81 | syl3anc 1371 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm π) β₯ ((π΄ Xrm (2 Β· π)) + 1) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· ((π΄ Xrm (2 Β· π)) + 1)))) |
83 | 79, 82 | mpd 15 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· ((π΄ Xrm (2 Β· π)) + 1))) |
84 | 46 | zcnd 12663 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm (π + (π Β· (2 Β· π)))) β β) |
85 | 84 | mulridd 11227 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· 1) = (π΄ Yrm (π + (π Β· (2 Β· π))))) |
86 | 85 | oveq2d 7421 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) + ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· 1)) = (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) + (π΄ Yrm (π + (π Β· (2 Β· π)))))) |
87 | 49 | zcnd 12663 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm (2 Β· π)) β
β) |
88 | 84, 87, 70 | adddid 11234 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· ((π΄ Xrm (2 Β· π)) + 1)) = (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) + ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· 1))) |
89 | 50 | zcnd 12663 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) β
β) |
90 | 89, 84 | subnegd 11574 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))) = (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) + (π΄ Yrm (π + (π Β· (2 Β· π)))))) |
91 | 86, 88, 90 | 3eqtr4d 2782 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· ((π΄ Xrm (2 Β· π)) + 1)) = (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) β -(π΄ Yrm (π + (π Β· (2 Β· π)))))) |
92 | 83, 91 | breqtrd 5173 |
. . . . . . . . . 10
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) β -(π΄ Yrm (π + (π Β· (2 Β· π)))))) |
93 | 8 | fovcl 7533 |
. . . . . . . . . . . . . . 15
β’ ((π΄ β
(β€β₯β2) β§ π β β€) β (π΄ Yrm π) β β€) |
94 | 29, 30, 93 | syl2anc 584 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm π) β β€) |
95 | 37, 94 | zmulcld 12668 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (2 Β· (π΄ Yrm π)) β
β€) |
96 | | dvdsmul2 16218 |
. . . . . . . . . . . . 13
β’ (((2
Β· (π΄ Yrm
π)) β β€ β§
(π΄ Xrm π) β β€) β (π΄ Xrm π) β₯ ((2 Β· (π΄ Yrm π)) Β· (π΄ Xrm π))) |
97 | 95, 31, 96 | syl2anc 584 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ ((2 Β· (π΄ Yrm π)) Β· (π΄ Xrm π))) |
98 | | rmydbl 41664 |
. . . . . . . . . . . . . 14
β’ ((π΄ β
(β€β₯β2) β§ π β β€) β (π΄ Yrm (2 Β· π)) = ((2 Β· (π΄ Xrm π)) Β· (π΄ Yrm π))) |
99 | 29, 30, 98 | syl2anc 584 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm (2 Β· π)) = ((2 Β· (π΄ Xrm π)) Β· (π΄ Yrm π))) |
100 | 94 | zcnd 12663 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm π) β β) |
101 | 65, 67, 100 | mul32d 11420 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((2 Β·
(π΄ Xrm π)) Β· (π΄ Yrm π)) = ((2 Β· (π΄ Yrm π)) Β· (π΄ Xrm π))) |
102 | 99, 101 | eqtrd 2772 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm (2 Β· π)) = ((2 Β· (π΄ Yrm π)) Β· (π΄ Xrm π))) |
103 | 97, 102 | breqtrrd 5175 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ (π΄ Yrm (2 Β· π))) |
104 | | dvdsmultr2 16237 |
. . . . . . . . . . . 12
β’ (((π΄ Xrm π) β β€ β§ (π΄ Xrm (π + (π Β· (2 Β· π)))) β β€ β§ (π΄ Yrm (2 Β· π)) β β€) β
((π΄ Xrm π) β₯ (π΄ Yrm (2 Β· π)) β (π΄ Xrm π) β₯ ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))))) |
105 | 31, 55, 57, 104 | syl3anc 1371 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm π) β₯ (π΄ Yrm (2 Β· π)) β (π΄ Xrm π) β₯ ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))))) |
106 | 103, 105 | mpd 15 |
. . . . . . . . . 10
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π)))) |
107 | 31, 52, 58, 92, 106 | dvds2addd 16231 |
. . . . . . . . 9
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ ((((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))) + ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))))) |
108 | 34 | zcnd 12663 |
. . . . . . . . . . . . . . . 16
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β π β β) |
109 | 38 | zcnd 12663 |
. . . . . . . . . . . . . . . 16
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (2 Β· π) β
β) |
110 | 108, 70, 109 | adddird 11235 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π + 1) Β· (2 Β· π)) = ((π Β· (2 Β· π)) + (1 Β· (2 Β· π)))) |
111 | 110 | oveq2d 7421 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π + ((π + 1) Β· (2 Β· π))) = (π + ((π Β· (2 Β· π)) + (1 Β· (2 Β· π))))) |
112 | 32 | zcnd 12663 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β π β β) |
113 | 43 | zcnd 12663 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π Β· (2 Β· π)) β
β) |
114 | | 1zzd 12589 |
. . . . . . . . . . . . . . . . 17
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β 1 β
β€) |
115 | 114, 38 | zmulcld 12668 |
. . . . . . . . . . . . . . . 16
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (1 Β· (2
Β· π)) β
β€) |
116 | 115 | zcnd 12663 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (1 Β· (2
Β· π)) β
β) |
117 | 112, 113,
116 | addassd 11232 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π + (π Β· (2 Β· π))) + (1 Β· (2 Β· π))) = (π + ((π Β· (2 Β· π)) + (1 Β· (2 Β· π))))) |
118 | 109 | mullidd 11228 |
. . . . . . . . . . . . . . 15
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (1 Β· (2
Β· π)) = (2 Β·
π)) |
119 | 118 | oveq2d 7421 |
. . . . . . . . . . . . . 14
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π + (π Β· (2 Β· π))) + (1 Β· (2 Β· π))) = ((π + (π Β· (2 Β· π))) + (2 Β· π))) |
120 | 111, 117,
119 | 3eqtr2d 2778 |
. . . . . . . . . . . . 13
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π + ((π + 1) Β· (2 Β· π))) = ((π + (π Β· (2 Β· π))) + (2 Β· π))) |
121 | 120 | oveq2d 7421 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) = (π΄ Yrm ((π + (π Β· (2 Β· π))) + (2 Β· π)))) |
122 | | rmyadd 41655 |
. . . . . . . . . . . . 13
β’ ((π΄ β
(β€β₯β2) β§ (π + (π Β· (2 Β· π))) β β€ β§ (2 Β· π) β β€) β (π΄ Yrm ((π + (π Β· (2 Β· π))) + (2 Β· π))) = (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) + ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))))) |
123 | 29, 44, 38, 122 | syl3anc 1371 |
. . . . . . . . . . . 12
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm ((π + (π Β· (2 Β· π))) + (2 Β· π))) = (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) + ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))))) |
124 | 121, 123 | eqtrd 2772 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) = (((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) + ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))))) |
125 | 124 | oveq1d 7420 |
. . . . . . . . . 10
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))) = ((((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) + ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π)))) β -(π΄ Yrm (π + (π Β· (2 Β· π)))))) |
126 | 58 | zcnd 12663 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))) β
β) |
127 | 51 | zcnd 12663 |
. . . . . . . . . . 11
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β -(π΄ Yrm (π + (π Β· (2 Β· π)))) β β) |
128 | 89, 126, 127 | addsubd 11588 |
. . . . . . . . . 10
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) + ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π)))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))) = ((((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))) + ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))))) |
129 | 125, 128 | eqtrd 2772 |
. . . . . . . . 9
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))) = ((((π΄ Yrm (π + (π Β· (2 Β· π)))) Β· (π΄ Xrm (2 Β· π))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))) + ((π΄ Xrm (π + (π Β· (2 Β· π)))) Β· (π΄ Yrm (2 Β· π))))) |
130 | 107, 129 | breqtrrd 5175 |
. . . . . . . 8
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm (π + (π Β· (2 Β· π)))))) |
131 | 130 | olcd 872 |
. . . . . . 7
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β (π΄ Yrm (π + (π Β· (2 Β· π))))) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))))) |
132 | | jm2.25lem1 41722 |
. . . . . . 7
β’ ((((π΄ Xrm π) β β€ β§ (π΄ Yrm π) β β€) β§ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β β€ β§ (π΄ Yrm (π + (π Β· (2 Β· π)))) β β€) β§ ((π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β (π΄ Yrm (π + (π Β· (2 Β· π))))) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm (π + (π Β· (2 Β· π))))))) β (((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π))) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm π))))) |
133 | 31, 33, 42, 46, 131, 132 | syl221anc 1381 |
. . . . . 6
β’ ((π β β€ β§ (π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€))) β (((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π))) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm π))))) |
134 | 133 | pm5.74da 802 |
. . . . 5
β’ (π β β€ β (((π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€)) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)))) β ((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm π)))))) |
135 | | oveq1 7412 |
. . . . . . . . . . 11
β’ (π = π β (π Β· (2 Β· π)) = (π Β· (2 Β· π))) |
136 | 135 | oveq2d 7421 |
. . . . . . . . . 10
β’ (π = π β (π + (π Β· (2 Β· π))) = (π + (π Β· (2 Β· π)))) |
137 | 136 | oveq2d 7421 |
. . . . . . . . 9
β’ (π = π β (π΄ Yrm (π + (π Β· (2 Β· π)))) = (π΄ Yrm (π + (π Β· (2 Β· π))))) |
138 | 137 | oveq1d 7420 |
. . . . . . . 8
β’ (π = π β ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) = ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π))) |
139 | 138 | breq2d 5159 |
. . . . . . 7
β’ (π = π β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)))) |
140 | 137 | oveq1d 7420 |
. . . . . . . 8
β’ (π = π β ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)) = ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π))) |
141 | 140 | breq2d 5159 |
. . . . . . 7
β’ (π = π β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)))) |
142 | 139, 141 | orbi12d 917 |
. . . . . 6
β’ (π = π β (((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π))) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π))))) |
143 | 142 | imbi2d 340 |
. . . . 5
β’ (π = π β (((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)))) β ((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)))))) |
144 | | oveq1 7412 |
. . . . . . . . . . 11
β’ (π = (π + 1) β (π Β· (2 Β· π)) = ((π + 1) Β· (2 Β· π))) |
145 | 144 | oveq2d 7421 |
. . . . . . . . . 10
β’ (π = (π + 1) β (π + (π Β· (2 Β· π))) = (π + ((π + 1) Β· (2 Β· π)))) |
146 | 145 | oveq2d 7421 |
. . . . . . . . 9
β’ (π = (π + 1) β (π΄ Yrm (π + (π Β· (2 Β· π)))) = (π΄ Yrm (π + ((π + 1) Β· (2 Β· π))))) |
147 | 146 | oveq1d 7420 |
. . . . . . . 8
β’ (π = (π + 1) β ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) = ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β (π΄ Yrm π))) |
148 | 147 | breq2d 5159 |
. . . . . . 7
β’ (π = (π + 1) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β (π΄ Yrm π)))) |
149 | 146 | oveq1d 7420 |
. . . . . . . 8
β’ (π = (π + 1) β ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)) = ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm π))) |
150 | 149 | breq2d 5159 |
. . . . . . 7
β’ (π = (π + 1) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm π)))) |
151 | 148, 150 | orbi12d 917 |
. . . . . 6
β’ (π = (π + 1) β (((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π))) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm π))))) |
152 | 151 | imbi2d 340 |
. . . . 5
β’ (π = (π + 1) β (((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)))) β ((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + ((π + 1) Β· (2 Β· π)))) β -(π΄ Yrm π)))))) |
153 | | oveq1 7412 |
. . . . . . . . . . 11
β’ (π = 0 β (π Β· (2 Β· π)) = (0 Β· (2 Β· π))) |
154 | 153 | oveq2d 7421 |
. . . . . . . . . 10
β’ (π = 0 β (π + (π Β· (2 Β· π))) = (π + (0 Β· (2 Β· π)))) |
155 | 154 | oveq2d 7421 |
. . . . . . . . 9
β’ (π = 0 β (π΄ Yrm (π + (π Β· (2 Β· π)))) = (π΄ Yrm (π + (0 Β· (2 Β· π))))) |
156 | 155 | oveq1d 7420 |
. . . . . . . 8
β’ (π = 0 β ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) = ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β (π΄ Yrm π))) |
157 | 156 | breq2d 5159 |
. . . . . . 7
β’ (π = 0 β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β (π΄ Yrm π)))) |
158 | 155 | oveq1d 7420 |
. . . . . . . 8
β’ (π = 0 β ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)) = ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β -(π΄ Yrm π))) |
159 | 158 | breq2d 5159 |
. . . . . . 7
β’ (π = 0 β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β -(π΄ Yrm π)))) |
160 | 157, 159 | orbi12d 917 |
. . . . . 6
β’ (π = 0 β (((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π))) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β -(π΄ Yrm π))))) |
161 | 160 | imbi2d 340 |
. . . . 5
β’ (π = 0 β (((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)))) β ((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β -(π΄ Yrm π)))))) |
162 | | oveq1 7412 |
. . . . . . . . . . 11
β’ (π = πΌ β (π Β· (2 Β· π)) = (πΌ Β· (2 Β· π))) |
163 | 162 | oveq2d 7421 |
. . . . . . . . . 10
β’ (π = πΌ β (π + (π Β· (2 Β· π))) = (π + (πΌ Β· (2 Β· π)))) |
164 | 163 | oveq2d 7421 |
. . . . . . . . 9
β’ (π = πΌ β (π΄ Yrm (π + (π Β· (2 Β· π)))) = (π΄ Yrm (π + (πΌ Β· (2 Β· π))))) |
165 | 164 | oveq1d 7420 |
. . . . . . . 8
β’ (π = πΌ β ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) = ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β (π΄ Yrm π))) |
166 | 165 | breq2d 5159 |
. . . . . . 7
β’ (π = πΌ β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β (π΄ Yrm π)))) |
167 | 164 | oveq1d 7420 |
. . . . . . . 8
β’ (π = πΌ β ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)) = ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β -(π΄ Yrm π))) |
168 | 167 | breq2d 5159 |
. . . . . . 7
β’ (π = πΌ β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)) β (π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β -(π΄ Yrm π)))) |
169 | 166, 168 | orbi12d 917 |
. . . . . 6
β’ (π = πΌ β (((π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π))) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β -(π΄ Yrm π))))) |
170 | 169 | imbi2d 340 |
. . . . 5
β’ (π = πΌ β (((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (π Β· (2 Β· π)))) β -(π΄ Yrm π)))) β ((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β -(π΄ Yrm π)))))) |
171 | 134, 143,
152, 161, 170 | zindbi 41670 |
. . . 4
β’ (πΌ β β€ β (((π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€)) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (0 Β· (2 Β· π)))) β -(π΄ Yrm π)))) β ((π΄ β (β€β₯β2)
β§ (π β β€
β§ π β β€))
β ((π΄ Xrm
π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β -(π΄ Yrm π)))))) |
172 | 28, 171 | mpbid 231 |
. . 3
β’ (πΌ β β€ β ((π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€)) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β -(π΄ Yrm π))))) |
173 | 172 | impcom 408 |
. 2
β’ (((π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€)) β§ πΌ β β€) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β -(π΄ Yrm π)))) |
174 | 173 | 3impa 1110 |
1
β’ ((π΄ β
(β€β₯β2) β§ (π β β€ β§ π β β€) β§ πΌ β β€) β ((π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β (π΄ Yrm π)) β¨ (π΄ Xrm π) β₯ ((π΄ Yrm (π + (πΌ Β· (2 Β· π)))) β -(π΄ Yrm π)))) |