Step | Hyp | Ref
| Expression |
1 | | crctcshwlkn0lem.p |
. . . . 5
โข (๐ โ โ๐ โ (0..^๐)if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐นโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐นโ๐)))) |
2 | | crctcshwlkn0lem.s |
. . . . . . 7
โข (๐ โ ๐ โ (1..^๐)) |
3 | | elfzoelz 13628 |
. . . . . . . . . . . 12
โข (๐ โ (((๐ โ ๐) + 1)..^๐) โ ๐ โ โค) |
4 | 3 | zcnd 12663 |
. . . . . . . . . . 11
โข (๐ โ (((๐ โ ๐) + 1)..^๐) โ ๐ โ โ) |
5 | 4 | adantl 482 |
. . . . . . . . . 10
โข ((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ โ) |
6 | | 1cnd 11205 |
. . . . . . . . . 10
โข ((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ 1 โ โ) |
7 | | elfzoelz 13628 |
. . . . . . . . . . . 12
โข (๐ โ (1..^๐) โ ๐ โ โค) |
8 | 7 | zcnd 12663 |
. . . . . . . . . . 11
โข (๐ โ (1..^๐) โ ๐ โ โ) |
9 | 8 | adantr 481 |
. . . . . . . . . 10
โข ((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ โ) |
10 | | elfzoel2 13627 |
. . . . . . . . . . . 12
โข (๐ โ (1..^๐) โ ๐ โ โค) |
11 | 10 | zcnd 12663 |
. . . . . . . . . . 11
โข (๐ โ (1..^๐) โ ๐ โ โ) |
12 | 11 | adantr 481 |
. . . . . . . . . 10
โข ((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ โ) |
13 | 5, 6, 9, 12 | 2addsubd 11617 |
. . . . . . . . 9
โข ((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (((๐ + 1) + ๐) โ ๐) = (((๐ + ๐) โ ๐) + 1)) |
14 | 13 | eqcomd 2738 |
. . . . . . . 8
โข ((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) |
15 | | elfzo1 13678 |
. . . . . . . . . . . 12
โข (๐ โ (1..^๐) โ (๐ โ โ โง ๐ โ โ โง ๐ < ๐)) |
16 | | nnz 12575 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ โ โ ๐ โ
โค) |
17 | 16 | 3ad2ant2 1134 |
. . . . . . . . . . . . . . . 16
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โ โค) |
18 | 17 | adantr 481 |
. . . . . . . . . . . . . . 15
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ โค) |
19 | 3 | adantl 482 |
. . . . . . . . . . . . . . . 16
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ โค) |
20 | | nnz 12575 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ โ โ ๐ โ
โค) |
21 | 20 | 3ad2ant1 1133 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โ โค) |
22 | 21 | adantr 481 |
. . . . . . . . . . . . . . . 16
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ โค) |
23 | 19, 22 | zaddcld 12666 |
. . . . . . . . . . . . . . 15
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (๐ + ๐) โ โค) |
24 | | elfzo2 13631 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ (((๐ โ ๐) + 1)..^๐) โ (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) |
25 | | eluz2 12824 |
. . . . . . . . . . . . . . . . . . . 20
โข (๐ โ
(โคโฅโ((๐ โ ๐) + 1)) โ (((๐ โ ๐) + 1) โ โค โง ๐ โ โค โง ((๐ โ ๐) + 1) โค ๐)) |
26 | | zre 12558 |
. . . . . . . . . . . . . . . . . . . . . . . 24
โข (๐ โ โค โ ๐ โ
โ) |
27 | | nnre 12215 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (๐ โ โ โ ๐ โ
โ) |
28 | | nnre 12215 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (๐ โ โ โ ๐ โ
โ) |
29 | 27, 28 | anim12i 613 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
โข ((๐ โ โ โง ๐ โ โ) โ (๐ โ โ โง ๐ โ
โ)) |
30 | | simplr 767 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ ๐ โ
โ) |
31 | | simpll 765 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ ๐ โ
โ) |
32 | 30, 31 | resubcld 11638 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ (๐ โ ๐) โ โ) |
33 | 32 | lep1d 12141 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ (๐ โ ๐) โค ((๐ โ ๐) + 1)) |
34 | | 1red 11211 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
31
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ 1 โ
โ) |
35 | 32, 34 | readdcld 11239 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ ((๐ โ ๐) + 1) โ โ) |
36 | | simpr 485 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ ๐ โ
โ) |
37 | | letr 11304 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . .
30
โข (((๐ โ ๐) โ โ โง ((๐ โ ๐) + 1) โ โ โง ๐ โ โ) โ (((๐ โ ๐) โค ((๐ โ ๐) + 1) โง ((๐ โ ๐) + 1) โค ๐) โ (๐ โ ๐) โค ๐)) |
38 | 32, 35, 36, 37 | syl3anc 1371 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ (((๐ โ ๐) โค ((๐ โ ๐) + 1) โง ((๐ โ ๐) + 1) โค ๐) โ (๐ โ ๐) โค ๐)) |
39 | 33, 38 | mpand 693 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ (((๐ โ ๐) + 1) โค ๐ โ (๐ โ ๐) โค ๐)) |
40 | 30, 31, 36 | lesubaddd 11807 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ ((๐ โ ๐) โค ๐ โ ๐ โค (๐ + ๐))) |
41 | 39, 40 | sylibd 238 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โ) โ (((๐ โ ๐) + 1) โค ๐ โ ๐ โค (๐ + ๐))) |
42 | 41 | ex 413 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
โข ((๐ โ โ โง ๐ โ โ) โ (๐ โ โ โ (((๐ โ ๐) + 1) โค ๐ โ ๐ โค (๐ + ๐)))) |
43 | 29, 42 | syl 17 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
โข ((๐ โ โ โง ๐ โ โ) โ (๐ โ โ โ (((๐ โ ๐) + 1) โค ๐ โ ๐ โค (๐ + ๐)))) |
44 | 43 | 3adant3 1132 |
. . . . . . . . . . . . . . . . . . . . . . . 24
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ (๐ โ โ โ (((๐ โ ๐) + 1) โค ๐ โ ๐ โค (๐ + ๐)))) |
45 | 26, 44 | syl5com 31 |
. . . . . . . . . . . . . . . . . . . . . . 23
โข (๐ โ โค โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ (((๐ โ ๐) + 1) โค ๐ โ ๐ โค (๐ + ๐)))) |
46 | 45 | com23 86 |
. . . . . . . . . . . . . . . . . . . . . 22
โข (๐ โ โค โ (((๐ โ ๐) + 1) โค ๐ โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โค (๐ + ๐)))) |
47 | 46 | imp 407 |
. . . . . . . . . . . . . . . . . . . . 21
โข ((๐ โ โค โง ((๐ โ ๐) + 1) โค ๐) โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โค (๐ + ๐))) |
48 | 47 | 3adant1 1130 |
. . . . . . . . . . . . . . . . . . . 20
โข ((((๐ โ ๐) + 1) โ โค โง ๐ โ โค โง ((๐ โ ๐) + 1) โค ๐) โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โค (๐ + ๐))) |
49 | 25, 48 | sylbi 216 |
. . . . . . . . . . . . . . . . . . 19
โข (๐ โ
(โคโฅโ((๐ โ ๐) + 1)) โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โค (๐ + ๐))) |
50 | 49 | 3ad2ant1 1133 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โ
(โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐) โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โค (๐ + ๐))) |
51 | 50 | com12 32 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ((๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐) โ ๐ โค (๐ + ๐))) |
52 | 24, 51 | biimtrid 241 |
. . . . . . . . . . . . . . . 16
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ (๐ โ (((๐ โ ๐) + 1)..^๐) โ ๐ โค (๐ + ๐))) |
53 | 52 | imp 407 |
. . . . . . . . . . . . . . 15
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โค (๐ + ๐)) |
54 | | eluz2 12824 |
. . . . . . . . . . . . . . 15
โข ((๐ + ๐) โ (โคโฅโ๐) โ (๐ โ โค โง (๐ + ๐) โ โค โง ๐ โค (๐ + ๐))) |
55 | 18, 23, 53, 54 | syl3anbrc 1343 |
. . . . . . . . . . . . . 14
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (๐ + ๐) โ (โคโฅโ๐)) |
56 | | uznn0sub 12857 |
. . . . . . . . . . . . . 14
โข ((๐ + ๐) โ (โคโฅโ๐) โ ((๐ + ๐) โ ๐) โ
โ0) |
57 | 55, 56 | syl 17 |
. . . . . . . . . . . . 13
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ((๐ + ๐) โ ๐) โ
โ0) |
58 | | simpl2 1192 |
. . . . . . . . . . . . 13
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ โ) |
59 | 26 | adantl 482 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โค) โ ๐ โ
โ) |
60 | | simpll 765 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โค) โ ๐ โ
โ) |
61 | | ax-1 6 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . . 29
โข (๐ โ โ โ (๐ โ โ โ ๐ โ
โ)) |
62 | 61 | imdistanri 570 |
. . . . . . . . . . . . . . . . . . . . . . . . . . . 28
โข ((๐ โ โ โง ๐ โ โ) โ (๐ โ โ โง ๐ โ
โ)) |
63 | 62 | adantr 481 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โค) โ (๐ โ โ โง ๐ โ
โ)) |
64 | | lt2add 11695 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (((๐ โ โ โง ๐ โ โ) โง (๐ โ โ โง ๐ โ โ)) โ ((๐ < ๐ โง ๐ < ๐) โ (๐ + ๐) < (๐ + ๐))) |
65 | 59, 60, 63, 64 | syl21anc 836 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โค) โ ((๐ < ๐ โง ๐ < ๐) โ (๐ + ๐) < (๐ + ๐))) |
66 | 59, 60 | readdcld 11239 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โค) โ (๐ + ๐) โ โ) |
67 | | simplr 767 |
. . . . . . . . . . . . . . . . . . . . . . . . . . 27
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โค) โ ๐ โ
โ) |
68 | 66, 67, 67 | ltsubaddd 11806 |
. . . . . . . . . . . . . . . . . . . . . . . . . 26
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โค) โ (((๐ + ๐) โ ๐) < ๐ โ (๐ + ๐) < (๐ + ๐))) |
69 | 65, 68 | sylibrd 258 |
. . . . . . . . . . . . . . . . . . . . . . . . 25
โข (((๐ โ โ โง ๐ โ โ) โง ๐ โ โค) โ ((๐ < ๐ โง ๐ < ๐) โ ((๐ + ๐) โ ๐) < ๐)) |
70 | 69 | ex 413 |
. . . . . . . . . . . . . . . . . . . . . . . 24
โข ((๐ โ โ โง ๐ โ โ) โ (๐ โ โค โ ((๐ < ๐ โง ๐ < ๐) โ ((๐ + ๐) โ ๐) < ๐))) |
71 | 70 | com23 86 |
. . . . . . . . . . . . . . . . . . . . . . 23
โข ((๐ โ โ โง ๐ โ โ) โ ((๐ < ๐ โง ๐ < ๐) โ (๐ โ โค โ ((๐ + ๐) โ ๐) < ๐))) |
72 | 71 | expcomd 417 |
. . . . . . . . . . . . . . . . . . . . . 22
โข ((๐ โ โ โง ๐ โ โ) โ (๐ < ๐ โ (๐ < ๐ โ (๐ โ โค โ ((๐ + ๐) โ ๐) < ๐)))) |
73 | 29, 72 | syl 17 |
. . . . . . . . . . . . . . . . . . . . 21
โข ((๐ โ โ โง ๐ โ โ) โ (๐ < ๐ โ (๐ < ๐ โ (๐ โ โค โ ((๐ + ๐) โ ๐) < ๐)))) |
74 | 73 | 3impia 1117 |
. . . . . . . . . . . . . . . . . . . 20
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ (๐ < ๐ โ (๐ โ โค โ ((๐ + ๐) โ ๐) < ๐))) |
75 | 74 | com13 88 |
. . . . . . . . . . . . . . . . . . 19
โข (๐ โ โค โ (๐ < ๐ โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ((๐ + ๐) โ ๐) < ๐))) |
76 | 75 | 3ad2ant2 1134 |
. . . . . . . . . . . . . . . . . 18
โข ((((๐ โ ๐) + 1) โ โค โง ๐ โ โค โง ((๐ โ ๐) + 1) โค ๐) โ (๐ < ๐ โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ((๐ + ๐) โ ๐) < ๐))) |
77 | 25, 76 | sylbi 216 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ
(โคโฅโ((๐ โ ๐) + 1)) โ (๐ < ๐ โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ((๐ + ๐) โ ๐) < ๐))) |
78 | 77 | imp 407 |
. . . . . . . . . . . . . . . 16
โข ((๐ โ
(โคโฅโ((๐ โ ๐) + 1)) โง ๐ < ๐) โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ((๐ + ๐) โ ๐) < ๐)) |
79 | 78 | 3adant2 1131 |
. . . . . . . . . . . . . . 15
โข ((๐ โ
(โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐) โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ((๐ + ๐) โ ๐) < ๐)) |
80 | 24, 79 | sylbi 216 |
. . . . . . . . . . . . . 14
โข (๐ โ (((๐ โ ๐) + 1)..^๐) โ ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ((๐ + ๐) โ ๐) < ๐)) |
81 | 80 | impcom 408 |
. . . . . . . . . . . . 13
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ((๐ + ๐) โ ๐) < ๐) |
82 | 57, 58, 81 | 3jca 1128 |
. . . . . . . . . . . 12
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (((๐ + ๐) โ ๐) โ โ0 โง ๐ โ โ โง ((๐ + ๐) โ ๐) < ๐)) |
83 | 15, 82 | sylanb 581 |
. . . . . . . . . . 11
โข ((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (((๐ + ๐) โ ๐) โ โ0 โง ๐ โ โ โง ((๐ + ๐) โ ๐) < ๐)) |
84 | | elfzo0 13669 |
. . . . . . . . . . 11
โข (((๐ + ๐) โ ๐) โ (0..^๐) โ (((๐ + ๐) โ ๐) โ โ0 โง ๐ โ โ โง ((๐ + ๐) โ ๐) < ๐)) |
85 | 83, 84 | sylibr 233 |
. . . . . . . . . 10
โข ((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ((๐ + ๐) โ ๐) โ (0..^๐)) |
86 | 85 | adantr 481 |
. . . . . . . . 9
โข (((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โ ((๐ + ๐) โ ๐) โ (0..^๐)) |
87 | | fveq2 6888 |
. . . . . . . . . . . 12
โข (๐ = ((๐ + ๐) โ ๐) โ (๐โ๐) = (๐โ((๐ + ๐) โ ๐))) |
88 | 87 | adantl 482 |
. . . . . . . . . . 11
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ (๐โ๐) = (๐โ((๐ + ๐) โ ๐))) |
89 | | fvoveq1 7428 |
. . . . . . . . . . . 12
โข (๐ = ((๐ + ๐) โ ๐) โ (๐โ(๐ + 1)) = (๐โ(((๐ + ๐) โ ๐) + 1))) |
90 | | simpr 485 |
. . . . . . . . . . . . 13
โข (((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โ (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) |
91 | 90 | fveq2d 6892 |
. . . . . . . . . . . 12
โข (((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โ (๐โ(((๐ + ๐) โ ๐) + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐))) |
92 | 89, 91 | sylan9eqr 2794 |
. . . . . . . . . . 11
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐))) |
93 | 88, 92 | eqeq12d 2748 |
. . . . . . . . . 10
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ ((๐โ๐) = (๐โ(๐ + 1)) โ (๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)))) |
94 | | 2fveq3 6893 |
. . . . . . . . . . . 12
โข (๐ = ((๐ + ๐) โ ๐) โ (๐ผโ(๐นโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) |
95 | 87 | sneqd 4639 |
. . . . . . . . . . . 12
โข (๐ = ((๐ + ๐) โ ๐) โ {(๐โ๐)} = {(๐โ((๐ + ๐) โ ๐))}) |
96 | 94, 95 | eqeq12d 2748 |
. . . . . . . . . . 11
โข (๐ = ((๐ + ๐) โ ๐) โ ((๐ผโ(๐นโ๐)) = {(๐โ๐)} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))})) |
97 | 96 | adantl 482 |
. . . . . . . . . 10
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ ((๐ผโ(๐นโ๐)) = {(๐โ๐)} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))})) |
98 | 88, 92 | preq12d 4744 |
. . . . . . . . . . 11
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ {(๐โ๐), (๐โ(๐ + 1))} = {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))}) |
99 | | simpr 485 |
. . . . . . . . . . . . 13
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ ๐ = ((๐ + ๐) โ ๐)) |
100 | 99 | fveq2d 6892 |
. . . . . . . . . . . 12
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ (๐นโ๐) = (๐นโ((๐ + ๐) โ ๐))) |
101 | 100 | fveq2d 6892 |
. . . . . . . . . . 11
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ (๐ผโ(๐นโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) |
102 | 98, 101 | sseq12d 4014 |
. . . . . . . . . 10
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ ({(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐นโ๐)) โ {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐))))) |
103 | 93, 97, 102 | ifpbi123d 1078 |
. . . . . . . . 9
โข ((((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โง ๐ = ((๐ + ๐) โ ๐)) โ (if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐นโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐นโ๐))) โ if-((๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)), (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))}, {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐)))))) |
104 | 86, 103 | rspcdv 3604 |
. . . . . . . 8
โข (((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โง (((๐ + ๐) โ ๐) + 1) = (((๐ + 1) + ๐) โ ๐)) โ (โ๐ โ (0..^๐)if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐นโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐นโ๐))) โ if-((๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)), (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))}, {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐)))))) |
105 | 14, 104 | mpdan 685 |
. . . . . . 7
โข ((๐ โ (1..^๐) โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (โ๐ โ (0..^๐)if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐นโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐นโ๐))) โ if-((๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)), (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))}, {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐)))))) |
106 | 2, 105 | sylan 580 |
. . . . . 6
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (โ๐ โ (0..^๐)if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐นโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐นโ๐))) โ if-((๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)), (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))}, {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐)))))) |
107 | 106 | ex 413 |
. . . . 5
โข (๐ โ (๐ โ (((๐ โ ๐) + 1)..^๐) โ (โ๐ โ (0..^๐)if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐นโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐นโ๐))) โ if-((๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)), (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))}, {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐))))))) |
108 | 1, 107 | mpid 44 |
. . . 4
โข (๐ โ (๐ โ (((๐ โ ๐) + 1)..^๐) โ if-((๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)), (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))}, {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐)))))) |
109 | 108 | imp 407 |
. . 3
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ if-((๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)), (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))}, {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐))))) |
110 | | elfzofz 13644 |
. . . . 5
โข (๐ โ (((๐ โ ๐) + 1)..^๐) โ ๐ โ (((๐ โ ๐) + 1)...๐)) |
111 | | crctcshwlkn0lem.q |
. . . . . 6
โข ๐ = (๐ฅ โ (0...๐) โฆ if(๐ฅ โค (๐ โ ๐), (๐โ(๐ฅ + ๐)), (๐โ((๐ฅ + ๐) โ ๐)))) |
112 | 2, 111 | crctcshwlkn0lem3 29055 |
. . . . 5
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)...๐)) โ (๐โ๐) = (๐โ((๐ + ๐) โ ๐))) |
113 | 110, 112 | sylan2 593 |
. . . 4
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (๐โ๐) = (๐โ((๐ + ๐) โ ๐))) |
114 | | fzofzp1 13725 |
. . . . 5
โข (๐ โ (((๐ โ ๐) + 1)..^๐) โ (๐ + 1) โ (((๐ โ ๐) + 1)...๐)) |
115 | 2, 111 | crctcshwlkn0lem3 29055 |
. . . . 5
โข ((๐ โง (๐ + 1) โ (((๐ โ ๐) + 1)...๐)) โ (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐))) |
116 | 114, 115 | sylan2 593 |
. . . 4
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐))) |
117 | | crctcshwlkn0lem.h |
. . . . . . 7
โข ๐ป = (๐น cyclShift ๐) |
118 | 117 | fveq1i 6889 |
. . . . . 6
โข (๐ปโ๐) = ((๐น cyclShift ๐)โ๐) |
119 | | crctcshwlkn0lem.f |
. . . . . . . . 9
โข (๐ โ ๐น โ Word ๐ด) |
120 | 119 | adantr 481 |
. . . . . . . 8
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐น โ Word ๐ด) |
121 | 2, 7 | syl 17 |
. . . . . . . . 9
โข (๐ โ ๐ โ โค) |
122 | 121 | adantr 481 |
. . . . . . . 8
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ โค) |
123 | | ltle 11298 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โ โ โง ๐ โ โ) โ (๐ < ๐ โ ๐ โค ๐)) |
124 | 29, 123 | syl 17 |
. . . . . . . . . . . . . . . 16
โข ((๐ โ โ โง ๐ โ โ) โ (๐ < ๐ โ ๐ โค ๐)) |
125 | 124 | 3impia 1117 |
. . . . . . . . . . . . . . 15
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โค ๐) |
126 | | nnnn0 12475 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ โ โ ๐ โ
โ0) |
127 | | nnnn0 12475 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ โ โ ๐ โ
โ0) |
128 | 126, 127 | anim12i 613 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โ โ โง ๐ โ โ) โ (๐ โ โ0
โง ๐ โ
โ0)) |
129 | 128 | 3adant3 1132 |
. . . . . . . . . . . . . . . 16
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ (๐ โ โ0 โง ๐ โ
โ0)) |
130 | | nn0sub 12518 |
. . . . . . . . . . . . . . . 16
โข ((๐ โ โ0
โง ๐ โ
โ0) โ (๐ โค ๐ โ (๐ โ ๐) โ
โ0)) |
131 | 129, 130 | syl 17 |
. . . . . . . . . . . . . . 15
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ (๐ โค ๐ โ (๐ โ ๐) โ
โ0)) |
132 | 125, 131 | mpbid 231 |
. . . . . . . . . . . . . 14
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ (๐ โ ๐) โ
โ0) |
133 | 15, 132 | sylbi 216 |
. . . . . . . . . . . . 13
โข (๐ โ (1..^๐) โ (๐ โ ๐) โ
โ0) |
134 | | 1nn0 12484 |
. . . . . . . . . . . . . 14
โข 1 โ
โ0 |
135 | 134 | a1i 11 |
. . . . . . . . . . . . 13
โข (๐ โ (1..^๐) โ 1 โ
โ0) |
136 | 133, 135 | nn0addcld 12532 |
. . . . . . . . . . . 12
โข (๐ โ (1..^๐) โ ((๐ โ ๐) + 1) โ
โ0) |
137 | | elnn0uz 12863 |
. . . . . . . . . . . 12
โข (((๐ โ ๐) + 1) โ โ0 โ
((๐ โ ๐) + 1) โ
(โคโฅโ0)) |
138 | 136, 137 | sylib 217 |
. . . . . . . . . . 11
โข (๐ โ (1..^๐) โ ((๐ โ ๐) + 1) โ
(โคโฅโ0)) |
139 | | fzoss1 13655 |
. . . . . . . . . . 11
โข (((๐ โ ๐) + 1) โ
(โคโฅโ0) โ (((๐ โ ๐) + 1)..^๐) โ (0..^๐)) |
140 | 2, 138, 139 | 3syl 18 |
. . . . . . . . . 10
โข (๐ โ (((๐ โ ๐) + 1)..^๐) โ (0..^๐)) |
141 | 140 | sselda 3981 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ (0..^๐)) |
142 | | crctcshwlkn0lem.n |
. . . . . . . . . 10
โข ๐ = (โฏโ๐น) |
143 | 142 | oveq2i 7416 |
. . . . . . . . 9
โข
(0..^๐) =
(0..^(โฏโ๐น)) |
144 | 141, 143 | eleqtrdi 2843 |
. . . . . . . 8
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ๐ โ (0..^(โฏโ๐น))) |
145 | | cshwidxmod 14749 |
. . . . . . . 8
โข ((๐น โ Word ๐ด โง ๐ โ โค โง ๐ โ (0..^(โฏโ๐น))) โ ((๐น cyclShift ๐)โ๐) = (๐นโ((๐ + ๐) mod (โฏโ๐น)))) |
146 | 120, 122,
144, 145 | syl3anc 1371 |
. . . . . . 7
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ((๐น cyclShift ๐)โ๐) = (๐นโ((๐ + ๐) mod (โฏโ๐น)))) |
147 | 142 | eqcomi 2741 |
. . . . . . . . . 10
โข
(โฏโ๐น) =
๐ |
148 | 147 | oveq2i 7416 |
. . . . . . . . 9
โข ((๐ + ๐) mod (โฏโ๐น)) = ((๐ + ๐) mod ๐) |
149 | | eluzelre 12829 |
. . . . . . . . . . . . . . . . . . 19
โข (๐ โ
(โคโฅโ((๐ โ ๐) + 1)) โ ๐ โ โ) |
150 | 149 | 3ad2ant1 1133 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โ
(โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐) โ ๐ โ โ) |
151 | 150 | adantl 482 |
. . . . . . . . . . . . . . . . 17
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ ๐ โ โ) |
152 | 27 | 3ad2ant1 1133 |
. . . . . . . . . . . . . . . . . 18
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โ โ) |
153 | 152 | adantr 481 |
. . . . . . . . . . . . . . . . 17
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ ๐ โ โ) |
154 | 151, 153 | readdcld 11239 |
. . . . . . . . . . . . . . . 16
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ (๐ + ๐) โ โ) |
155 | | nnrp 12981 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ โ โ ๐ โ
โ+) |
156 | 155 | 3ad2ant2 1134 |
. . . . . . . . . . . . . . . . 17
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ๐ โ
โ+) |
157 | 156 | adantr 481 |
. . . . . . . . . . . . . . . 16
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ ๐ โ
โ+) |
158 | 50 | impcom 408 |
. . . . . . . . . . . . . . . . 17
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ ๐ โค (๐ + ๐)) |
159 | 157 | rpred 13012 |
. . . . . . . . . . . . . . . . . 18
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ ๐ โ โ) |
160 | | simpr3 1196 |
. . . . . . . . . . . . . . . . . 18
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ ๐ < ๐) |
161 | | simpl3 1193 |
. . . . . . . . . . . . . . . . . 18
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ ๐ < ๐) |
162 | 151, 153,
159, 160, 161 | lt2addmuld 12458 |
. . . . . . . . . . . . . . . . 17
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ (๐ + ๐) < (2 ยท ๐)) |
163 | 158, 162 | jca 512 |
. . . . . . . . . . . . . . . 16
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ (๐ โค (๐ + ๐) โง (๐ + ๐) < (2 ยท ๐))) |
164 | 154, 157,
163 | jca31 515 |
. . . . . . . . . . . . . . 15
โข (((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โง (๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐)) โ (((๐ + ๐) โ โ โง ๐ โ โ+) โง (๐ โค (๐ + ๐) โง (๐ + ๐) < (2 ยท ๐)))) |
165 | 164 | ex 413 |
. . . . . . . . . . . . . 14
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ ((๐ โ (โคโฅโ((๐ โ ๐) + 1)) โง ๐ โ โค โง ๐ < ๐) โ (((๐ + ๐) โ โ โง ๐ โ โ+) โง (๐ โค (๐ + ๐) โง (๐ + ๐) < (2 ยท ๐))))) |
166 | 24, 165 | biimtrid 241 |
. . . . . . . . . . . . 13
โข ((๐ โ โ โง ๐ โ โ โง ๐ < ๐) โ (๐ โ (((๐ โ ๐) + 1)..^๐) โ (((๐ + ๐) โ โ โง ๐ โ โ+) โง (๐ โค (๐ + ๐) โง (๐ + ๐) < (2 ยท ๐))))) |
167 | 15, 166 | sylbi 216 |
. . . . . . . . . . . 12
โข (๐ โ (1..^๐) โ (๐ โ (((๐ โ ๐) + 1)..^๐) โ (((๐ + ๐) โ โ โง ๐ โ โ+) โง (๐ โค (๐ + ๐) โง (๐ + ๐) < (2 ยท ๐))))) |
168 | 2, 167 | syl 17 |
. . . . . . . . . . 11
โข (๐ โ (๐ โ (((๐ โ ๐) + 1)..^๐) โ (((๐ + ๐) โ โ โง ๐ โ โ+) โง (๐ โค (๐ + ๐) โง (๐ + ๐) < (2 ยท ๐))))) |
169 | 168 | imp 407 |
. . . . . . . . . 10
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (((๐ + ๐) โ โ โง ๐ โ โ+) โง (๐ โค (๐ + ๐) โง (๐ + ๐) < (2 ยท ๐)))) |
170 | | 2submod 13893 |
. . . . . . . . . 10
โข ((((๐ + ๐) โ โ โง ๐ โ โ+) โง (๐ โค (๐ + ๐) โง (๐ + ๐) < (2 ยท ๐))) โ ((๐ + ๐) mod ๐) = ((๐ + ๐) โ ๐)) |
171 | 169, 170 | syl 17 |
. . . . . . . . 9
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ((๐ + ๐) mod ๐) = ((๐ + ๐) โ ๐)) |
172 | 148, 171 | eqtrid 2784 |
. . . . . . . 8
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ((๐ + ๐) mod (โฏโ๐น)) = ((๐ + ๐) โ ๐)) |
173 | 172 | fveq2d 6892 |
. . . . . . 7
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (๐นโ((๐ + ๐) mod (โฏโ๐น))) = (๐นโ((๐ + ๐) โ ๐))) |
174 | 146, 173 | eqtrd 2772 |
. . . . . 6
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ ((๐น cyclShift ๐)โ๐) = (๐นโ((๐ + ๐) โ ๐))) |
175 | 118, 174 | eqtrid 2784 |
. . . . 5
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (๐ปโ๐) = (๐นโ((๐ + ๐) โ ๐))) |
176 | 175 | fveq2d 6892 |
. . . 4
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) |
177 | | simp1 1136 |
. . . . . 6
โข (((๐โ๐) = (๐โ((๐ + ๐) โ ๐)) โง (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐)) โง (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) โ (๐โ๐) = (๐โ((๐ + ๐) โ ๐))) |
178 | | simp2 1137 |
. . . . . 6
โข (((๐โ๐) = (๐โ((๐ + ๐) โ ๐)) โง (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐)) โง (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) โ (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐))) |
179 | 177, 178 | eqeq12d 2748 |
. . . . 5
โข (((๐โ๐) = (๐โ((๐ + ๐) โ ๐)) โง (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐)) โง (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) โ ((๐โ๐) = (๐โ(๐ + 1)) โ (๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)))) |
180 | | simp3 1138 |
. . . . . 6
โข (((๐โ๐) = (๐โ((๐ + ๐) โ ๐)) โง (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐)) โง (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) โ (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) |
181 | 177 | sneqd 4639 |
. . . . . 6
โข (((๐โ๐) = (๐โ((๐ + ๐) โ ๐)) โง (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐)) โง (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) โ {(๐โ๐)} = {(๐โ((๐ + ๐) โ ๐))}) |
182 | 180, 181 | eqeq12d 2748 |
. . . . 5
โข (((๐โ๐) = (๐โ((๐ + ๐) โ ๐)) โง (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐)) โง (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) โ ((๐ผโ(๐ปโ๐)) = {(๐โ๐)} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))})) |
183 | 177, 178 | preq12d 4744 |
. . . . . 6
โข (((๐โ๐) = (๐โ((๐ + ๐) โ ๐)) โง (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐)) โง (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) โ {(๐โ๐), (๐โ(๐ + 1))} = {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))}) |
184 | 183, 180 | sseq12d 4014 |
. . . . 5
โข (((๐โ๐) = (๐โ((๐ + ๐) โ ๐)) โง (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐)) โง (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) โ ({(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐ปโ๐)) โ {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐))))) |
185 | 179, 182,
184 | ifpbi123d 1078 |
. . . 4
โข (((๐โ๐) = (๐โ((๐ + ๐) โ ๐)) โง (๐โ(๐ + 1)) = (๐โ(((๐ + 1) + ๐) โ ๐)) โง (๐ผโ(๐ปโ๐)) = (๐ผโ(๐นโ((๐ + ๐) โ ๐)))) โ (if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐ปโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐ปโ๐))) โ if-((๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)), (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))}, {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐)))))) |
186 | 113, 116,
176, 185 | syl3anc 1371 |
. . 3
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ (if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐ปโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐ปโ๐))) โ if-((๐โ((๐ + ๐) โ ๐)) = (๐โ(((๐ + 1) + ๐) โ ๐)), (๐ผโ(๐นโ((๐ + ๐) โ ๐))) = {(๐โ((๐ + ๐) โ ๐))}, {(๐โ((๐ + ๐) โ ๐)), (๐โ(((๐ + 1) + ๐) โ ๐))} โ (๐ผโ(๐นโ((๐ + ๐) โ ๐)))))) |
187 | 109, 186 | mpbird 256 |
. 2
โข ((๐ โง ๐ โ (((๐ โ ๐) + 1)..^๐)) โ if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐ปโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐ปโ๐)))) |
188 | 187 | ralrimiva 3146 |
1
โข (๐ โ โ๐ โ (((๐ โ ๐) + 1)..^๐)if-((๐โ๐) = (๐โ(๐ + 1)), (๐ผโ(๐ปโ๐)) = {(๐โ๐)}, {(๐โ๐), (๐โ(๐ + 1))} โ (๐ผโ(๐ปโ๐)))) |