Step | Hyp | Ref
| Expression |
1 | | nnz 12578 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โค) |
2 | | nnne0 12245 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ 0) |
3 | | peano2z 12602 |
. . . . . . . . . 10
โข (๐ โ โค โ (๐ + 1) โ
โค) |
4 | 3 | adantr 481 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ (๐ + 1) โ
โค) |
5 | | dvdsval2 16199 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ 0 โง (๐ + 1) โ โค) โ (๐ โฅ (๐ + 1) โ ((๐ + 1) / ๐) โ โค)) |
6 | 1, 2, 4, 5 | syl2an23an 1423 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ (๐ โฅ (๐ + 1) โ ((๐ + 1) / ๐) โ โค)) |
7 | 6 | biimpa 477 |
. . . . . . 7
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ ((๐ + 1) / ๐) โ โค) |
8 | | flid 13772 |
. . . . . . 7
โข (((๐ + 1) / ๐) โ โค โ
(โโ((๐ + 1) /
๐)) = ((๐ + 1) / ๐)) |
9 | 7, 8 | syl 17 |
. . . . . 6
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ (โโ((๐ + 1) / ๐)) = ((๐ + 1) / ๐)) |
10 | | nnm1nn0 12512 |
. . . . . . . . . 10
โข (๐ โ โ โ (๐ โ 1) โ
โ0) |
11 | 10 | nn0red 12532 |
. . . . . . . . 9
โข (๐ โ โ โ (๐ โ 1) โ
โ) |
12 | 10 | nn0ge0d 12534 |
. . . . . . . . 9
โข (๐ โ โ โ 0 โค
(๐ โ
1)) |
13 | | nnre 12218 |
. . . . . . . . 9
โข (๐ โ โ โ ๐ โ
โ) |
14 | | nngt0 12242 |
. . . . . . . . 9
โข (๐ โ โ โ 0 <
๐) |
15 | | divge0 12082 |
. . . . . . . . 9
โข ((((๐ โ 1) โ โ โง
0 โค (๐ โ 1)) โง
(๐ โ โ โง 0
< ๐)) โ 0 โค
((๐ โ 1) / ๐)) |
16 | 11, 12, 13, 14, 15 | syl22anc 837 |
. . . . . . . 8
โข (๐ โ โ โ 0 โค
((๐ โ 1) / ๐)) |
17 | 16 | ad2antlr 725 |
. . . . . . 7
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ 0 โค ((๐ โ 1) / ๐)) |
18 | 13 | ltm1d 12145 |
. . . . . . . . . 10
โข (๐ โ โ โ (๐ โ 1) < ๐) |
19 | | nncn 12219 |
. . . . . . . . . . 11
โข (๐ โ โ โ ๐ โ
โ) |
20 | 19 | mulridd 11230 |
. . . . . . . . . 10
โข (๐ โ โ โ (๐ ยท 1) = ๐) |
21 | 18, 20 | breqtrrd 5176 |
. . . . . . . . 9
โข (๐ โ โ โ (๐ โ 1) < (๐ ยท 1)) |
22 | | 1re 11213 |
. . . . . . . . . . 11
โข 1 โ
โ |
23 | 22 | a1i 11 |
. . . . . . . . . 10
โข (๐ โ โ โ 1 โ
โ) |
24 | | ltdivmul 12088 |
. . . . . . . . . 10
โข (((๐ โ 1) โ โ โง
1 โ โ โง (๐
โ โ โง 0 < ๐)) โ (((๐ โ 1) / ๐) < 1 โ (๐ โ 1) < (๐ ยท 1))) |
25 | 11, 23, 13, 14, 24 | syl112anc 1374 |
. . . . . . . . 9
โข (๐ โ โ โ (((๐ โ 1) / ๐) < 1 โ (๐ โ 1) < (๐ ยท 1))) |
26 | 21, 25 | mpbird 256 |
. . . . . . . 8
โข (๐ โ โ โ ((๐ โ 1) / ๐) < 1) |
27 | 26 | ad2antlr 725 |
. . . . . . 7
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ ((๐ โ 1) / ๐) < 1) |
28 | | nndivre 12252 |
. . . . . . . . . 10
โข (((๐ โ 1) โ โ โง
๐ โ โ) โ
((๐ โ 1) / ๐) โ
โ) |
29 | 11, 28 | mpancom 686 |
. . . . . . . . 9
โข (๐ โ โ โ ((๐ โ 1) / ๐) โ โ) |
30 | 29 | ad2antlr 725 |
. . . . . . . 8
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ ((๐ โ 1) / ๐) โ โ) |
31 | | flbi2 13781 |
. . . . . . . 8
โข ((((๐ + 1) / ๐) โ โค โง ((๐ โ 1) / ๐) โ โ) โ
((โโ(((๐ + 1) /
๐) + ((๐ โ 1) / ๐))) = ((๐ + 1) / ๐) โ (0 โค ((๐ โ 1) / ๐) โง ((๐ โ 1) / ๐) < 1))) |
32 | 7, 30, 31 | syl2anc 584 |
. . . . . . 7
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ ((โโ(((๐ + 1) / ๐) + ((๐ โ 1) / ๐))) = ((๐ + 1) / ๐) โ (0 โค ((๐ โ 1) / ๐) โง ((๐ โ 1) / ๐) < 1))) |
33 | 17, 27, 32 | mpbir2and 711 |
. . . . . 6
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ (โโ(((๐ + 1) / ๐) + ((๐ โ 1) / ๐))) = ((๐ + 1) / ๐)) |
34 | 9, 33 | eqtr4d 2775 |
. . . . 5
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ (โโ((๐ + 1) / ๐)) = (โโ(((๐ + 1) / ๐) + ((๐ โ 1) / ๐)))) |
35 | | zcn 12562 |
. . . . . . . . . . . . 13
โข (๐ โ โค โ ๐ โ
โ) |
36 | 35 | adantr 481 |
. . . . . . . . . . . 12
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โ) |
37 | | ax-1cn 11167 |
. . . . . . . . . . . . 13
โข 1 โ
โ |
38 | 37 | a1i 11 |
. . . . . . . . . . . 12
โข ((๐ โ โค โง ๐ โ โ) โ 1 โ
โ) |
39 | 19 | adantl 482 |
. . . . . . . . . . . 12
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โ) |
40 | 36, 38, 39 | ppncand 11610 |
. . . . . . . . . . 11
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ + 1) + (๐ โ 1)) = (๐ + ๐)) |
41 | 40 | oveq1d 7423 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) + (๐ โ 1)) / ๐) = ((๐ + ๐) / ๐)) |
42 | 4 | zcnd 12666 |
. . . . . . . . . . 11
โข ((๐ โ โค โง ๐ โ โ) โ (๐ + 1) โ
โ) |
43 | | subcl 11458 |
. . . . . . . . . . . . 13
โข ((๐ โ โ โง 1 โ
โ) โ (๐ โ
1) โ โ) |
44 | 19, 37, 43 | sylancl 586 |
. . . . . . . . . . . 12
โข (๐ โ โ โ (๐ โ 1) โ
โ) |
45 | 44 | adantl 482 |
. . . . . . . . . . 11
โข ((๐ โ โค โง ๐ โ โ) โ (๐ โ 1) โ
โ) |
46 | 2 | adantl 482 |
. . . . . . . . . . 11
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ 0) |
47 | 42, 45, 39, 46 | divdird 12027 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) + (๐ โ 1)) / ๐) = (((๐ + 1) / ๐) + ((๐ โ 1) / ๐))) |
48 | 41, 47 | eqtr3d 2774 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ + ๐) / ๐) = (((๐ + 1) / ๐) + ((๐ โ 1) / ๐))) |
49 | 36, 39, 39, 46 | divdird 12027 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ + ๐) / ๐) = ((๐ / ๐) + (๐ / ๐))) |
50 | 48, 49 | eqtr3d 2774 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) / ๐) + ((๐ โ 1) / ๐)) = ((๐ / ๐) + (๐ / ๐))) |
51 | 39, 46 | dividd 11987 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ (๐ / ๐) = 1) |
52 | 51 | oveq2d 7424 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ / ๐) + (๐ / ๐)) = ((๐ / ๐) + 1)) |
53 | 50, 52 | eqtrd 2772 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) / ๐) + ((๐ โ 1) / ๐)) = ((๐ / ๐) + 1)) |
54 | 53 | fveq2d 6895 |
. . . . . 6
โข ((๐ โ โค โง ๐ โ โ) โ
(โโ(((๐ + 1) /
๐) + ((๐ โ 1) / ๐))) = (โโ((๐ / ๐) + 1))) |
55 | 54 | adantr 481 |
. . . . 5
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ (โโ(((๐ + 1) / ๐) + ((๐ โ 1) / ๐))) = (โโ((๐ / ๐) + 1))) |
56 | | zre 12561 |
. . . . . . . 8
โข (๐ โ โค โ ๐ โ
โ) |
57 | | nndivre 12252 |
. . . . . . . 8
โข ((๐ โ โ โง ๐ โ โ) โ (๐ / ๐) โ โ) |
58 | 56, 57 | sylan 580 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ (๐ / ๐) โ โ) |
59 | | 1z 12591 |
. . . . . . 7
โข 1 โ
โค |
60 | | fladdz 13789 |
. . . . . . 7
โข (((๐ / ๐) โ โ โง 1 โ โค)
โ (โโ((๐ /
๐) + 1)) =
((โโ(๐ / ๐)) + 1)) |
61 | 58, 59, 60 | sylancl 586 |
. . . . . 6
โข ((๐ โ โค โง ๐ โ โ) โ
(โโ((๐ / ๐) + 1)) = ((โโ(๐ / ๐)) + 1)) |
62 | 61 | adantr 481 |
. . . . 5
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ (โโ((๐ / ๐) + 1)) = ((โโ(๐ / ๐)) + 1)) |
63 | 34, 55, 62 | 3eqtrrd 2777 |
. . . 4
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ ((โโ(๐ / ๐)) + 1) = (โโ((๐ + 1) / ๐))) |
64 | | zre 12561 |
. . . . . . . . . 10
โข ((๐ + 1) โ โค โ
(๐ + 1) โ
โ) |
65 | 3, 64 | syl 17 |
. . . . . . . . 9
โข (๐ โ โค โ (๐ + 1) โ
โ) |
66 | | nndivre 12252 |
. . . . . . . . 9
โข (((๐ + 1) โ โ โง ๐ โ โ) โ ((๐ + 1) / ๐) โ โ) |
67 | 65, 66 | sylan 580 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ + 1) / ๐) โ โ) |
68 | 67 | flcld 13762 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ
(โโ((๐ + 1) /
๐)) โ
โค) |
69 | 68 | zcnd 12666 |
. . . . . 6
โข ((๐ โ โค โง ๐ โ โ) โ
(โโ((๐ + 1) /
๐)) โ
โ) |
70 | 58 | flcld 13762 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ
(โโ(๐ / ๐)) โ
โค) |
71 | 70 | zcnd 12666 |
. . . . . 6
โข ((๐ โ โค โง ๐ โ โ) โ
(โโ(๐ / ๐)) โ
โ) |
72 | 69, 71, 38 | subaddd 11588 |
. . . . 5
โข ((๐ โ โค โง ๐ โ โ) โ
(((โโ((๐ + 1) /
๐)) โ
(โโ(๐ / ๐))) = 1 โ
((โโ(๐ / ๐)) + 1) = (โโ((๐ + 1) / ๐)))) |
73 | 72 | adantr 481 |
. . . 4
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ (((โโ((๐ + 1) / ๐)) โ (โโ(๐ / ๐))) = 1 โ ((โโ(๐ / ๐)) + 1) = (โโ((๐ + 1) / ๐)))) |
74 | 63, 73 | mpbird 256 |
. . 3
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ ((โโ((๐ + 1) / ๐)) โ (โโ(๐ / ๐))) = 1) |
75 | | iftrue 4534 |
. . . 4
โข (๐ โฅ (๐ + 1) โ if(๐ โฅ (๐ + 1), 1, 0) = 1) |
76 | 75 | adantl 482 |
. . 3
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ if(๐ โฅ (๐ + 1), 1, 0) = 1) |
77 | 74, 76 | eqtr4d 2775 |
. 2
โข (((๐ โ โค โง ๐ โ โ) โง ๐ โฅ (๐ + 1)) โ ((โโ((๐ + 1) / ๐)) โ (โโ(๐ / ๐))) = if(๐ โฅ (๐ + 1), 1, 0)) |
78 | | zmodcl 13855 |
. . . . . . . . . . 11
โข (((๐ + 1) โ โค โง ๐ โ โ) โ ((๐ + 1) mod ๐) โ
โ0) |
79 | 3, 78 | sylan 580 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ + 1) mod ๐) โ
โ0) |
80 | 79 | nn0red 12532 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ + 1) mod ๐) โ โ) |
81 | | resubcl 11523 |
. . . . . . . . 9
โข ((((๐ + 1) mod ๐) โ โ โง 1 โ โ)
โ (((๐ + 1) mod ๐) โ 1) โ
โ) |
82 | 80, 22, 81 | sylancl 586 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) mod ๐) โ 1) โ
โ) |
83 | 82 | adantr 481 |
. . . . . . 7
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ (((๐ + 1) mod ๐) โ 1) โ
โ) |
84 | | elnn0 12473 |
. . . . . . . . . . . . . 14
โข (((๐ + 1) mod ๐) โ โ0 โ (((๐ + 1) mod ๐) โ โ โจ ((๐ + 1) mod ๐) = 0)) |
85 | 79, 84 | sylib 217 |
. . . . . . . . . . . . 13
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) mod ๐) โ โ โจ ((๐ + 1) mod ๐) = 0)) |
86 | 85 | ord 862 |
. . . . . . . . . . . 12
โข ((๐ โ โค โง ๐ โ โ) โ (ยฌ
((๐ + 1) mod ๐) โ โ โ ((๐ + 1) mod ๐) = 0)) |
87 | | id 22 |
. . . . . . . . . . . . 13
โข (๐ โ โ โ ๐ โ
โ) |
88 | | dvdsval3 16200 |
. . . . . . . . . . . . 13
โข ((๐ โ โ โง (๐ + 1) โ โค) โ
(๐ โฅ (๐ + 1) โ ((๐ + 1) mod ๐) = 0)) |
89 | 87, 3, 88 | syl2anr 597 |
. . . . . . . . . . . 12
โข ((๐ โ โค โง ๐ โ โ) โ (๐ โฅ (๐ + 1) โ ((๐ + 1) mod ๐) = 0)) |
90 | 86, 89 | sylibrd 258 |
. . . . . . . . . . 11
โข ((๐ โ โค โง ๐ โ โ) โ (ยฌ
((๐ + 1) mod ๐) โ โ โ ๐ โฅ (๐ + 1))) |
91 | 90 | con1d 145 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ) โ (ยฌ
๐ โฅ (๐ + 1) โ ((๐ + 1) mod ๐) โ โ)) |
92 | 91 | imp 407 |
. . . . . . . . 9
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ ((๐ + 1) mod ๐) โ โ) |
93 | | nnm1nn0 12512 |
. . . . . . . . 9
โข (((๐ + 1) mod ๐) โ โ โ (((๐ + 1) mod ๐) โ 1) โ
โ0) |
94 | 92, 93 | syl 17 |
. . . . . . . 8
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ (((๐ + 1) mod ๐) โ 1) โ
โ0) |
95 | 94 | nn0ge0d 12534 |
. . . . . . 7
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ 0 โค (((๐ + 1) mod ๐) โ 1)) |
96 | 13, 14 | jca 512 |
. . . . . . . 8
โข (๐ โ โ โ (๐ โ โ โง 0 <
๐)) |
97 | 96 | ad2antlr 725 |
. . . . . . 7
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ (๐ โ โ โง 0 < ๐)) |
98 | | divge0 12082 |
. . . . . . 7
โข
((((((๐ + 1) mod
๐) โ 1) โ
โ โง 0 โค (((๐ +
1) mod ๐) โ 1)) โง
(๐ โ โ โง 0
< ๐)) โ 0 โค
((((๐ + 1) mod ๐) โ 1) / ๐)) |
99 | 83, 95, 97, 98 | syl21anc 836 |
. . . . . 6
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ 0 โค ((((๐ + 1) mod ๐) โ 1) / ๐)) |
100 | 13 | adantl 482 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ) โ ๐ โ
โ) |
101 | 80 | ltm1d 12145 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) mod ๐) โ 1) < ((๐ + 1) mod ๐)) |
102 | | nnrp 12984 |
. . . . . . . . . . 11
โข (๐ โ โ โ ๐ โ
โ+) |
103 | | modlt 13844 |
. . . . . . . . . . 11
โข (((๐ + 1) โ โ โง ๐ โ โ+)
โ ((๐ + 1) mod ๐) < ๐) |
104 | 65, 102, 103 | syl2an 596 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ + 1) mod ๐) < ๐) |
105 | 82, 80, 100, 101, 104 | lttrd 11374 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) mod ๐) โ 1) < ๐) |
106 | 39 | mulridd 11230 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ (๐ ยท 1) = ๐) |
107 | 105, 106 | breqtrrd 5176 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) mod ๐) โ 1) < (๐ ยท 1)) |
108 | 22 | a1i 11 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ 1 โ
โ) |
109 | 14 | adantl 482 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ 0 <
๐) |
110 | | ltdivmul 12088 |
. . . . . . . . 9
โข
(((((๐ + 1) mod
๐) โ 1) โ
โ โง 1 โ โ โง (๐ โ โ โง 0 < ๐)) โ (((((๐ + 1) mod ๐) โ 1) / ๐) < 1 โ (((๐ + 1) mod ๐) โ 1) < (๐ ยท 1))) |
111 | 82, 108, 100, 109, 110 | syl112anc 1374 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ
(((((๐ + 1) mod ๐) โ 1) / ๐) < 1 โ (((๐ + 1) mod ๐) โ 1) < (๐ ยท 1))) |
112 | 107, 111 | mpbird 256 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ
((((๐ + 1) mod ๐) โ 1) / ๐) < 1) |
113 | 112 | adantr 481 |
. . . . . 6
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ ((((๐ + 1) mod ๐) โ 1) / ๐) < 1) |
114 | | nndivre 12252 |
. . . . . . . . 9
โข
(((((๐ + 1) mod
๐) โ 1) โ
โ โง ๐ โ
โ) โ ((((๐ + 1)
mod ๐) โ 1) / ๐) โ
โ) |
115 | 82, 114 | sylancom 588 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ
((((๐ + 1) mod ๐) โ 1) / ๐) โ โ) |
116 | | flbi2 13781 |
. . . . . . . 8
โข
(((โโ((๐
+ 1) / ๐)) โ โค
โง ((((๐ + 1) mod ๐) โ 1) / ๐) โ โ) โ
((โโ((โโ((๐ + 1) / ๐)) + ((((๐ + 1) mod ๐) โ 1) / ๐))) = (โโ((๐ + 1) / ๐)) โ (0 โค ((((๐ + 1) mod ๐) โ 1) / ๐) โง ((((๐ + 1) mod ๐) โ 1) / ๐) < 1))) |
117 | 68, 115, 116 | syl2anc 584 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ
((โโ((โโ((๐ + 1) / ๐)) + ((((๐ + 1) mod ๐) โ 1) / ๐))) = (โโ((๐ + 1) / ๐)) โ (0 โค ((((๐ + 1) mod ๐) โ 1) / ๐) โง ((((๐ + 1) mod ๐) โ 1) / ๐) < 1))) |
118 | 117 | adantr 481 |
. . . . . 6
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ
((โโ((โโ((๐ + 1) / ๐)) + ((((๐ + 1) mod ๐) โ 1) / ๐))) = (โโ((๐ + 1) / ๐)) โ (0 โค ((((๐ + 1) mod ๐) โ 1) / ๐) โง ((((๐ + 1) mod ๐) โ 1) / ๐) < 1))) |
119 | 99, 113, 118 | mpbir2and 711 |
. . . . 5
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ
(โโ((โโ((๐ + 1) / ๐)) + ((((๐ + 1) mod ๐) โ 1) / ๐))) = (โโ((๐ + 1) / ๐))) |
120 | | modval 13835 |
. . . . . . . . . . . . . 14
โข (((๐ + 1) โ โ โง ๐ โ โ+)
โ ((๐ + 1) mod ๐) = ((๐ + 1) โ (๐ ยท (โโ((๐ + 1) / ๐))))) |
121 | 65, 102, 120 | syl2an 596 |
. . . . . . . . . . . . 13
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ + 1) mod ๐) = ((๐ + 1) โ (๐ ยท (โโ((๐ + 1) / ๐))))) |
122 | 121 | oveq1d 7423 |
. . . . . . . . . . . 12
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) mod ๐) โ 1) = (((๐ + 1) โ (๐ ยท (โโ((๐ + 1) / ๐)))) โ 1)) |
123 | 39, 69 | mulcld 11233 |
. . . . . . . . . . . . 13
โข ((๐ โ โค โง ๐ โ โ) โ (๐ ยท (โโ((๐ + 1) / ๐))) โ โ) |
124 | 42, 38, 123 | sub32d 11602 |
. . . . . . . . . . . 12
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) โ 1) โ (๐ ยท (โโ((๐ + 1) / ๐)))) = (((๐ + 1) โ (๐ ยท (โโ((๐ + 1) / ๐)))) โ 1)) |
125 | 122, 124 | eqtr4d 2775 |
. . . . . . . . . . 11
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) mod ๐) โ 1) = (((๐ + 1) โ 1) โ (๐ ยท (โโ((๐ + 1) / ๐))))) |
126 | | pncan 11465 |
. . . . . . . . . . . . 13
โข ((๐ โ โ โง 1 โ
โ) โ ((๐ + 1)
โ 1) = ๐) |
127 | 36, 37, 126 | sylancl 586 |
. . . . . . . . . . . 12
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ + 1) โ 1) = ๐) |
128 | 127 | oveq1d 7423 |
. . . . . . . . . . 11
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) โ 1) โ (๐ ยท (โโ((๐ + 1) / ๐)))) = (๐ โ (๐ ยท (โโ((๐ + 1) / ๐))))) |
129 | 125, 128 | eqtrd 2772 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ + 1) mod ๐) โ 1) = (๐ โ (๐ ยท (โโ((๐ + 1) / ๐))))) |
130 | 129 | oveq1d 7423 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ
((((๐ + 1) mod ๐) โ 1) / ๐) = ((๐ โ (๐ ยท (โโ((๐ + 1) / ๐)))) / ๐)) |
131 | 36, 123, 39, 46 | divsubdird 12028 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ โ (๐ ยท (โโ((๐ + 1) / ๐)))) / ๐) = ((๐ / ๐) โ ((๐ ยท (โโ((๐ + 1) / ๐))) / ๐))) |
132 | 69, 39, 46 | divcan3d 11994 |
. . . . . . . . . 10
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ ยท (โโ((๐ + 1) / ๐))) / ๐) = (โโ((๐ + 1) / ๐))) |
133 | 132 | oveq2d 7424 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ / ๐) โ ((๐ ยท (โโ((๐ + 1) / ๐))) / ๐)) = ((๐ / ๐) โ (โโ((๐ + 1) / ๐)))) |
134 | 130, 131,
133 | 3eqtrrd 2777 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ ((๐ / ๐) โ (โโ((๐ + 1) / ๐))) = ((((๐ + 1) mod ๐) โ 1) / ๐)) |
135 | 58 | recnd 11241 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ (๐ / ๐) โ โ) |
136 | 115 | recnd 11241 |
. . . . . . . . 9
โข ((๐ โ โค โง ๐ โ โ) โ
((((๐ + 1) mod ๐) โ 1) / ๐) โ โ) |
137 | 135, 69, 136 | subaddd 11588 |
. . . . . . . 8
โข ((๐ โ โค โง ๐ โ โ) โ (((๐ / ๐) โ (โโ((๐ + 1) / ๐))) = ((((๐ + 1) mod ๐) โ 1) / ๐) โ ((โโ((๐ + 1) / ๐)) + ((((๐ + 1) mod ๐) โ 1) / ๐)) = (๐ / ๐))) |
138 | 134, 137 | mpbid 231 |
. . . . . . 7
โข ((๐ โ โค โง ๐ โ โ) โ
((โโ((๐ + 1) /
๐)) + ((((๐ + 1) mod ๐) โ 1) / ๐)) = (๐ / ๐)) |
139 | 138 | adantr 481 |
. . . . . 6
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ
((โโ((๐ + 1) /
๐)) + ((((๐ + 1) mod ๐) โ 1) / ๐)) = (๐ / ๐)) |
140 | 139 | fveq2d 6895 |
. . . . 5
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ
(โโ((โโ((๐ + 1) / ๐)) + ((((๐ + 1) mod ๐) โ 1) / ๐))) = (โโ(๐ / ๐))) |
141 | 119, 140 | eqtr3d 2774 |
. . . 4
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ
(โโ((๐ + 1) /
๐)) = (โโ(๐ / ๐))) |
142 | 69, 71 | subeq0ad 11580 |
. . . . 5
โข ((๐ โ โค โง ๐ โ โ) โ
(((โโ((๐ + 1) /
๐)) โ
(โโ(๐ / ๐))) = 0 โ
(โโ((๐ + 1) /
๐)) = (โโ(๐ / ๐)))) |
143 | 142 | adantr 481 |
. . . 4
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ
(((โโ((๐ + 1) /
๐)) โ
(โโ(๐ / ๐))) = 0 โ
(โโ((๐ + 1) /
๐)) = (โโ(๐ / ๐)))) |
144 | 141, 143 | mpbird 256 |
. . 3
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ
((โโ((๐ + 1) /
๐)) โ
(โโ(๐ / ๐))) = 0) |
145 | | iffalse 4537 |
. . . 4
โข (ยฌ
๐ โฅ (๐ + 1) โ if(๐ โฅ (๐ + 1), 1, 0) = 0) |
146 | 145 | adantl 482 |
. . 3
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ if(๐ โฅ (๐ + 1), 1, 0) = 0) |
147 | 144, 146 | eqtr4d 2775 |
. 2
โข (((๐ โ โค โง ๐ โ โ) โง ยฌ
๐ โฅ (๐ + 1)) โ
((โโ((๐ + 1) /
๐)) โ
(โโ(๐ / ๐))) = if(๐ โฅ (๐ + 1), 1, 0)) |
148 | 77, 147 | pm2.61dan 811 |
1
โข ((๐ โ โค โง ๐ โ โ) โ
((โโ((๐ + 1) /
๐)) โ
(โโ(๐ / ๐))) = if(๐ โฅ (๐ + 1), 1, 0)) |