Step | Hyp | Ref
| Expression |
1 | | oveq1 7413 |
. . . . . . . . . . 11
β’ (π₯ = 0 β (π₯ + 1) = (0 + 1)) |
2 | | 0p1e1 12331 |
. . . . . . . . . . 11
β’ (0 + 1) =
1 |
3 | 1, 2 | eqtrdi 2789 |
. . . . . . . . . 10
β’ (π₯ = 0 β (π₯ + 1) = 1) |
4 | 3 | oveq2d 7422 |
. . . . . . . . 9
β’ (π₯ = 0 β (2β(π₯ + 1)) =
(2β1)) |
5 | | 2cn 12284 |
. . . . . . . . . . 11
β’ 2 β
β |
6 | | exp1 14030 |
. . . . . . . . . . 11
β’ (2 β
β β (2β1) = 2) |
7 | 5, 6 | ax-mp 5 |
. . . . . . . . . 10
β’
(2β1) = 2 |
8 | | df-2 12272 |
. . . . . . . . . 10
β’ 2 = (1 +
1) |
9 | 7, 8 | eqtri 2761 |
. . . . . . . . 9
β’
(2β1) = (1 + 1) |
10 | 4, 9 | eqtrdi 2789 |
. . . . . . . 8
β’ (π₯ = 0 β (2β(π₯ + 1)) = (1 +
1)) |
11 | 10 | oveq1d 7421 |
. . . . . . 7
β’ (π₯ = 0 β ((2β(π₯ + 1)) β 1) = ((1 + 1)
β 1)) |
12 | | ax-1cn 11165 |
. . . . . . . 8
β’ 1 β
β |
13 | 12, 12 | pncan3oi 11473 |
. . . . . . 7
β’ ((1 + 1)
β 1) = 1 |
14 | 11, 13 | eqtrdi 2789 |
. . . . . 6
β’ (π₯ = 0 β ((2β(π₯ + 1)) β 1) =
1) |
15 | 14 | fveq2d 6893 |
. . . . 5
β’ (π₯ = 0 β (seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) = (seq1( + ,
πΉ)β1)) |
16 | | fveq2 6889 |
. . . . 5
β’ (π₯ = 0 β (seq0( + , πΊ)βπ₯) = (seq0( + , πΊ)β0)) |
17 | 15, 16 | breq12d 5161 |
. . . 4
β’ (π₯ = 0 β ((seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) β€ (seq0( +
, πΊ)βπ₯) β (seq1( + , πΉ)β1) β€ (seq0( + , πΊ)β0))) |
18 | 17 | imbi2d 341 |
. . 3
β’ (π₯ = 0 β ((π β (seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) β€ (seq0( + , πΊ)βπ₯)) β (π β (seq1( + , πΉ)β1) β€ (seq0( + , πΊ)β0)))) |
19 | | oveq1 7413 |
. . . . . . 7
β’ (π₯ = π β (π₯ + 1) = (π + 1)) |
20 | 19 | oveq2d 7422 |
. . . . . 6
β’ (π₯ = π β (2β(π₯ + 1)) = (2β(π + 1))) |
21 | 20 | fvoveq1d 7428 |
. . . . 5
β’ (π₯ = π β (seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) = (seq1( + , πΉ)β((2β(π + 1)) β
1))) |
22 | | fveq2 6889 |
. . . . 5
β’ (π₯ = π β (seq0( + , πΊ)βπ₯) = (seq0( + , πΊ)βπ)) |
23 | 21, 22 | breq12d 5161 |
. . . 4
β’ (π₯ = π β ((seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) β€ (seq0( + , πΊ)βπ₯) β (seq1( + , πΉ)β((2β(π + 1)) β 1)) β€ (seq0( + , πΊ)βπ))) |
24 | 23 | imbi2d 341 |
. . 3
β’ (π₯ = π β ((π β (seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) β€ (seq0( + , πΊ)βπ₯)) β (π β (seq1( + , πΉ)β((2β(π + 1)) β 1)) β€ (seq0( + , πΊ)βπ)))) |
25 | | oveq1 7413 |
. . . . . . 7
β’ (π₯ = (π + 1) β (π₯ + 1) = ((π + 1) + 1)) |
26 | 25 | oveq2d 7422 |
. . . . . 6
β’ (π₯ = (π + 1) β (2β(π₯ + 1)) = (2β((π + 1) + 1))) |
27 | 26 | fvoveq1d 7428 |
. . . . 5
β’ (π₯ = (π + 1) β (seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) = (seq1( + , πΉ)β((2β((π + 1) + 1)) β
1))) |
28 | | fveq2 6889 |
. . . . 5
β’ (π₯ = (π + 1) β (seq0( + , πΊ)βπ₯) = (seq0( + , πΊ)β(π + 1))) |
29 | 27, 28 | breq12d 5161 |
. . . 4
β’ (π₯ = (π + 1) β ((seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) β€ (seq0( + , πΊ)βπ₯) β (seq1( + , πΉ)β((2β((π + 1) + 1)) β 1)) β€ (seq0( + , πΊ)β(π + 1)))) |
30 | 29 | imbi2d 341 |
. . 3
β’ (π₯ = (π + 1) β ((π β (seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) β€ (seq0( + , πΊ)βπ₯)) β (π β (seq1( + , πΉ)β((2β((π + 1) + 1)) β 1)) β€ (seq0( + , πΊ)β(π + 1))))) |
31 | | oveq1 7413 |
. . . . . . 7
β’ (π₯ = π β (π₯ + 1) = (π + 1)) |
32 | 31 | oveq2d 7422 |
. . . . . 6
β’ (π₯ = π β (2β(π₯ + 1)) = (2β(π + 1))) |
33 | 32 | fvoveq1d 7428 |
. . . . 5
β’ (π₯ = π β (seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) = (seq1( + , πΉ)β((2β(π + 1)) β
1))) |
34 | | fveq2 6889 |
. . . . 5
β’ (π₯ = π β (seq0( + , πΊ)βπ₯) = (seq0( + , πΊ)βπ)) |
35 | 33, 34 | breq12d 5161 |
. . . 4
β’ (π₯ = π β ((seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) β€ (seq0( + , πΊ)βπ₯) β (seq1( + , πΉ)β((2β(π + 1)) β 1)) β€ (seq0( + , πΊ)βπ))) |
36 | 35 | imbi2d 341 |
. . 3
β’ (π₯ = π β ((π β (seq1( + , πΉ)β((2β(π₯ + 1)) β 1)) β€ (seq0( + , πΊ)βπ₯)) β (π β (seq1( + , πΉ)β((2β(π + 1)) β 1)) β€ (seq0( + , πΊ)βπ)))) |
37 | | fveq2 6889 |
. . . . . . . 8
β’ (π = 1 β (πΉβπ) = (πΉβ1)) |
38 | 37 | eleq1d 2819 |
. . . . . . 7
β’ (π = 1 β ((πΉβπ) β β β (πΉβ1) β β)) |
39 | | climcnds.1 |
. . . . . . . 8
β’ ((π β§ π β β) β (πΉβπ) β β) |
40 | 39 | ralrimiva 3147 |
. . . . . . 7
β’ (π β βπ β β (πΉβπ) β β) |
41 | | 1nn 12220 |
. . . . . . . 8
β’ 1 β
β |
42 | 41 | a1i 11 |
. . . . . . 7
β’ (π β 1 β
β) |
43 | 38, 40, 42 | rspcdva 3614 |
. . . . . 6
β’ (π β (πΉβ1) β β) |
44 | 43 | leidd 11777 |
. . . . 5
β’ (π β (πΉβ1) β€ (πΉβ1)) |
45 | 43 | recnd 11239 |
. . . . . 6
β’ (π β (πΉβ1) β β) |
46 | 45 | mullidd 11229 |
. . . . 5
β’ (π β (1 Β· (πΉβ1)) = (πΉβ1)) |
47 | 44, 46 | breqtrrd 5176 |
. . . 4
β’ (π β (πΉβ1) β€ (1 Β· (πΉβ1))) |
48 | | 1z 12589 |
. . . . 5
β’ 1 β
β€ |
49 | | eqidd 2734 |
. . . . 5
β’ (π β (πΉβ1) = (πΉβ1)) |
50 | 48, 49 | seq1i 13977 |
. . . 4
β’ (π β (seq1( + , πΉ)β1) = (πΉβ1)) |
51 | | 0z 12566 |
. . . . 5
β’ 0 β
β€ |
52 | | fveq2 6889 |
. . . . . . 7
β’ (π = 0 β (πΊβπ) = (πΊβ0)) |
53 | | oveq2 7414 |
. . . . . . . . 9
β’ (π = 0 β (2βπ) = (2β0)) |
54 | | exp0 14028 |
. . . . . . . . . 10
β’ (2 β
β β (2β0) = 1) |
55 | 5, 54 | ax-mp 5 |
. . . . . . . . 9
β’
(2β0) = 1 |
56 | 53, 55 | eqtrdi 2789 |
. . . . . . . 8
β’ (π = 0 β (2βπ) = 1) |
57 | 56 | fveq2d 6893 |
. . . . . . . 8
β’ (π = 0 β (πΉβ(2βπ)) = (πΉβ1)) |
58 | 56, 57 | oveq12d 7424 |
. . . . . . 7
β’ (π = 0 β ((2βπ) Β· (πΉβ(2βπ))) = (1 Β· (πΉβ1))) |
59 | 52, 58 | eqeq12d 2749 |
. . . . . 6
β’ (π = 0 β ((πΊβπ) = ((2βπ) Β· (πΉβ(2βπ))) β (πΊβ0) = (1 Β· (πΉβ1)))) |
60 | | climcnds.4 |
. . . . . . 7
β’ ((π β§ π β β0) β (πΊβπ) = ((2βπ) Β· (πΉβ(2βπ)))) |
61 | 60 | ralrimiva 3147 |
. . . . . 6
β’ (π β βπ β β0 (πΊβπ) = ((2βπ) Β· (πΉβ(2βπ)))) |
62 | | 0nn0 12484 |
. . . . . . 7
β’ 0 β
β0 |
63 | 62 | a1i 11 |
. . . . . 6
β’ (π β 0 β
β0) |
64 | 59, 61, 63 | rspcdva 3614 |
. . . . 5
β’ (π β (πΊβ0) = (1 Β· (πΉβ1))) |
65 | 51, 64 | seq1i 13977 |
. . . 4
β’ (π β (seq0( + , πΊ)β0) = (1 Β· (πΉβ1))) |
66 | 47, 50, 65 | 3brtr4d 5180 |
. . 3
β’ (π β (seq1( + , πΉ)β1) β€ (seq0( + , πΊ)β0)) |
67 | | fzfid 13935 |
. . . . . . . . 9
β’ ((π β§ π β β0) β
((2β(π +
1))...((2β((π + 1) +
1)) β 1)) β Fin) |
68 | | simpl 484 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β π) |
69 | | 2nn 12282 |
. . . . . . . . . . . 12
β’ 2 β
β |
70 | | peano2nn0 12509 |
. . . . . . . . . . . . 13
β’ (π β β0
β (π + 1) β
β0) |
71 | 70 | adantl 483 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β (π + 1) β
β0) |
72 | | nnexpcl 14037 |
. . . . . . . . . . . 12
β’ ((2
β β β§ (π +
1) β β0) β (2β(π + 1)) β β) |
73 | 69, 71, 72 | sylancr 588 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β
(2β(π + 1)) β
β) |
74 | | elfzuz 13494 |
. . . . . . . . . . 11
β’ (π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1)) β
π β
(β€β₯β(2β(π + 1)))) |
75 | | eluznn 12899 |
. . . . . . . . . . 11
β’
(((2β(π + 1))
β β β§ π
β (β€β₯β(2β(π + 1)))) β π β β) |
76 | 73, 74, 75 | syl2an 597 |
. . . . . . . . . 10
β’ (((π β§ π β β0) β§ π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))) β
π β
β) |
77 | 68, 76, 39 | syl2an2r 684 |
. . . . . . . . 9
β’ (((π β§ π β β0) β§ π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))) β
(πΉβπ) β β) |
78 | | fveq2 6889 |
. . . . . . . . . . . 12
β’ (π = (2β(π + 1)) β (πΉβπ) = (πΉβ(2β(π + 1)))) |
79 | 78 | eleq1d 2819 |
. . . . . . . . . . 11
β’ (π = (2β(π + 1)) β ((πΉβπ) β β β (πΉβ(2β(π + 1))) β β)) |
80 | 40 | adantr 482 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β
βπ β β
(πΉβπ) β β) |
81 | 79, 80, 73 | rspcdva 3614 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β (πΉβ(2β(π + 1))) β
β) |
82 | 81 | adantr 482 |
. . . . . . . . 9
β’ (((π β§ π β β0) β§ π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))) β
(πΉβ(2β(π + 1))) β
β) |
83 | | simpr 486 |
. . . . . . . . . . . 12
β’ (((π β§ π β β0) β§ π β
(β€β₯β(2β(π + 1)))) β π β
(β€β₯β(2β(π + 1)))) |
84 | | simplll 774 |
. . . . . . . . . . . . 13
β’ ((((π β§ π β β0) β§ π β
(β€β₯β(2β(π + 1)))) β§ π β ((2β(π + 1))...π)) β π) |
85 | 73 | adantr 482 |
. . . . . . . . . . . . . 14
β’ (((π β§ π β β0) β§ π β
(β€β₯β(2β(π + 1)))) β (2β(π + 1)) β β) |
86 | | elfzuz 13494 |
. . . . . . . . . . . . . 14
β’ (π β ((2β(π + 1))...π) β π β
(β€β₯β(2β(π + 1)))) |
87 | 85, 86, 75 | syl2an 597 |
. . . . . . . . . . . . 13
β’ ((((π β§ π β β0) β§ π β
(β€β₯β(2β(π + 1)))) β§ π β ((2β(π + 1))...π)) β π β β) |
88 | 84, 87, 39 | syl2anc 585 |
. . . . . . . . . . . 12
β’ ((((π β§ π β β0) β§ π β
(β€β₯β(2β(π + 1)))) β§ π β ((2β(π + 1))...π)) β (πΉβπ) β β) |
89 | | simplll 774 |
. . . . . . . . . . . . 13
β’ ((((π β§ π β β0) β§ π β
(β€β₯β(2β(π + 1)))) β§ π β ((2β(π + 1))...(π β 1))) β π) |
90 | | elfzuz 13494 |
. . . . . . . . . . . . . 14
β’ (π β ((2β(π + 1))...(π β 1)) β π β
(β€β₯β(2β(π + 1)))) |
91 | 85, 90, 75 | syl2an 597 |
. . . . . . . . . . . . 13
β’ ((((π β§ π β β0) β§ π β
(β€β₯β(2β(π + 1)))) β§ π β ((2β(π + 1))...(π β 1))) β π β β) |
92 | | climcnds.3 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β) β (πΉβ(π + 1)) β€ (πΉβπ)) |
93 | 89, 91, 92 | syl2anc 585 |
. . . . . . . . . . . 12
β’ ((((π β§ π β β0) β§ π β
(β€β₯β(2β(π + 1)))) β§ π β ((2β(π + 1))...(π β 1))) β (πΉβ(π + 1)) β€ (πΉβπ)) |
94 | 83, 88, 93 | monoord2 13996 |
. . . . . . . . . . 11
β’ (((π β§ π β β0) β§ π β
(β€β₯β(2β(π + 1)))) β (πΉβπ) β€ (πΉβ(2β(π + 1)))) |
95 | 94 | ralrimiva 3147 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β
βπ β
(β€β₯β(2β(π + 1)))(πΉβπ) β€ (πΉβ(2β(π + 1)))) |
96 | | fveq2 6889 |
. . . . . . . . . . . 12
β’ (π = π β (πΉβπ) = (πΉβπ)) |
97 | 96 | breq1d 5158 |
. . . . . . . . . . 11
β’ (π = π β ((πΉβπ) β€ (πΉβ(2β(π + 1))) β (πΉβπ) β€ (πΉβ(2β(π + 1))))) |
98 | 97 | rspccva 3612 |
. . . . . . . . . 10
β’
((βπ β
(β€β₯β(2β(π + 1)))(πΉβπ) β€ (πΉβ(2β(π + 1))) β§ π β
(β€β₯β(2β(π + 1)))) β (πΉβπ) β€ (πΉβ(2β(π + 1)))) |
99 | 95, 74, 98 | syl2an 597 |
. . . . . . . . 9
β’ (((π β§ π β β0) β§ π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))) β
(πΉβπ) β€ (πΉβ(2β(π + 1)))) |
100 | 67, 77, 82, 99 | fsumle 15742 |
. . . . . . . 8
β’ ((π β§ π β β0) β
Ξ£π β
((2β(π +
1))...((2β((π + 1) +
1)) β 1))(πΉβπ) β€ Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβ(2β(π + 1)))) |
101 | | fzfid 13935 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β
(1...((2β(π + 1))
β 1)) β Fin) |
102 | | hashcl 14313 |
. . . . . . . . . . . . 13
β’
((1...((2β(π +
1)) β 1)) β Fin β (β―β(1...((2β(π + 1)) β 1))) β
β0) |
103 | 101, 102 | syl 17 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β
(β―β(1...((2β(π + 1)) β 1))) β
β0) |
104 | 103 | nn0cnd 12531 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β
(β―β(1...((2β(π + 1)) β 1))) β
β) |
105 | 73 | nnred 12224 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β
(2β(π + 1)) β
β) |
106 | 105 | recnd 11239 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β
(2β(π + 1)) β
β) |
107 | | hashcl 14313 |
. . . . . . . . . . . . 13
β’
(((2β(π +
1))...((2β((π + 1) +
1)) β 1)) β Fin β (β―β((2β(π + 1))...((2β((π + 1) + 1)) β 1))) β
β0) |
108 | 67, 107 | syl 17 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β
(β―β((2β(π
+ 1))...((2β((π + 1) +
1)) β 1))) β β0) |
109 | 108 | nn0cnd 12531 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β
(β―β((2β(π
+ 1))...((2β((π + 1) +
1)) β 1))) β β) |
110 | | 2z 12591 |
. . . . . . . . . . . . . . . . . . . 20
β’ 2 β
β€ |
111 | | zexpcl 14039 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((2
β β€ β§ (π +
1) β β0) β (2β(π + 1)) β β€) |
112 | 110, 71, 111 | sylancr 588 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β0) β
(2β(π + 1)) β
β€) |
113 | | 2re 12283 |
. . . . . . . . . . . . . . . . . . . . 21
β’ 2 β
β |
114 | | 1le2 12418 |
. . . . . . . . . . . . . . . . . . . . 21
β’ 1 β€
2 |
115 | | nn0p1nn 12508 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π β β0
β (π + 1) β
β) |
116 | 115 | adantl 483 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ ((π β§ π β β0) β (π + 1) β
β) |
117 | | nnuz 12862 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ β =
(β€β₯β1) |
118 | 116, 117 | eleqtrdi 2844 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((π β§ π β β0) β (π + 1) β
(β€β₯β1)) |
119 | | leexp2a 14134 |
. . . . . . . . . . . . . . . . . . . . 21
β’ ((2
β β β§ 1 β€ 2 β§ (π + 1) β
(β€β₯β1)) β (2β1) β€ (2β(π + 1))) |
120 | 113, 114,
118, 119 | mp3an12i 1466 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π β β0) β
(2β1) β€ (2β(π
+ 1))) |
121 | 7, 120 | eqbrtrrid 5184 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β0) β 2 β€
(2β(π +
1))) |
122 | 110 | eluz1i 12827 |
. . . . . . . . . . . . . . . . . . 19
β’
((2β(π + 1))
β (β€β₯β2) β ((2β(π + 1)) β β€ β§ 2 β€
(2β(π +
1)))) |
123 | 112, 121,
122 | sylanbrc 584 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β0) β
(2β(π + 1)) β
(β€β₯β2)) |
124 | | uz2m1nn 12904 |
. . . . . . . . . . . . . . . . . 18
β’
((2β(π + 1))
β (β€β₯β2) β ((2β(π + 1)) β 1) β
β) |
125 | 123, 124 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β0) β
((2β(π + 1)) β
1) β β) |
126 | 125, 117 | eleqtrdi 2844 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β0) β
((2β(π + 1)) β
1) β (β€β₯β1)) |
127 | | peano2zm 12602 |
. . . . . . . . . . . . . . . . . 18
β’
((2β(π + 1))
β β€ β ((2β(π + 1)) β 1) β
β€) |
128 | 112, 127 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β0) β
((2β(π + 1)) β
1) β β€) |
129 | | peano2nn0 12509 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π + 1) β β0
β ((π + 1) + 1) β
β0) |
130 | 71, 129 | syl 17 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β0) β ((π + 1) + 1) β
β0) |
131 | | zexpcl 14039 |
. . . . . . . . . . . . . . . . . . 19
β’ ((2
β β€ β§ ((π +
1) + 1) β β0) β (2β((π + 1) + 1)) β β€) |
132 | 110, 130,
131 | sylancr 588 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β0) β
(2β((π + 1) + 1))
β β€) |
133 | | peano2zm 12602 |
. . . . . . . . . . . . . . . . . 18
β’
((2β((π + 1) +
1)) β β€ β ((2β((π + 1) + 1)) β 1) β
β€) |
134 | 132, 133 | syl 17 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β0) β
((2β((π + 1) + 1))
β 1) β β€) |
135 | 112 | zred 12663 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β0) β
(2β(π + 1)) β
β) |
136 | 132 | zred 12663 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β0) β
(2β((π + 1) + 1))
β β) |
137 | | 1red 11212 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β0) β 1 β
β) |
138 | 71 | nn0zd 12581 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π β β0) β (π + 1) β
β€) |
139 | | uzid 12834 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π + 1) β β€ β
(π + 1) β
(β€β₯β(π + 1))) |
140 | | peano2uz 12882 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π + 1) β
(β€β₯β(π + 1)) β ((π + 1) + 1) β
(β€β₯β(π + 1))) |
141 | | leexp2a 14134 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((2
β β β§ 1 β€ 2 β§ ((π + 1) + 1) β
(β€β₯β(π + 1))) β (2β(π + 1)) β€ (2β((π + 1) + 1))) |
142 | 113, 114,
141 | mp3an12 1452 |
. . . . . . . . . . . . . . . . . . 19
β’ (((π + 1) + 1) β
(β€β₯β(π + 1)) β (2β(π + 1)) β€ (2β((π + 1) + 1))) |
143 | 138, 139,
140, 142 | 4syl 19 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π β β0) β
(2β(π + 1)) β€
(2β((π + 1) +
1))) |
144 | 135, 136,
137, 143 | lesub1dd 11827 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π β β0) β
((2β(π + 1)) β
1) β€ ((2β((π + 1) +
1)) β 1)) |
145 | | eluz2 12825 |
. . . . . . . . . . . . . . . . 17
β’
(((2β((π + 1) +
1)) β 1) β (β€β₯β((2β(π + 1)) β 1)) β
(((2β(π + 1)) β
1) β β€ β§ ((2β((π + 1) + 1)) β 1) β β€ β§
((2β(π + 1)) β
1) β€ ((2β((π + 1) +
1)) β 1))) |
146 | 128, 134,
144, 145 | syl3anbrc 1344 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β0) β
((2β((π + 1) + 1))
β 1) β (β€β₯β((2β(π + 1)) β 1))) |
147 | | elfzuzb 13492 |
. . . . . . . . . . . . . . . 16
β’
(((2β(π + 1))
β 1) β (1...((2β((π + 1) + 1)) β 1)) β
(((2β(π + 1)) β
1) β (β€β₯β1) β§ ((2β((π + 1) + 1)) β 1) β
(β€β₯β((2β(π + 1)) β 1)))) |
148 | 126, 146,
147 | sylanbrc 584 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β0) β
((2β(π + 1)) β
1) β (1...((2β((π
+ 1) + 1)) β 1))) |
149 | | fzsplit 13524 |
. . . . . . . . . . . . . . 15
β’
(((2β(π + 1))
β 1) β (1...((2β((π + 1) + 1)) β 1)) β
(1...((2β((π + 1) +
1)) β 1)) = ((1...((2β(π + 1)) β 1)) βͺ ((((2β(π + 1)) β 1) +
1)...((2β((π + 1) +
1)) β 1)))) |
150 | 148, 149 | syl 17 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β0) β
(1...((2β((π + 1) +
1)) β 1)) = ((1...((2β(π + 1)) β 1)) βͺ ((((2β(π + 1)) β 1) +
1)...((2β((π + 1) +
1)) β 1)))) |
151 | | npcan 11466 |
. . . . . . . . . . . . . . . . 17
β’
(((2β(π + 1))
β β β§ 1 β β) β (((2β(π + 1)) β 1) + 1) = (2β(π + 1))) |
152 | 106, 12, 151 | sylancl 587 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β0) β
(((2β(π + 1)) β
1) + 1) = (2β(π +
1))) |
153 | 152 | oveq1d 7421 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β0) β
((((2β(π + 1)) β
1) + 1)...((2β((π + 1)
+ 1)) β 1)) = ((2β(π + 1))...((2β((π + 1) + 1)) β 1))) |
154 | 153 | uneq2d 4163 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β0) β
((1...((2β(π + 1))
β 1)) βͺ ((((2β(π + 1)) β 1) + 1)...((2β((π + 1) + 1)) β 1))) =
((1...((2β(π + 1))
β 1)) βͺ ((2β(π + 1))...((2β((π + 1) + 1)) β 1)))) |
155 | 150, 154 | eqtrd 2773 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β
(1...((2β((π + 1) +
1)) β 1)) = ((1...((2β(π + 1)) β 1)) βͺ ((2β(π + 1))...((2β((π + 1) + 1)) β
1)))) |
156 | 155 | fveq2d 6893 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β
(β―β(1...((2β((π + 1) + 1)) β 1))) =
(β―β((1...((2β(π + 1)) β 1)) βͺ ((2β(π + 1))...((2β((π + 1) + 1)) β
1))))) |
157 | | expp1 14031 |
. . . . . . . . . . . . . . . . 17
β’ ((2
β β β§ (π +
1) β β0) β (2β((π + 1) + 1)) = ((2β(π + 1)) Β· 2)) |
158 | 5, 71, 157 | sylancr 588 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β0) β
(2β((π + 1) + 1)) =
((2β(π + 1)) Β·
2)) |
159 | 106 | times2d 12453 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β0) β
((2β(π + 1)) Β·
2) = ((2β(π + 1)) +
(2β(π +
1)))) |
160 | 158, 159 | eqtrd 2773 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β0) β
(2β((π + 1) + 1)) =
((2β(π + 1)) +
(2β(π +
1)))) |
161 | 160 | oveq1d 7421 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β0) β
((2β((π + 1) + 1))
β 1) = (((2β(π +
1)) + (2β(π + 1)))
β 1)) |
162 | | 1cnd 11206 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β0) β 1 β
β) |
163 | 106, 106,
162 | addsubd 11589 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β0) β
(((2β(π + 1)) +
(2β(π + 1))) β
1) = (((2β(π + 1))
β 1) + (2β(π +
1)))) |
164 | 161, 163 | eqtrd 2773 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β
((2β((π + 1) + 1))
β 1) = (((2β(π +
1)) β 1) + (2β(π
+ 1)))) |
165 | | uztrn 12837 |
. . . . . . . . . . . . . . . . 17
β’
((((2β((π + 1)
+ 1)) β 1) β (β€β₯β((2β(π + 1)) β 1)) β§
((2β(π + 1)) β
1) β (β€β₯β1)) β ((2β((π + 1) + 1)) β 1) β
(β€β₯β1)) |
166 | 146, 126,
165 | syl2anc 585 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π β β0) β
((2β((π + 1) + 1))
β 1) β (β€β₯β1)) |
167 | 166, 117 | eleqtrrdi 2845 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β0) β
((2β((π + 1) + 1))
β 1) β β) |
168 | 167 | nnnn0d 12529 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β0) β
((2β((π + 1) + 1))
β 1) β β0) |
169 | | hashfz1 14303 |
. . . . . . . . . . . . . 14
β’
(((2β((π + 1) +
1)) β 1) β β0 β
(β―β(1...((2β((π + 1) + 1)) β 1))) = ((2β((π + 1) + 1)) β
1)) |
170 | 168, 169 | syl 17 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β
(β―β(1...((2β((π + 1) + 1)) β 1))) = ((2β((π + 1) + 1)) β
1)) |
171 | 125 | nnnn0d 12529 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π β β0) β
((2β(π + 1)) β
1) β β0) |
172 | | hashfz1 14303 |
. . . . . . . . . . . . . . 15
β’
(((2β(π + 1))
β 1) β β0 β
(β―β(1...((2β(π + 1)) β 1))) = ((2β(π + 1)) β
1)) |
173 | 171, 172 | syl 17 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β0) β
(β―β(1...((2β(π + 1)) β 1))) = ((2β(π + 1)) β
1)) |
174 | 173 | oveq1d 7421 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β
((β―β(1...((2β(π + 1)) β 1))) + (2β(π + 1))) = (((2β(π + 1)) β 1) +
(2β(π +
1)))) |
175 | 164, 170,
174 | 3eqtr4d 2783 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β
(β―β(1...((2β((π + 1) + 1)) β 1))) =
((β―β(1...((2β(π + 1)) β 1))) + (2β(π + 1)))) |
176 | 105 | ltm1d 12143 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β0) β
((2β(π + 1)) β
1) < (2β(π +
1))) |
177 | | fzdisj 13525 |
. . . . . . . . . . . . . 14
β’
(((2β(π + 1))
β 1) < (2β(π
+ 1)) β ((1...((2β(π + 1)) β 1)) β© ((2β(π + 1))...((2β((π + 1) + 1)) β 1))) =
β
) |
178 | 176, 177 | syl 17 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β
((1...((2β(π + 1))
β 1)) β© ((2β(π + 1))...((2β((π + 1) + 1)) β 1))) =
β
) |
179 | | hashun 14339 |
. . . . . . . . . . . . 13
β’
(((1...((2β(π +
1)) β 1)) β Fin β§ ((2β(π + 1))...((2β((π + 1) + 1)) β 1)) β Fin β§
((1...((2β(π + 1))
β 1)) β© ((2β(π + 1))...((2β((π + 1) + 1)) β 1))) = β
) β
(β―β((1...((2β(π + 1)) β 1)) βͺ ((2β(π + 1))...((2β((π + 1) + 1)) β 1)))) =
((β―β(1...((2β(π + 1)) β 1))) +
(β―β((2β(π
+ 1))...((2β((π + 1) +
1)) β 1))))) |
180 | 101, 67, 178, 179 | syl3anc 1372 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β
(β―β((1...((2β(π + 1)) β 1)) βͺ ((2β(π + 1))...((2β((π + 1) + 1)) β 1)))) =
((β―β(1...((2β(π + 1)) β 1))) +
(β―β((2β(π
+ 1))...((2β((π + 1) +
1)) β 1))))) |
181 | 156, 175,
180 | 3eqtr3d 2781 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β
((β―β(1...((2β(π + 1)) β 1))) + (2β(π + 1))) =
((β―β(1...((2β(π + 1)) β 1))) +
(β―β((2β(π
+ 1))...((2β((π + 1) +
1)) β 1))))) |
182 | 104, 106,
109, 181 | addcanad 11416 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β
(2β(π + 1)) =
(β―β((2β(π
+ 1))...((2β((π + 1) +
1)) β 1)))) |
183 | 182 | oveq1d 7421 |
. . . . . . . . 9
β’ ((π β§ π β β0) β
((2β(π + 1)) Β·
(πΉβ(2β(π + 1)))) =
((β―β((2β(π
+ 1))...((2β((π + 1) +
1)) β 1))) Β· (πΉβ(2β(π + 1))))) |
184 | | fveq2 6889 |
. . . . . . . . . . 11
β’ (π = (π + 1) β (πΊβπ) = (πΊβ(π + 1))) |
185 | | oveq2 7414 |
. . . . . . . . . . . 12
β’ (π = (π + 1) β (2βπ) = (2β(π + 1))) |
186 | 185 | fveq2d 6893 |
. . . . . . . . . . . 12
β’ (π = (π + 1) β (πΉβ(2βπ)) = (πΉβ(2β(π + 1)))) |
187 | 185, 186 | oveq12d 7424 |
. . . . . . . . . . 11
β’ (π = (π + 1) β ((2βπ) Β· (πΉβ(2βπ))) = ((2β(π + 1)) Β· (πΉβ(2β(π + 1))))) |
188 | 184, 187 | eqeq12d 2749 |
. . . . . . . . . 10
β’ (π = (π + 1) β ((πΊβπ) = ((2βπ) Β· (πΉβ(2βπ))) β (πΊβ(π + 1)) = ((2β(π + 1)) Β· (πΉβ(2β(π + 1)))))) |
189 | 61 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β
βπ β
β0 (πΊβπ) = ((2βπ) Β· (πΉβ(2βπ)))) |
190 | 188, 189,
71 | rspcdva 3614 |
. . . . . . . . 9
β’ ((π β§ π β β0) β (πΊβ(π + 1)) = ((2β(π + 1)) Β· (πΉβ(2β(π + 1))))) |
191 | 81 | recnd 11239 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β (πΉβ(2β(π + 1))) β
β) |
192 | | fsumconst 15733 |
. . . . . . . . . 10
β’
((((2β(π +
1))...((2β((π + 1) +
1)) β 1)) β Fin β§ (πΉβ(2β(π + 1))) β β) β Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβ(2β(π + 1))) =
((β―β((2β(π
+ 1))...((2β((π + 1) +
1)) β 1))) Β· (πΉβ(2β(π + 1))))) |
193 | 67, 191, 192 | syl2anc 585 |
. . . . . . . . 9
β’ ((π β§ π β β0) β
Ξ£π β
((2β(π +
1))...((2β((π + 1) +
1)) β 1))(πΉβ(2β(π + 1))) = ((β―β((2β(π + 1))...((2β((π + 1) + 1)) β 1)))
Β· (πΉβ(2β(π + 1))))) |
194 | 183, 190,
193 | 3eqtr4d 2783 |
. . . . . . . 8
β’ ((π β§ π β β0) β (πΊβ(π + 1)) = Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβ(2β(π + 1)))) |
195 | 100, 194 | breqtrrd 5176 |
. . . . . . 7
β’ ((π β§ π β β0) β
Ξ£π β
((2β(π +
1))...((2β((π + 1) +
1)) β 1))(πΉβπ) β€ (πΊβ(π + 1))) |
196 | | elfznn 13527 |
. . . . . . . . . 10
β’ (π β (1...((2β(π + 1)) β 1)) β π β
β) |
197 | 68, 196, 39 | syl2an 597 |
. . . . . . . . 9
β’ (((π β§ π β β0) β§ π β (1...((2β(π + 1)) β 1))) β
(πΉβπ) β β) |
198 | 101, 197 | fsumrecl 15677 |
. . . . . . . 8
β’ ((π β§ π β β0) β
Ξ£π β
(1...((2β(π + 1))
β 1))(πΉβπ) β
β) |
199 | 67, 77 | fsumrecl 15677 |
. . . . . . . 8
β’ ((π β§ π β β0) β
Ξ£π β
((2β(π +
1))...((2β((π + 1) +
1)) β 1))(πΉβπ) β β) |
200 | | nn0uz 12861 |
. . . . . . . . . 10
β’
β0 = (β€β₯β0) |
201 | | 0zd 12567 |
. . . . . . . . . 10
β’ (π β 0 β
β€) |
202 | | simpr 486 |
. . . . . . . . . . . . . 14
β’ ((π β§ π β β0) β π β
β0) |
203 | | nnexpcl 14037 |
. . . . . . . . . . . . . 14
β’ ((2
β β β§ π
β β0) β (2βπ) β β) |
204 | 69, 202, 203 | sylancr 588 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β
(2βπ) β
β) |
205 | 204 | nnred 12224 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β
(2βπ) β
β) |
206 | | fveq2 6889 |
. . . . . . . . . . . . . 14
β’ (π = (2βπ) β (πΉβπ) = (πΉβ(2βπ))) |
207 | 206 | eleq1d 2819 |
. . . . . . . . . . . . 13
β’ (π = (2βπ) β ((πΉβπ) β β β (πΉβ(2βπ)) β β)) |
208 | 40 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ π β β0) β
βπ β β
(πΉβπ) β β) |
209 | 207, 208,
204 | rspcdva 3614 |
. . . . . . . . . . . 12
β’ ((π β§ π β β0) β (πΉβ(2βπ)) β
β) |
210 | 205, 209 | remulcld 11241 |
. . . . . . . . . . 11
β’ ((π β§ π β β0) β
((2βπ) Β· (πΉβ(2βπ))) β
β) |
211 | 60, 210 | eqeltrd 2834 |
. . . . . . . . . 10
β’ ((π β§ π β β0) β (πΊβπ) β β) |
212 | 200, 201,
211 | serfre 13994 |
. . . . . . . . 9
β’ (π β seq0( + , πΊ):β0βΆβ) |
213 | 212 | ffvelcdmda 7084 |
. . . . . . . 8
β’ ((π β§ π β β0) β (seq0( +
, πΊ)βπ) β
β) |
214 | 135, 81 | remulcld 11241 |
. . . . . . . . 9
β’ ((π β§ π β β0) β
((2β(π + 1)) Β·
(πΉβ(2β(π + 1)))) β
β) |
215 | 190, 214 | eqeltrd 2834 |
. . . . . . . 8
β’ ((π β§ π β β0) β (πΊβ(π + 1)) β β) |
216 | | le2add 11693 |
. . . . . . . 8
β’
(((Ξ£π β
(1...((2β(π + 1))
β 1))(πΉβπ) β β β§
Ξ£π β
((2β(π +
1))...((2β((π + 1) +
1)) β 1))(πΉβπ) β β) β§ ((seq0( + , πΊ)βπ) β β β§ (πΊβ(π + 1)) β β)) β ((Ξ£π β (1...((2β(π + 1)) β 1))(πΉβπ) β€ (seq0( + , πΊ)βπ) β§ Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβπ) β€ (πΊβ(π + 1))) β (Ξ£π β (1...((2β(π + 1)) β 1))(πΉβπ) + Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβπ)) β€ ((seq0( + , πΊ)βπ) + (πΊβ(π + 1))))) |
217 | 198, 199,
213, 215, 216 | syl22anc 838 |
. . . . . . 7
β’ ((π β§ π β β0) β
((Ξ£π β
(1...((2β(π + 1))
β 1))(πΉβπ) β€ (seq0( + , πΊ)βπ) β§ Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβπ) β€ (πΊβ(π + 1))) β (Ξ£π β (1...((2β(π + 1)) β 1))(πΉβπ) + Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβπ)) β€ ((seq0( + , πΊ)βπ) + (πΊβ(π + 1))))) |
218 | 195, 217 | mpan2d 693 |
. . . . . 6
β’ ((π β§ π β β0) β
(Ξ£π β
(1...((2β(π + 1))
β 1))(πΉβπ) β€ (seq0( + , πΊ)βπ) β (Ξ£π β (1...((2β(π + 1)) β 1))(πΉβπ) + Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβπ)) β€ ((seq0( + , πΊ)βπ) + (πΊβ(π + 1))))) |
219 | | eqidd 2734 |
. . . . . . . . 9
β’ (((π β§ π β β0) β§ π β (1...((2β(π + 1)) β 1))) β
(πΉβπ) = (πΉβπ)) |
220 | 39 | recnd 11239 |
. . . . . . . . . 10
β’ ((π β§ π β β) β (πΉβπ) β β) |
221 | 68, 196, 220 | syl2an 597 |
. . . . . . . . 9
β’ (((π β§ π β β0) β§ π β (1...((2β(π + 1)) β 1))) β
(πΉβπ) β β) |
222 | 219, 126,
221 | fsumser 15673 |
. . . . . . . 8
β’ ((π β§ π β β0) β
Ξ£π β
(1...((2β(π + 1))
β 1))(πΉβπ) = (seq1( + , πΉ)β((2β(π + 1)) β 1))) |
223 | 222 | eqcomd 2739 |
. . . . . . 7
β’ ((π β§ π β β0) β (seq1( +
, πΉ)β((2β(π + 1)) β 1)) =
Ξ£π β
(1...((2β(π + 1))
β 1))(πΉβπ)) |
224 | 223 | breq1d 5158 |
. . . . . 6
β’ ((π β§ π β β0) β ((seq1( +
, πΉ)β((2β(π + 1)) β 1)) β€ (seq0( +
, πΊ)βπ) β Ξ£π β (1...((2β(π + 1)) β 1))(πΉβπ) β€ (seq0( + , πΊ)βπ))) |
225 | | eqidd 2734 |
. . . . . . . . 9
β’ (((π β§ π β β0) β§ π β (1...((2β((π + 1) + 1)) β 1))) β
(πΉβπ) = (πΉβπ)) |
226 | | elfznn 13527 |
. . . . . . . . . 10
β’ (π β (1...((2β((π + 1) + 1)) β 1)) β
π β
β) |
227 | 68, 226, 220 | syl2an 597 |
. . . . . . . . 9
β’ (((π β§ π β β0) β§ π β (1...((2β((π + 1) + 1)) β 1))) β
(πΉβπ) β β) |
228 | 225, 166,
227 | fsumser 15673 |
. . . . . . . 8
β’ ((π β§ π β β0) β
Ξ£π β
(1...((2β((π + 1) +
1)) β 1))(πΉβπ) = (seq1( + , πΉ)β((2β((π + 1) + 1)) β 1))) |
229 | | fzfid 13935 |
. . . . . . . . 9
β’ ((π β§ π β β0) β
(1...((2β((π + 1) +
1)) β 1)) β Fin) |
230 | 178, 155,
229, 227 | fsumsplit 15684 |
. . . . . . . 8
β’ ((π β§ π β β0) β
Ξ£π β
(1...((2β((π + 1) +
1)) β 1))(πΉβπ) = (Ξ£π β (1...((2β(π + 1)) β 1))(πΉβπ) + Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβπ))) |
231 | 228, 230 | eqtr3d 2775 |
. . . . . . 7
β’ ((π β§ π β β0) β (seq1( +
, πΉ)β((2β((π + 1) + 1)) β 1)) =
(Ξ£π β
(1...((2β(π + 1))
β 1))(πΉβπ) + Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβπ))) |
232 | | simpr 486 |
. . . . . . . . 9
β’ ((π β§ π β β0) β π β
β0) |
233 | 232, 200 | eleqtrdi 2844 |
. . . . . . . 8
β’ ((π β§ π β β0) β π β
(β€β₯β0)) |
234 | | seqp1 13978 |
. . . . . . . 8
β’ (π β
(β€β₯β0) β (seq0( + , πΊ)β(π + 1)) = ((seq0( + , πΊ)βπ) + (πΊβ(π + 1)))) |
235 | 233, 234 | syl 17 |
. . . . . . 7
β’ ((π β§ π β β0) β (seq0( +
, πΊ)β(π + 1)) = ((seq0( + , πΊ)βπ) + (πΊβ(π + 1)))) |
236 | 231, 235 | breq12d 5161 |
. . . . . 6
β’ ((π β§ π β β0) β ((seq1( +
, πΉ)β((2β((π + 1) + 1)) β 1)) β€
(seq0( + , πΊ)β(π + 1)) β (Ξ£π β (1...((2β(π + 1)) β 1))(πΉβπ) + Ξ£π β ((2β(π + 1))...((2β((π + 1) + 1)) β 1))(πΉβπ)) β€ ((seq0( + , πΊ)βπ) + (πΊβ(π + 1))))) |
237 | 218, 224,
236 | 3imtr4d 294 |
. . . . 5
β’ ((π β§ π β β0) β ((seq1( +
, πΉ)β((2β(π + 1)) β 1)) β€ (seq0( +
, πΊ)βπ) β (seq1( + , πΉ)β((2β((π + 1) + 1)) β 1)) β€
(seq0( + , πΊ)β(π + 1)))) |
238 | 237 | expcom 415 |
. . . 4
β’ (π β β0
β (π β ((seq1( + ,
πΉ)β((2β(π + 1)) β 1)) β€ (seq0( +
, πΊ)βπ) β (seq1( + , πΉ)β((2β((π + 1) + 1)) β 1)) β€
(seq0( + , πΊ)β(π + 1))))) |
239 | 238 | a2d 29 |
. . 3
β’ (π β β0
β ((π β (seq1( + ,
πΉ)β((2β(π + 1)) β 1)) β€ (seq0( +
, πΊ)βπ)) β (π β (seq1( + , πΉ)β((2β((π + 1) + 1)) β 1)) β€ (seq0( + , πΊ)β(π + 1))))) |
240 | 18, 24, 30, 36, 66, 239 | nn0ind 12654 |
. 2
β’ (π β β0
β (π β (seq1( + ,
πΉ)β((2β(π + 1)) β 1)) β€ (seq0( +
, πΊ)βπ))) |
241 | 240 | impcom 409 |
1
β’ ((π β§ π β β0) β (seq1( +
, πΉ)β((2β(π + 1)) β 1)) β€ (seq0( +
, πΊ)βπ)) |