Metamath Proof Explorer


Theorem zeo2

Description: An integer is even or odd but not both. (Contributed by Mario Carneiro, 12-Sep-2015)

Ref Expression
Assertion zeo2 ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ / 2 ) โˆˆ โ„ค โ†” ยฌ ( ( ๐‘ + 1 ) / 2 ) โˆˆ โ„ค ) )

Proof

Step Hyp Ref Expression
1 zcn โŠข ( ๐‘ โˆˆ โ„ค โ†’ ๐‘ โˆˆ โ„‚ )
2 peano2cn โŠข ( ๐‘ โˆˆ โ„‚ โ†’ ( ๐‘ + 1 ) โˆˆ โ„‚ )
3 1 2 syl โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ๐‘ + 1 ) โˆˆ โ„‚ )
4 2cnd โŠข ( ๐‘ โˆˆ โ„ค โ†’ 2 โˆˆ โ„‚ )
5 2ne0 โŠข 2 โ‰  0
6 5 a1i โŠข ( ๐‘ โˆˆ โ„ค โ†’ 2 โ‰  0 )
7 3 4 6 divcan2d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 ยท ( ( ๐‘ + 1 ) / 2 ) ) = ( ๐‘ + 1 ) )
8 1 4 6 divcan2d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 ยท ( ๐‘ / 2 ) ) = ๐‘ )
9 8 oveq1d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( 2 ยท ( ๐‘ / 2 ) ) + 1 ) = ( ๐‘ + 1 ) )
10 7 9 eqtr4d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( 2 ยท ( ( ๐‘ + 1 ) / 2 ) ) = ( ( 2 ยท ( ๐‘ / 2 ) ) + 1 ) )
11 zneo โŠข ( ( ( ( ๐‘ + 1 ) / 2 ) โˆˆ โ„ค โˆง ( ๐‘ / 2 ) โˆˆ โ„ค ) โ†’ ( 2 ยท ( ( ๐‘ + 1 ) / 2 ) ) โ‰  ( ( 2 ยท ( ๐‘ / 2 ) ) + 1 ) )
12 11 expcom โŠข ( ( ๐‘ / 2 ) โˆˆ โ„ค โ†’ ( ( ( ๐‘ + 1 ) / 2 ) โˆˆ โ„ค โ†’ ( 2 ยท ( ( ๐‘ + 1 ) / 2 ) ) โ‰  ( ( 2 ยท ( ๐‘ / 2 ) ) + 1 ) ) )
13 12 necon2bd โŠข ( ( ๐‘ / 2 ) โˆˆ โ„ค โ†’ ( ( 2 ยท ( ( ๐‘ + 1 ) / 2 ) ) = ( ( 2 ยท ( ๐‘ / 2 ) ) + 1 ) โ†’ ยฌ ( ( ๐‘ + 1 ) / 2 ) โˆˆ โ„ค ) )
14 10 13 syl5com โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ / 2 ) โˆˆ โ„ค โ†’ ยฌ ( ( ๐‘ + 1 ) / 2 ) โˆˆ โ„ค ) )
15 zeo โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ / 2 ) โˆˆ โ„ค โˆจ ( ( ๐‘ + 1 ) / 2 ) โˆˆ โ„ค ) )
16 15 ord โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ยฌ ( ๐‘ / 2 ) โˆˆ โ„ค โ†’ ( ( ๐‘ + 1 ) / 2 ) โˆˆ โ„ค ) )
17 16 con1d โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ยฌ ( ( ๐‘ + 1 ) / 2 ) โˆˆ โ„ค โ†’ ( ๐‘ / 2 ) โˆˆ โ„ค ) )
18 14 17 impbid โŠข ( ๐‘ โˆˆ โ„ค โ†’ ( ( ๐‘ / 2 ) โˆˆ โ„ค โ†” ยฌ ( ( ๐‘ + 1 ) / 2 ) โˆˆ โ„ค ) )