Step | Hyp | Ref
| Expression |
1 | | id 22 |
. . . . 5
β’ (π = 0 β π = 0) |
2 | | oveq2 7419 |
. . . . 5
β’ (π = 0 β (π΄ Yrm π) = (π΄ Yrm 0)) |
3 | 1, 2 | breq12d 5161 |
. . . 4
β’ (π = 0 β (π β€ (π΄ Yrm π) β 0 β€ (π΄ Yrm 0))) |
4 | 3 | imbi2d 340 |
. . 3
β’ (π = 0 β ((π΄ β (β€β₯β2)
β π β€ (π΄ Yrm π)) β (π΄ β (β€β₯β2)
β 0 β€ (π΄
Yrm 0)))) |
5 | | id 22 |
. . . . 5
β’ (π = π β π = π) |
6 | | oveq2 7419 |
. . . . 5
β’ (π = π β (π΄ Yrm π) = (π΄ Yrm π)) |
7 | 5, 6 | breq12d 5161 |
. . . 4
β’ (π = π β (π β€ (π΄ Yrm π) β π β€ (π΄ Yrm π))) |
8 | 7 | imbi2d 340 |
. . 3
β’ (π = π β ((π΄ β (β€β₯β2)
β π β€ (π΄ Yrm π)) β (π΄ β (β€β₯β2)
β π β€ (π΄ Yrm π)))) |
9 | | id 22 |
. . . . 5
β’ (π = (π + 1) β π = (π + 1)) |
10 | | oveq2 7419 |
. . . . 5
β’ (π = (π + 1) β (π΄ Yrm π) = (π΄ Yrm (π + 1))) |
11 | 9, 10 | breq12d 5161 |
. . . 4
β’ (π = (π + 1) β (π β€ (π΄ Yrm π) β (π + 1) β€ (π΄ Yrm (π + 1)))) |
12 | 11 | imbi2d 340 |
. . 3
β’ (π = (π + 1) β ((π΄ β (β€β₯β2)
β π β€ (π΄ Yrm π)) β (π΄ β (β€β₯β2)
β (π + 1) β€ (π΄ Yrm (π + 1))))) |
13 | | id 22 |
. . . . 5
β’ (π = π β π = π) |
14 | | oveq2 7419 |
. . . . 5
β’ (π = π β (π΄ Yrm π) = (π΄ Yrm π)) |
15 | 13, 14 | breq12d 5161 |
. . . 4
β’ (π = π β (π β€ (π΄ Yrm π) β π β€ (π΄ Yrm π))) |
16 | 15 | imbi2d 340 |
. . 3
β’ (π = π β ((π΄ β (β€β₯β2)
β π β€ (π΄ Yrm π)) β (π΄ β (β€β₯β2)
β π β€ (π΄ Yrm π)))) |
17 | | 0le0 12317 |
. . . 4
β’ 0 β€
0 |
18 | | rmy0 41970 |
. . . 4
β’ (π΄ β
(β€β₯β2) β (π΄ Yrm 0) = 0) |
19 | 17, 18 | breqtrrid 5186 |
. . 3
β’ (π΄ β
(β€β₯β2) β 0 β€ (π΄ Yrm 0)) |
20 | | nn0z 12587 |
. . . . . . . . 9
β’ (π β β0
β π β
β€) |
21 | 20 | 3ad2ant1 1133 |
. . . . . . . 8
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β π β β€) |
22 | 21 | peano2zd 12673 |
. . . . . . 7
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π + 1) β β€) |
23 | 22 | zred 12670 |
. . . . . 6
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π + 1) β β) |
24 | | simp2 1137 |
. . . . . . . . 9
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β π΄ β
(β€β₯β2)) |
25 | | frmy 41955 |
. . . . . . . . . 10
β’
Yrm :((β€β₯β2) Γ
β€)βΆβ€ |
26 | 25 | fovcl 7539 |
. . . . . . . . 9
β’ ((π΄ β
(β€β₯β2) β§ π β β€) β (π΄ Yrm π) β β€) |
27 | 24, 21, 26 | syl2anc 584 |
. . . . . . . 8
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π΄ Yrm π) β β€) |
28 | 27 | peano2zd 12673 |
. . . . . . 7
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β ((π΄ Yrm π) + 1) β β€) |
29 | 28 | zred 12670 |
. . . . . 6
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β ((π΄ Yrm π) + 1) β β) |
30 | 25 | fovcl 7539 |
. . . . . . . 8
β’ ((π΄ β
(β€β₯β2) β§ (π + 1) β β€) β (π΄ Yrm (π + 1)) β
β€) |
31 | 24, 22, 30 | syl2anc 584 |
. . . . . . 7
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π΄ Yrm (π + 1)) β β€) |
32 | 31 | zred 12670 |
. . . . . 6
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π΄ Yrm (π + 1)) β β) |
33 | | nn0re 12485 |
. . . . . . . 8
β’ (π β β0
β π β
β) |
34 | 33 | 3ad2ant1 1133 |
. . . . . . 7
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β π β β) |
35 | 27 | zred 12670 |
. . . . . . 7
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π΄ Yrm π) β β) |
36 | | 1red 11219 |
. . . . . . 7
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β 1 β β) |
37 | | simp3 1138 |
. . . . . . 7
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β π β€ (π΄ Yrm π)) |
38 | 34, 35, 36, 37 | leadd1dd 11832 |
. . . . . 6
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π + 1) β€ ((π΄ Yrm π) + 1)) |
39 | 34 | ltp1d 12148 |
. . . . . . . 8
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β π < (π + 1)) |
40 | | ltrmy 41993 |
. . . . . . . . 9
β’ ((π΄ β
(β€β₯β2) β§ π β β€ β§ (π + 1) β β€) β (π < (π + 1) β (π΄ Yrm π) < (π΄ Yrm (π + 1)))) |
41 | 24, 21, 22, 40 | syl3anc 1371 |
. . . . . . . 8
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π < (π + 1) β (π΄ Yrm π) < (π΄ Yrm (π + 1)))) |
42 | 39, 41 | mpbid 231 |
. . . . . . 7
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π΄ Yrm π) < (π΄ Yrm (π + 1))) |
43 | | zltp1le 12616 |
. . . . . . . 8
β’ (((π΄ Yrm π) β β€ β§ (π΄ Yrm (π + 1)) β β€) β
((π΄ Yrm π) < (π΄ Yrm (π + 1)) β ((π΄ Yrm π) + 1) β€ (π΄ Yrm (π + 1)))) |
44 | 27, 31, 43 | syl2anc 584 |
. . . . . . 7
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β ((π΄ Yrm π) < (π΄ Yrm (π + 1)) β ((π΄ Yrm π) + 1) β€ (π΄ Yrm (π + 1)))) |
45 | 42, 44 | mpbid 231 |
. . . . . 6
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β ((π΄ Yrm π) + 1) β€ (π΄ Yrm (π + 1))) |
46 | 23, 29, 32, 38, 45 | letrd 11375 |
. . . . 5
β’ ((π β β0
β§ π΄ β
(β€β₯β2) β§ π β€ (π΄ Yrm π)) β (π + 1) β€ (π΄ Yrm (π + 1))) |
47 | 46 | 3exp 1119 |
. . . 4
β’ (π β β0
β (π΄ β
(β€β₯β2) β (π β€ (π΄ Yrm π) β (π + 1) β€ (π΄ Yrm (π + 1))))) |
48 | 47 | a2d 29 |
. . 3
β’ (π β β0
β ((π΄ β
(β€β₯β2) β π β€ (π΄ Yrm π)) β (π΄ β (β€β₯β2)
β (π + 1) β€ (π΄ Yrm (π + 1))))) |
49 | 4, 8, 12, 16, 19, 48 | nn0ind 12661 |
. 2
β’ (π β β0
β (π΄ β
(β€β₯β2) β π β€ (π΄ Yrm π))) |
50 | 49 | impcom 408 |
1
β’ ((π΄ β
(β€β₯β2) β§ π β β0) β π β€ (π΄ Yrm π)) |