Metamath Proof Explorer


Theorem fldivp1

Description: The difference between the floors of adjacent fractions is either 1 or 0. (Contributed by Mario Carneiro, 8-Mar-2014)

Ref Expression
Assertion fldivp1 ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = if ( ๐‘ โˆฅ ( ๐‘€ + 1 ) , 1 , 0 ) )

Proof

Step Hyp Ref Expression
1 nnz โŠข ( ๐‘ โˆˆ โ„• โ†’ ๐‘ โˆˆ โ„ค )
2 nnne0 โŠข ( ๐‘ โˆˆ โ„• โ†’ ๐‘ โ‰  0 )
3 peano2z โŠข ( ๐‘€ โˆˆ โ„ค โ†’ ( ๐‘€ + 1 ) โˆˆ โ„ค )
4 3 adantr โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘€ + 1 ) โˆˆ โ„ค )
5 dvdsval2 โŠข ( ( ๐‘ โˆˆ โ„ค โˆง ๐‘ โ‰  0 โˆง ( ๐‘€ + 1 ) โˆˆ โ„ค ) โ†’ ( ๐‘ โˆฅ ( ๐‘€ + 1 ) โ†” ( ( ๐‘€ + 1 ) / ๐‘ ) โˆˆ โ„ค ) )
6 1 2 4 5 syl2an23an โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘ โˆฅ ( ๐‘€ + 1 ) โ†” ( ( ๐‘€ + 1 ) / ๐‘ ) โˆˆ โ„ค ) )
7 6 biimpa โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( ๐‘€ + 1 ) / ๐‘ ) โˆˆ โ„ค )
8 flid โŠข ( ( ( ๐‘€ + 1 ) / ๐‘ ) โˆˆ โ„ค โ†’ ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) = ( ( ๐‘€ + 1 ) / ๐‘ ) )
9 7 8 syl โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) = ( ( ๐‘€ + 1 ) / ๐‘ ) )
10 nnm1nn0 โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„•0 )
11 10 nn0red โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„ )
12 10 nn0ge0d โŠข ( ๐‘ โˆˆ โ„• โ†’ 0 โ‰ค ( ๐‘ โˆ’ 1 ) )
13 nnre โŠข ( ๐‘ โˆˆ โ„• โ†’ ๐‘ โˆˆ โ„ )
14 nngt0 โŠข ( ๐‘ โˆˆ โ„• โ†’ 0 < ๐‘ )
15 divge0 โŠข ( ( ( ( ๐‘ โˆ’ 1 ) โˆˆ โ„ โˆง 0 โ‰ค ( ๐‘ โˆ’ 1 ) ) โˆง ( ๐‘ โˆˆ โ„ โˆง 0 < ๐‘ ) ) โ†’ 0 โ‰ค ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) )
16 11 12 13 14 15 syl22anc โŠข ( ๐‘ โˆˆ โ„• โ†’ 0 โ‰ค ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) )
17 16 ad2antlr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ 0 โ‰ค ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) )
18 13 ltm1d โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ๐‘ โˆ’ 1 ) < ๐‘ )
19 nncn โŠข ( ๐‘ โˆˆ โ„• โ†’ ๐‘ โˆˆ โ„‚ )
20 19 mulridd โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ๐‘ ยท 1 ) = ๐‘ )
21 18 20 breqtrrd โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ๐‘ โˆ’ 1 ) < ( ๐‘ ยท 1 ) )
22 1re โŠข 1 โˆˆ โ„
23 22 a1i โŠข ( ๐‘ โˆˆ โ„• โ†’ 1 โˆˆ โ„ )
24 ltdivmul โŠข ( ( ( ๐‘ โˆ’ 1 ) โˆˆ โ„ โˆง 1 โˆˆ โ„ โˆง ( ๐‘ โˆˆ โ„ โˆง 0 < ๐‘ ) ) โ†’ ( ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) < 1 โ†” ( ๐‘ โˆ’ 1 ) < ( ๐‘ ยท 1 ) ) )
25 11 23 13 14 24 syl112anc โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) < 1 โ†” ( ๐‘ โˆ’ 1 ) < ( ๐‘ ยท 1 ) ) )
26 21 25 mpbird โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) < 1 )
27 26 ad2antlr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) < 1 )
28 nndivre โŠข ( ( ( ๐‘ โˆ’ 1 ) โˆˆ โ„ โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) โˆˆ โ„ )
29 11 28 mpancom โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) โˆˆ โ„ )
30 29 ad2antlr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) โˆˆ โ„ )
31 flbi2 โŠข ( ( ( ( ๐‘€ + 1 ) / ๐‘ ) โˆˆ โ„ค โˆง ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) โˆˆ โ„ ) โ†’ ( ( โŒŠ โ€˜ ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) ) = ( ( ๐‘€ + 1 ) / ๐‘ ) โ†” ( 0 โ‰ค ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) โˆง ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) < 1 ) ) )
32 7 30 31 syl2anc โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( โŒŠ โ€˜ ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) ) = ( ( ๐‘€ + 1 ) / ๐‘ ) โ†” ( 0 โ‰ค ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) โˆง ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) < 1 ) ) )
33 17 27 32 mpbir2and โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( โŒŠ โ€˜ ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) ) = ( ( ๐‘€ + 1 ) / ๐‘ ) )
34 9 33 eqtr4d โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) = ( โŒŠ โ€˜ ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) ) )
35 zcn โŠข ( ๐‘€ โˆˆ โ„ค โ†’ ๐‘€ โˆˆ โ„‚ )
36 35 adantr โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ๐‘€ โˆˆ โ„‚ )
37 ax-1cn โŠข 1 โˆˆ โ„‚
38 37 a1i โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ 1 โˆˆ โ„‚ )
39 19 adantl โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ๐‘ โˆˆ โ„‚ )
40 36 38 39 ppncand โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + 1 ) + ( ๐‘ โˆ’ 1 ) ) = ( ๐‘€ + ๐‘ ) )
41 40 oveq1d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) + ( ๐‘ โˆ’ 1 ) ) / ๐‘ ) = ( ( ๐‘€ + ๐‘ ) / ๐‘ ) )
42 4 zcnd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘€ + 1 ) โˆˆ โ„‚ )
43 subcl โŠข ( ( ๐‘ โˆˆ โ„‚ โˆง 1 โˆˆ โ„‚ ) โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„‚ )
44 19 37 43 sylancl โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„‚ )
45 44 adantl โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘ โˆ’ 1 ) โˆˆ โ„‚ )
46 2 adantl โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ๐‘ โ‰  0 )
47 42 45 39 46 divdird โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) + ( ๐‘ โˆ’ 1 ) ) / ๐‘ ) = ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) )
48 41 47 eqtr3d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + ๐‘ ) / ๐‘ ) = ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) )
49 36 39 39 46 divdird โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + ๐‘ ) / ๐‘ ) = ( ( ๐‘€ / ๐‘ ) + ( ๐‘ / ๐‘ ) ) )
50 48 49 eqtr3d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) = ( ( ๐‘€ / ๐‘ ) + ( ๐‘ / ๐‘ ) ) )
51 39 46 dividd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘ / ๐‘ ) = 1 )
52 51 oveq2d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ / ๐‘ ) + ( ๐‘ / ๐‘ ) ) = ( ( ๐‘€ / ๐‘ ) + 1 ) )
53 50 52 eqtrd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) = ( ( ๐‘€ / ๐‘ ) + 1 ) )
54 53 fveq2d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( โŒŠ โ€˜ ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) ) = ( โŒŠ โ€˜ ( ( ๐‘€ / ๐‘ ) + 1 ) ) )
55 54 adantr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( โŒŠ โ€˜ ( ( ( ๐‘€ + 1 ) / ๐‘ ) + ( ( ๐‘ โˆ’ 1 ) / ๐‘ ) ) ) = ( โŒŠ โ€˜ ( ( ๐‘€ / ๐‘ ) + 1 ) ) )
56 zre โŠข ( ๐‘€ โˆˆ โ„ค โ†’ ๐‘€ โˆˆ โ„ )
57 nndivre โŠข ( ( ๐‘€ โˆˆ โ„ โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘€ / ๐‘ ) โˆˆ โ„ )
58 56 57 sylan โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘€ / ๐‘ ) โˆˆ โ„ )
59 1z โŠข 1 โˆˆ โ„ค
60 fladdz โŠข ( ( ( ๐‘€ / ๐‘ ) โˆˆ โ„ โˆง 1 โˆˆ โ„ค ) โ†’ ( โŒŠ โ€˜ ( ( ๐‘€ / ๐‘ ) + 1 ) ) = ( ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) + 1 ) )
61 58 59 60 sylancl โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( โŒŠ โ€˜ ( ( ๐‘€ / ๐‘ ) + 1 ) ) = ( ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) + 1 ) )
62 61 adantr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( โŒŠ โ€˜ ( ( ๐‘€ / ๐‘ ) + 1 ) ) = ( ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) + 1 ) )
63 34 55 62 3eqtrrd โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) + 1 ) = ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) )
64 zre โŠข ( ( ๐‘€ + 1 ) โˆˆ โ„ค โ†’ ( ๐‘€ + 1 ) โˆˆ โ„ )
65 3 64 syl โŠข ( ๐‘€ โˆˆ โ„ค โ†’ ( ๐‘€ + 1 ) โˆˆ โ„ )
66 nndivre โŠข ( ( ( ๐‘€ + 1 ) โˆˆ โ„ โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + 1 ) / ๐‘ ) โˆˆ โ„ )
67 65 66 sylan โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + 1 ) / ๐‘ ) โˆˆ โ„ )
68 67 flcld โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆˆ โ„ค )
69 68 zcnd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆˆ โ„‚ )
70 58 flcld โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) โˆˆ โ„ค )
71 70 zcnd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) โˆˆ โ„‚ )
72 69 71 38 subaddd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = 1 โ†” ( ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) + 1 ) = ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) )
73 72 adantr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = 1 โ†” ( ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) + 1 ) = ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) )
74 63 73 mpbird โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = 1 )
75 iftrue โŠข ( ๐‘ โˆฅ ( ๐‘€ + 1 ) โ†’ if ( ๐‘ โˆฅ ( ๐‘€ + 1 ) , 1 , 0 ) = 1 )
76 75 adantl โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ if ( ๐‘ โˆฅ ( ๐‘€ + 1 ) , 1 , 0 ) = 1 )
77 74 76 eqtr4d โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = if ( ๐‘ โˆฅ ( ๐‘€ + 1 ) , 1 , 0 ) )
78 zmodcl โŠข ( ( ( ๐‘€ + 1 ) โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„•0 )
79 3 78 sylan โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„•0 )
80 79 nn0red โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„ )
81 resubcl โŠข ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„ โˆง 1 โˆˆ โ„ ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) โˆˆ โ„ )
82 80 22 81 sylancl โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) โˆˆ โ„ )
83 82 adantr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) โˆˆ โ„ )
84 elnn0 โŠข ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„•0 โ†” ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„• โˆจ ( ( ๐‘€ + 1 ) mod ๐‘ ) = 0 ) )
85 79 84 sylib โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„• โˆจ ( ( ๐‘€ + 1 ) mod ๐‘ ) = 0 ) )
86 85 ord โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ยฌ ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„• โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) = 0 ) )
87 id โŠข ( ๐‘ โˆˆ โ„• โ†’ ๐‘ โˆˆ โ„• )
88 dvdsval3 โŠข ( ( ๐‘ โˆˆ โ„• โˆง ( ๐‘€ + 1 ) โˆˆ โ„ค ) โ†’ ( ๐‘ โˆฅ ( ๐‘€ + 1 ) โ†” ( ( ๐‘€ + 1 ) mod ๐‘ ) = 0 ) )
89 87 3 88 syl2anr โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘ โˆฅ ( ๐‘€ + 1 ) โ†” ( ( ๐‘€ + 1 ) mod ๐‘ ) = 0 ) )
90 86 89 sylibrd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ยฌ ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„• โ†’ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) )
91 90 con1d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„• ) )
92 91 imp โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„• )
93 nnm1nn0 โŠข ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆˆ โ„• โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) โˆˆ โ„•0 )
94 92 93 syl โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) โˆˆ โ„•0 )
95 94 nn0ge0d โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ 0 โ‰ค ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) )
96 13 14 jca โŠข ( ๐‘ โˆˆ โ„• โ†’ ( ๐‘ โˆˆ โ„ โˆง 0 < ๐‘ ) )
97 96 ad2antlr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ๐‘ โˆˆ โ„ โˆง 0 < ๐‘ ) )
98 divge0 โŠข ( ( ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) โˆˆ โ„ โˆง 0 โ‰ค ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) ) โˆง ( ๐‘ โˆˆ โ„ โˆง 0 < ๐‘ ) ) โ†’ 0 โ‰ค ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) )
99 83 95 97 98 syl21anc โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ 0 โ‰ค ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) )
100 13 adantl โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ๐‘ โˆˆ โ„ )
101 80 ltm1d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) < ( ( ๐‘€ + 1 ) mod ๐‘ ) )
102 nnrp โŠข ( ๐‘ โˆˆ โ„• โ†’ ๐‘ โˆˆ โ„+ )
103 modlt โŠข ( ( ( ๐‘€ + 1 ) โˆˆ โ„ โˆง ๐‘ โˆˆ โ„+ ) โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) < ๐‘ )
104 65 102 103 syl2an โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) < ๐‘ )
105 82 80 100 101 104 lttrd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) < ๐‘ )
106 39 mulridd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘ ยท 1 ) = ๐‘ )
107 105 106 breqtrrd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) < ( ๐‘ ยท 1 ) )
108 22 a1i โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ 1 โˆˆ โ„ )
109 14 adantl โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ 0 < ๐‘ )
110 ltdivmul โŠข ( ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) โˆˆ โ„ โˆง 1 โˆˆ โ„ โˆง ( ๐‘ โˆˆ โ„ โˆง 0 < ๐‘ ) ) โ†’ ( ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) < 1 โ†” ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) < ( ๐‘ ยท 1 ) ) )
111 82 108 100 109 110 syl112anc โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) < 1 โ†” ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) < ( ๐‘ ยท 1 ) ) )
112 107 111 mpbird โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) < 1 )
113 112 adantr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) < 1 )
114 nndivre โŠข ( ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) โˆˆ โ„ โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) โˆˆ โ„ )
115 82 114 sylancom โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) โˆˆ โ„ )
116 flbi2 โŠข ( ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆˆ โ„ค โˆง ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) โˆˆ โ„ ) โ†’ ( ( โŒŠ โ€˜ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) + ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) ) ) = ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โ†” ( 0 โ‰ค ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) โˆง ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) < 1 ) ) )
117 68 115 116 syl2anc โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( โŒŠ โ€˜ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) + ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) ) ) = ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โ†” ( 0 โ‰ค ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) โˆง ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) < 1 ) ) )
118 117 adantr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( โŒŠ โ€˜ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) + ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) ) ) = ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โ†” ( 0 โ‰ค ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) โˆง ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) < 1 ) ) )
119 99 113 118 mpbir2and โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( โŒŠ โ€˜ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) + ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) ) ) = ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) )
120 modval โŠข ( ( ( ๐‘€ + 1 ) โˆˆ โ„ โˆง ๐‘ โˆˆ โ„+ ) โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) = ( ( ๐‘€ + 1 ) โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) )
121 65 102 120 syl2an โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + 1 ) mod ๐‘ ) = ( ( ๐‘€ + 1 ) โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) )
122 121 oveq1d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) = ( ( ( ๐‘€ + 1 ) โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) โˆ’ 1 ) )
123 39 69 mulcld โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) โˆˆ โ„‚ )
124 42 38 123 sub32d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) โˆ’ 1 ) โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) = ( ( ( ๐‘€ + 1 ) โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) โˆ’ 1 ) )
125 122 124 eqtr4d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) = ( ( ( ๐‘€ + 1 ) โˆ’ 1 ) โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) )
126 pncan โŠข ( ( ๐‘€ โˆˆ โ„‚ โˆง 1 โˆˆ โ„‚ ) โ†’ ( ( ๐‘€ + 1 ) โˆ’ 1 ) = ๐‘€ )
127 36 37 126 sylancl โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ + 1 ) โˆ’ 1 ) = ๐‘€ )
128 127 oveq1d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) โˆ’ 1 ) โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) = ( ๐‘€ โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) )
129 125 128 eqtrd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) = ( ๐‘€ โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) )
130 129 oveq1d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) = ( ( ๐‘€ โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) / ๐‘ ) )
131 36 123 39 46 divsubdird โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ โˆ’ ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) ) / ๐‘ ) = ( ( ๐‘€ / ๐‘ ) โˆ’ ( ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) / ๐‘ ) ) )
132 69 39 46 divcan3d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) / ๐‘ ) = ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) )
133 132 oveq2d โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ / ๐‘ ) โˆ’ ( ( ๐‘ ยท ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) / ๐‘ ) ) = ( ( ๐‘€ / ๐‘ ) โˆ’ ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) )
134 130 131 133 3eqtrrd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ๐‘€ / ๐‘ ) โˆ’ ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) = ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) )
135 58 recnd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ๐‘€ / ๐‘ ) โˆˆ โ„‚ )
136 115 recnd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) โˆˆ โ„‚ )
137 135 69 136 subaddd โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( ๐‘€ / ๐‘ ) โˆ’ ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) ) = ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) โ†” ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) + ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) ) = ( ๐‘€ / ๐‘ ) ) )
138 134 137 mpbid โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) + ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) ) = ( ๐‘€ / ๐‘ ) )
139 138 adantr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) + ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) ) = ( ๐‘€ / ๐‘ ) )
140 139 fveq2d โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( โŒŠ โ€˜ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) + ( ( ( ( ๐‘€ + 1 ) mod ๐‘ ) โˆ’ 1 ) / ๐‘ ) ) ) = ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) )
141 119 140 eqtr3d โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) = ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) )
142 69 71 subeq0ad โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = 0 โ†” ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) = ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) )
143 142 adantr โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = 0 โ†” ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) = ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) )
144 141 143 mpbird โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = 0 )
145 iffalse โŠข ( ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) โ†’ if ( ๐‘ โˆฅ ( ๐‘€ + 1 ) , 1 , 0 ) = 0 )
146 145 adantl โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ if ( ๐‘ โˆฅ ( ๐‘€ + 1 ) , 1 , 0 ) = 0 )
147 144 146 eqtr4d โŠข ( ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โˆง ยฌ ๐‘ โˆฅ ( ๐‘€ + 1 ) ) โ†’ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = if ( ๐‘ โˆฅ ( ๐‘€ + 1 ) , 1 , 0 ) )
148 77 147 pm2.61dan โŠข ( ( ๐‘€ โˆˆ โ„ค โˆง ๐‘ โˆˆ โ„• ) โ†’ ( ( โŒŠ โ€˜ ( ( ๐‘€ + 1 ) / ๐‘ ) ) โˆ’ ( โŒŠ โ€˜ ( ๐‘€ / ๐‘ ) ) ) = if ( ๐‘ โˆฅ ( ๐‘€ + 1 ) , 1 , 0 ) )