Step | Hyp | Ref
| Expression |
1 | | ral0 4511 |
. . . 4
โข
โ๐ โ
โ
(๐โ๐) = (๐โ0) |
2 | | oveq2 7413 |
. . . . . 6
โข
((โฏโ๐) =
0 โ (0..^(โฏโ๐)) = (0..^0)) |
3 | | fzo0 13652 |
. . . . . 6
โข (0..^0) =
โ
|
4 | 2, 3 | eqtrdi 2788 |
. . . . 5
โข
((โฏโ๐) =
0 โ (0..^(โฏโ๐)) = โ
) |
5 | 4 | raleqdv 3325 |
. . . 4
โข
((โฏโ๐) =
0 โ (โ๐ โ
(0..^(โฏโ๐))(๐โ๐) = (๐โ0) โ โ๐ โ โ
(๐โ๐) = (๐โ0))) |
6 | 1, 5 | mpbiri 257 |
. . 3
โข
((โฏโ๐) =
0 โ โ๐ โ
(0..^(โฏโ๐))(๐โ๐) = (๐โ0)) |
7 | 6 | a1d 25 |
. 2
โข
((โฏโ๐) =
0 โ ((๐ โ Word
๐ โง (๐ cyclShift 1) = ๐) โ โ๐ โ (0..^(โฏโ๐))(๐โ๐) = (๐โ0))) |
8 | | simprl 769 |
. . . . . . . 8
โข (((ยฌ
(โฏโ๐) = 0 โง
ยฌ (โฏโ๐) =
1) โง (๐ โ Word
๐ โง (๐ cyclShift 1) = ๐)) โ ๐ โ Word ๐) |
9 | | lencl 14479 |
. . . . . . . . . . 11
โข (๐ โ Word ๐ โ (โฏโ๐) โ
โ0) |
10 | | 1nn0 12484 |
. . . . . . . . . . . . . 14
โข 1 โ
โ0 |
11 | 10 | a1i 11 |
. . . . . . . . . . . . 13
โข
(((โฏโ๐)
โ โ0 โง (ยฌ (โฏโ๐) = 0 โง ยฌ (โฏโ๐) = 1)) โ 1 โ
โ0) |
12 | | df-ne 2941 |
. . . . . . . . . . . . . . . 16
โข
((โฏโ๐)
โ 0 โ ยฌ (โฏโ๐) = 0) |
13 | | elnnne0 12482 |
. . . . . . . . . . . . . . . . 17
โข
((โฏโ๐)
โ โ โ ((โฏโ๐) โ โ0 โง
(โฏโ๐) โ
0)) |
14 | 13 | simplbi2com 503 |
. . . . . . . . . . . . . . . 16
โข
((โฏโ๐)
โ 0 โ ((โฏโ๐) โ โ0 โ
(โฏโ๐) โ
โ)) |
15 | 12, 14 | sylbir 234 |
. . . . . . . . . . . . . . 15
โข (ยฌ
(โฏโ๐) = 0
โ ((โฏโ๐)
โ โ0 โ (โฏโ๐) โ โ)) |
16 | 15 | adantr 481 |
. . . . . . . . . . . . . 14
โข ((ยฌ
(โฏโ๐) = 0 โง
ยฌ (โฏโ๐) =
1) โ ((โฏโ๐) โ โ0 โ
(โฏโ๐) โ
โ)) |
17 | 16 | impcom 408 |
. . . . . . . . . . . . 13
โข
(((โฏโ๐)
โ โ0 โง (ยฌ (โฏโ๐) = 0 โง ยฌ (โฏโ๐) = 1)) โ
(โฏโ๐) โ
โ) |
18 | | neqne 2948 |
. . . . . . . . . . . . . . 15
โข (ยฌ
(โฏโ๐) = 1
โ (โฏโ๐)
โ 1) |
19 | 18 | ad2antll 727 |
. . . . . . . . . . . . . 14
โข
(((โฏโ๐)
โ โ0 โง (ยฌ (โฏโ๐) = 0 โง ยฌ (โฏโ๐) = 1)) โ
(โฏโ๐) โ
1) |
20 | | nngt1ne1 12237 |
. . . . . . . . . . . . . . 15
โข
((โฏโ๐)
โ โ โ (1 < (โฏโ๐) โ (โฏโ๐) โ 1)) |
21 | 17, 20 | syl 17 |
. . . . . . . . . . . . . 14
โข
(((โฏโ๐)
โ โ0 โง (ยฌ (โฏโ๐) = 0 โง ยฌ (โฏโ๐) = 1)) โ (1 <
(โฏโ๐) โ
(โฏโ๐) โ
1)) |
22 | 19, 21 | mpbird 256 |
. . . . . . . . . . . . 13
โข
(((โฏโ๐)
โ โ0 โง (ยฌ (โฏโ๐) = 0 โง ยฌ (โฏโ๐) = 1)) โ 1 <
(โฏโ๐)) |
23 | | elfzo0 13669 |
. . . . . . . . . . . . 13
โข (1 โ
(0..^(โฏโ๐))
โ (1 โ โ0 โง (โฏโ๐) โ โ โง 1 <
(โฏโ๐))) |
24 | 11, 17, 22, 23 | syl3anbrc 1343 |
. . . . . . . . . . . 12
โข
(((โฏโ๐)
โ โ0 โง (ยฌ (โฏโ๐) = 0 โง ยฌ (โฏโ๐) = 1)) โ 1 โ
(0..^(โฏโ๐))) |
25 | 24 | ex 413 |
. . . . . . . . . . 11
โข
((โฏโ๐)
โ โ0 โ ((ยฌ (โฏโ๐) = 0 โง ยฌ (โฏโ๐) = 1) โ 1 โ
(0..^(โฏโ๐)))) |
26 | 9, 25 | syl 17 |
. . . . . . . . . 10
โข (๐ โ Word ๐ โ ((ยฌ (โฏโ๐) = 0 โง ยฌ
(โฏโ๐) = 1)
โ 1 โ (0..^(โฏโ๐)))) |
27 | 26 | adantr 481 |
. . . . . . . . 9
โข ((๐ โ Word ๐ โง (๐ cyclShift 1) = ๐) โ ((ยฌ (โฏโ๐) = 0 โง ยฌ
(โฏโ๐) = 1)
โ 1 โ (0..^(โฏโ๐)))) |
28 | 27 | impcom 408 |
. . . . . . . 8
โข (((ยฌ
(โฏโ๐) = 0 โง
ยฌ (โฏโ๐) =
1) โง (๐ โ Word
๐ โง (๐ cyclShift 1) = ๐)) โ 1 โ (0..^(โฏโ๐))) |
29 | | simprr 771 |
. . . . . . . 8
โข (((ยฌ
(โฏโ๐) = 0 โง
ยฌ (โฏโ๐) =
1) โง (๐ โ Word
๐ โง (๐ cyclShift 1) = ๐)) โ (๐ cyclShift 1) = ๐) |
30 | | lbfzo0 13668 |
. . . . . . . . . . . . . . . 16
โข (0 โ
(0..^(โฏโ๐))
โ (โฏโ๐)
โ โ) |
31 | 30, 13 | sylbbr 235 |
. . . . . . . . . . . . . . 15
โข
(((โฏโ๐)
โ โ0 โง (โฏโ๐) โ 0) โ 0 โ
(0..^(โฏโ๐))) |
32 | 31 | ex 413 |
. . . . . . . . . . . . . 14
โข
((โฏโ๐)
โ โ0 โ ((โฏโ๐) โ 0 โ 0 โ
(0..^(โฏโ๐)))) |
33 | 12, 32 | biimtrrid 242 |
. . . . . . . . . . . . 13
โข
((โฏโ๐)
โ โ0 โ (ยฌ (โฏโ๐) = 0 โ 0 โ
(0..^(โฏโ๐)))) |
34 | 9, 33 | syl 17 |
. . . . . . . . . . . 12
โข (๐ โ Word ๐ โ (ยฌ (โฏโ๐) = 0 โ 0 โ
(0..^(โฏโ๐)))) |
35 | 34 | adantr 481 |
. . . . . . . . . . 11
โข ((๐ โ Word ๐ โง (๐ cyclShift 1) = ๐) โ (ยฌ (โฏโ๐) = 0 โ 0 โ
(0..^(โฏโ๐)))) |
36 | 35 | com12 32 |
. . . . . . . . . 10
โข (ยฌ
(โฏโ๐) = 0
โ ((๐ โ Word
๐ โง (๐ cyclShift 1) = ๐) โ 0 โ (0..^(โฏโ๐)))) |
37 | 36 | adantr 481 |
. . . . . . . . 9
โข ((ยฌ
(โฏโ๐) = 0 โง
ยฌ (โฏโ๐) =
1) โ ((๐ โ Word
๐ โง (๐ cyclShift 1) = ๐) โ 0 โ (0..^(โฏโ๐)))) |
38 | 37 | imp 407 |
. . . . . . . 8
โข (((ยฌ
(โฏโ๐) = 0 โง
ยฌ (โฏโ๐) =
1) โง (๐ โ Word
๐ โง (๐ cyclShift 1) = ๐)) โ 0 โ (0..^(โฏโ๐))) |
39 | | elfzoelz 13628 |
. . . . . . . . . 10
โข (1 โ
(0..^(โฏโ๐))
โ 1 โ โค) |
40 | | cshweqrep 14767 |
. . . . . . . . . 10
โข ((๐ โ Word ๐ โง 1 โ โค) โ (((๐ cyclShift 1) = ๐ โง 0 โ
(0..^(โฏโ๐)))
โ โ๐ โ
โ0 (๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐))))) |
41 | 39, 40 | sylan2 593 |
. . . . . . . . 9
โข ((๐ โ Word ๐ โง 1 โ (0..^(โฏโ๐))) โ (((๐ cyclShift 1) = ๐ โง 0 โ (0..^(โฏโ๐))) โ โ๐ โ โ0
(๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐))))) |
42 | 41 | imp 407 |
. . . . . . . 8
โข (((๐ โ Word ๐ โง 1 โ (0..^(โฏโ๐))) โง ((๐ cyclShift 1) = ๐ โง 0 โ (0..^(โฏโ๐)))) โ โ๐ โ โ0
(๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐)))) |
43 | 8, 28, 29, 38, 42 | syl22anc 837 |
. . . . . . 7
โข (((ยฌ
(โฏโ๐) = 0 โง
ยฌ (โฏโ๐) =
1) โง (๐ โ Word
๐ โง (๐ cyclShift 1) = ๐)) โ โ๐ โ โ0 (๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐)))) |
44 | | 0nn0 12483 |
. . . . . . . . 9
โข 0 โ
โ0 |
45 | | fzossnn0 13659 |
. . . . . . . . 9
โข (0 โ
โ0 โ (0..^(โฏโ๐)) โ
โ0) |
46 | | ssralv 4049 |
. . . . . . . . 9
โข
((0..^(โฏโ๐)) โ โ0 โ
(โ๐ โ
โ0 (๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐))) โ โ๐ โ
(0..^(โฏโ๐))(๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐))))) |
47 | 44, 45, 46 | mp2b 10 |
. . . . . . . 8
โข
(โ๐ โ
โ0 (๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐))) โ โ๐ โ
(0..^(โฏโ๐))(๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐)))) |
48 | | eqcom 2739 |
. . . . . . . . . 10
โข ((๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐))) โ (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐))) = (๐โ0)) |
49 | | elfzoelz 13628 |
. . . . . . . . . . . . . . 15
โข (๐ โ
(0..^(โฏโ๐))
โ ๐ โ
โค) |
50 | | zre 12558 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ โค โ ๐ โ
โ) |
51 | | ax-1rid 11176 |
. . . . . . . . . . . . . . . . . 18
โข (๐ โ โ โ (๐ ยท 1) = ๐) |
52 | 50, 51 | syl 17 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ โค โ (๐ ยท 1) = ๐) |
53 | 52 | oveq2d 7421 |
. . . . . . . . . . . . . . . 16
โข (๐ โ โค โ (0 +
(๐ ยท 1)) = (0 +
๐)) |
54 | | zcn 12559 |
. . . . . . . . . . . . . . . . 17
โข (๐ โ โค โ ๐ โ
โ) |
55 | 54 | addlidd 11411 |
. . . . . . . . . . . . . . . 16
โข (๐ โ โค โ (0 +
๐) = ๐) |
56 | 53, 55 | eqtrd 2772 |
. . . . . . . . . . . . . . 15
โข (๐ โ โค โ (0 +
(๐ ยท 1)) = ๐) |
57 | 49, 56 | syl 17 |
. . . . . . . . . . . . . 14
โข (๐ โ
(0..^(โฏโ๐))
โ (0 + (๐ ยท 1))
= ๐) |
58 | 57 | oveq1d 7420 |
. . . . . . . . . . . . 13
โข (๐ โ
(0..^(โฏโ๐))
โ ((0 + (๐ ยท
1)) mod (โฏโ๐))
= (๐ mod
(โฏโ๐))) |
59 | | zmodidfzoimp 13862 |
. . . . . . . . . . . . 13
โข (๐ โ
(0..^(โฏโ๐))
โ (๐ mod
(โฏโ๐)) = ๐) |
60 | 58, 59 | eqtrd 2772 |
. . . . . . . . . . . 12
โข (๐ โ
(0..^(โฏโ๐))
โ ((0 + (๐ ยท
1)) mod (โฏโ๐))
= ๐) |
61 | 60 | fveqeq2d 6896 |
. . . . . . . . . . 11
โข (๐ โ
(0..^(โฏโ๐))
โ ((๐โ((0 +
(๐ ยท 1)) mod
(โฏโ๐))) =
(๐โ0) โ (๐โ๐) = (๐โ0))) |
62 | 61 | biimpd 228 |
. . . . . . . . . 10
โข (๐ โ
(0..^(โฏโ๐))
โ ((๐โ((0 +
(๐ ยท 1)) mod
(โฏโ๐))) =
(๐โ0) โ (๐โ๐) = (๐โ0))) |
63 | 48, 62 | biimtrid 241 |
. . . . . . . . 9
โข (๐ โ
(0..^(โฏโ๐))
โ ((๐โ0) =
(๐โ((0 + (๐ ยท 1)) mod
(โฏโ๐))) โ
(๐โ๐) = (๐โ0))) |
64 | 63 | ralimia 3080 |
. . . . . . . 8
โข
(โ๐ โ
(0..^(โฏโ๐))(๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐))) โ โ๐ โ
(0..^(โฏโ๐))(๐โ๐) = (๐โ0)) |
65 | 47, 64 | syl 17 |
. . . . . . 7
โข
(โ๐ โ
โ0 (๐โ0) = (๐โ((0 + (๐ ยท 1)) mod (โฏโ๐))) โ โ๐ โ
(0..^(โฏโ๐))(๐โ๐) = (๐โ0)) |
66 | 43, 65 | syl 17 |
. . . . . 6
โข (((ยฌ
(โฏโ๐) = 0 โง
ยฌ (โฏโ๐) =
1) โง (๐ โ Word
๐ โง (๐ cyclShift 1) = ๐)) โ โ๐ โ (0..^(โฏโ๐))(๐โ๐) = (๐โ0)) |
67 | 66 | ex 413 |
. . . . 5
โข ((ยฌ
(โฏโ๐) = 0 โง
ยฌ (โฏโ๐) =
1) โ ((๐ โ Word
๐ โง (๐ cyclShift 1) = ๐) โ โ๐ โ (0..^(โฏโ๐))(๐โ๐) = (๐โ0))) |
68 | 67 | impancom 452 |
. . . 4
โข ((ยฌ
(โฏโ๐) = 0 โง
(๐ โ Word ๐ โง (๐ cyclShift 1) = ๐)) โ (ยฌ (โฏโ๐) = 1 โ โ๐ โ
(0..^(โฏโ๐))(๐โ๐) = (๐โ0))) |
69 | | eqid 2732 |
. . . . . 6
โข (๐โ0) = (๐โ0) |
70 | | c0ex 11204 |
. . . . . . 7
โข 0 โ
V |
71 | | fveqeq2 6897 |
. . . . . . 7
โข (๐ = 0 โ ((๐โ๐) = (๐โ0) โ (๐โ0) = (๐โ0))) |
72 | 70, 71 | ralsn 4684 |
. . . . . 6
โข
(โ๐ โ
{0} (๐โ๐) = (๐โ0) โ (๐โ0) = (๐โ0)) |
73 | 69, 72 | mpbir 230 |
. . . . 5
โข
โ๐ โ {0}
(๐โ๐) = (๐โ0) |
74 | | oveq2 7413 |
. . . . . . 7
โข
((โฏโ๐) =
1 โ (0..^(โฏโ๐)) = (0..^1)) |
75 | | fzo01 13710 |
. . . . . . 7
โข (0..^1) =
{0} |
76 | 74, 75 | eqtrdi 2788 |
. . . . . 6
โข
((โฏโ๐) =
1 โ (0..^(โฏโ๐)) = {0}) |
77 | 76 | raleqdv 3325 |
. . . . 5
โข
((โฏโ๐) =
1 โ (โ๐ โ
(0..^(โฏโ๐))(๐โ๐) = (๐โ0) โ โ๐ โ {0} (๐โ๐) = (๐โ0))) |
78 | 73, 77 | mpbiri 257 |
. . . 4
โข
((โฏโ๐) =
1 โ โ๐ โ
(0..^(โฏโ๐))(๐โ๐) = (๐โ0)) |
79 | 68, 78 | pm2.61d2 181 |
. . 3
โข ((ยฌ
(โฏโ๐) = 0 โง
(๐ โ Word ๐ โง (๐ cyclShift 1) = ๐)) โ โ๐ โ (0..^(โฏโ๐))(๐โ๐) = (๐โ0)) |
80 | 79 | ex 413 |
. 2
โข (ยฌ
(โฏโ๐) = 0
โ ((๐ โ Word
๐ โง (๐ cyclShift 1) = ๐) โ โ๐ โ (0..^(โฏโ๐))(๐โ๐) = (๐โ0))) |
81 | 7, 80 | pm2.61i 182 |
1
โข ((๐ โ Word ๐ โง (๐ cyclShift 1) = ๐) โ โ๐ โ (0..^(โฏโ๐))(๐โ๐) = (๐โ0)) |