MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  odd2np1 Structured version   Visualization version   Unicode version

Theorem odd2np1 15065
Description: An integer is odd iff it is one plus twice another integer. (Contributed by Scott Fenton, 3-Apr-2014.) (Revised by Mario Carneiro, 19-Apr-2014.)
Assertion
Ref Expression
odd2np1  |-  ( N  e.  ZZ  ->  ( -.  2  ||  N  <->  E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N ) )
Distinct variable group:    n, N

Proof of Theorem odd2np1
Dummy variables  k  x  y are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 2z 11409 . . . 4  |-  2  e.  ZZ
2 divides 14985 . . . 4  |-  ( ( 2  e.  ZZ  /\  N  e.  ZZ )  ->  ( 2  ||  N  <->  E. k  e.  ZZ  (
k  x.  2 )  =  N ) )
31, 2mpan 706 . . 3  |-  ( N  e.  ZZ  ->  (
2  ||  N  <->  E. k  e.  ZZ  ( k  x.  2 )  =  N ) )
43notbid 308 . 2  |-  ( N  e.  ZZ  ->  ( -.  2  ||  N  <->  -.  E. k  e.  ZZ  ( k  x.  2 )  =  N ) )
5 elznn0 11392 . . . 4  |-  ( N  e.  ZZ  <->  ( N  e.  RR  /\  ( N  e.  NN0  \/  -u N  e.  NN0 ) ) )
6 odd2np1lem 15064 . . . . . 6  |-  ( N  e.  NN0  ->  ( E. n  e.  ZZ  (
( 2  x.  n
)  +  1 )  =  N  \/  E. k  e.  ZZ  (
k  x.  2 )  =  N ) )
76adantl 482 . . . . 5  |-  ( ( N  e.  RR  /\  N  e.  NN0 )  -> 
( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  \/  E. k  e.  ZZ  ( k  x.  2 )  =  N ) )
8 odd2np1lem 15064 . . . . . . 7  |-  ( -u N  e.  NN0  ->  ( E. x  e.  ZZ  ( ( 2  x.  x )  +  1 )  =  -u N  \/  E. y  e.  ZZ  ( y  x.  2 )  =  -u N
) )
9 peano2z 11418 . . . . . . . . . . . . 13  |-  ( x  e.  ZZ  ->  (
x  +  1 )  e.  ZZ )
10 znegcl 11412 . . . . . . . . . . . . 13  |-  ( ( x  +  1 )  e.  ZZ  ->  -u (
x  +  1 )  e.  ZZ )
119, 10syl 17 . . . . . . . . . . . 12  |-  ( x  e.  ZZ  ->  -u (
x  +  1 )  e.  ZZ )
1211ad2antlr 763 . . . . . . . . . . 11  |-  ( ( ( N  e.  RR  /\  x  e.  ZZ )  /\  ( ( 2  x.  x )  +  1 )  =  -u N )  ->  -u (
x  +  1 )  e.  ZZ )
13 zcn 11382 . . . . . . . . . . . . . . . 16  |-  ( x  e.  ZZ  ->  x  e.  CC )
14 2cn 11091 . . . . . . . . . . . . . . . . . 18  |-  2  e.  CC
15 mulcl 10020 . . . . . . . . . . . . . . . . . 18  |-  ( ( 2  e.  CC  /\  x  e.  CC )  ->  ( 2  x.  x
)  e.  CC )
1614, 15mpan 706 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  CC  ->  (
2  x.  x )  e.  CC )
17 peano2cn 10208 . . . . . . . . . . . . . . . . 17  |-  ( ( 2  x.  x )  e.  CC  ->  (
( 2  x.  x
)  +  1 )  e.  CC )
1816, 17syl 17 . . . . . . . . . . . . . . . 16  |-  ( x  e.  CC  ->  (
( 2  x.  x
)  +  1 )  e.  CC )
1913, 18syl 17 . . . . . . . . . . . . . . 15  |-  ( x  e.  ZZ  ->  (
( 2  x.  x
)  +  1 )  e.  CC )
2019adantl 482 . . . . . . . . . . . . . 14  |-  ( ( N  e.  RR  /\  x  e.  ZZ )  ->  ( ( 2  x.  x )  +  1 )  e.  CC )
21 simpl 473 . . . . . . . . . . . . . . 15  |-  ( ( N  e.  RR  /\  x  e.  ZZ )  ->  N  e.  RR )
2221recnd 10068 . . . . . . . . . . . . . 14  |-  ( ( N  e.  RR  /\  x  e.  ZZ )  ->  N  e.  CC )
23 negcon2 10334 . . . . . . . . . . . . . 14  |-  ( ( ( ( 2  x.  x )  +  1 )  e.  CC  /\  N  e.  CC )  ->  ( ( ( 2  x.  x )  +  1 )  =  -u N 
<->  N  =  -u (
( 2  x.  x
)  +  1 ) ) )
2420, 22, 23syl2anc 693 . . . . . . . . . . . . 13  |-  ( ( N  e.  RR  /\  x  e.  ZZ )  ->  ( ( ( 2  x.  x )  +  1 )  =  -u N 
<->  N  =  -u (
( 2  x.  x
)  +  1 ) ) )
25 eqcom 2629 . . . . . . . . . . . . . 14  |-  ( N  =  -u ( ( 2  x.  x )  +  1 )  <->  -u ( ( 2  x.  x )  +  1 )  =  N )
2614, 13, 15sylancr 695 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  e.  ZZ  ->  (
2  x.  x )  e.  CC )
27 ax-1cn 9994 . . . . . . . . . . . . . . . . . . . . . . 23  |-  1  e.  CC
2814, 27mulcli 10045 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( 2  x.  1 )  e.  CC
29 addsubass 10291 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( 2  x.  x
)  e.  CC  /\  ( 2  x.  1 )  e.  CC  /\  1  e.  CC )  ->  ( ( ( 2  x.  x )  +  ( 2  x.  1 ) )  -  1 )  =  ( ( 2  x.  x )  +  ( ( 2  x.  1 )  - 
1 ) ) )
3028, 27, 29mp3an23 1416 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( 2  x.  x )  e.  CC  ->  (
( ( 2  x.  x )  +  ( 2  x.  1 ) )  -  1 )  =  ( ( 2  x.  x )  +  ( ( 2  x.  1 )  -  1 ) ) )
3126, 30syl 17 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  ZZ  ->  (
( ( 2  x.  x )  +  ( 2  x.  1 ) )  -  1 )  =  ( ( 2  x.  x )  +  ( ( 2  x.  1 )  -  1 ) ) )
32 2t1e2 11176 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( 2  x.  1 )  =  2
3332oveq1i 6660 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( 2  x.  1 )  -  1 )  =  ( 2  -  1 )
34 2m1e1 11135 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( 2  -  1 )  =  1
3533, 34eqtri 2644 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( 2  x.  1 )  -  1 )  =  1
3635oveq2i 6661 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( 2  x.  x )  +  ( ( 2  x.  1 )  - 
1 ) )  =  ( ( 2  x.  x )  +  1 )
3731, 36syl6req 2673 . . . . . . . . . . . . . . . . . . 19  |-  ( x  e.  ZZ  ->  (
( 2  x.  x
)  +  1 )  =  ( ( ( 2  x.  x )  +  ( 2  x.  1 ) )  - 
1 ) )
38 adddi 10025 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( 2  e.  CC  /\  x  e.  CC  /\  1  e.  CC )  ->  (
2  x.  ( x  +  1 ) )  =  ( ( 2  x.  x )  +  ( 2  x.  1 ) ) )
3914, 27, 38mp3an13 1415 . . . . . . . . . . . . . . . . . . . . 21  |-  ( x  e.  CC  ->  (
2  x.  ( x  +  1 ) )  =  ( ( 2  x.  x )  +  ( 2  x.  1 ) ) )
4013, 39syl 17 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  ZZ  ->  (
2  x.  ( x  +  1 ) )  =  ( ( 2  x.  x )  +  ( 2  x.  1 ) ) )
4140oveq1d 6665 . . . . . . . . . . . . . . . . . . 19  |-  ( x  e.  ZZ  ->  (
( 2  x.  (
x  +  1 ) )  -  1 )  =  ( ( ( 2  x.  x )  +  ( 2  x.  1 ) )  - 
1 ) )
4237, 41eqtr4d 2659 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ZZ  ->  (
( 2  x.  x
)  +  1 )  =  ( ( 2  x.  ( x  + 
1 ) )  - 
1 ) )
4342negeqd 10275 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ZZ  ->  -u (
( 2  x.  x
)  +  1 )  =  -u ( ( 2  x.  ( x  + 
1 ) )  - 
1 ) )
449zcnd 11483 . . . . . . . . . . . . . . . . . . . 20  |-  ( x  e.  ZZ  ->  (
x  +  1 )  e.  CC )
45 mulneg2 10467 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( 2  e.  CC  /\  ( x  +  1
)  e.  CC )  ->  ( 2  x.  -u ( x  +  1 ) )  =  -u ( 2  x.  (
x  +  1 ) ) )
4614, 44, 45sylancr 695 . . . . . . . . . . . . . . . . . . 19  |-  ( x  e.  ZZ  ->  (
2  x.  -u (
x  +  1 ) )  =  -u (
2  x.  ( x  +  1 ) ) )
4746oveq1d 6665 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ZZ  ->  (
( 2  x.  -u (
x  +  1 ) )  +  1 )  =  ( -u (
2  x.  ( x  +  1 ) )  +  1 ) )
48 mulcl 10020 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( 2  e.  CC  /\  ( x  +  1
)  e.  CC )  ->  ( 2  x.  ( x  +  1 ) )  e.  CC )
4914, 44, 48sylancr 695 . . . . . . . . . . . . . . . . . . 19  |-  ( x  e.  ZZ  ->  (
2  x.  ( x  +  1 ) )  e.  CC )
50 negsubdi 10337 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( 2  x.  (
x  +  1 ) )  e.  CC  /\  1  e.  CC )  -> 
-u ( ( 2  x.  ( x  + 
1 ) )  - 
1 )  =  (
-u ( 2  x.  ( x  +  1 ) )  +  1 ) )
5149, 27, 50sylancl 694 . . . . . . . . . . . . . . . . . 18  |-  ( x  e.  ZZ  ->  -u (
( 2  x.  (
x  +  1 ) )  -  1 )  =  ( -u (
2  x.  ( x  +  1 ) )  +  1 ) )
5247, 51eqtr4d 2659 . . . . . . . . . . . . . . . . 17  |-  ( x  e.  ZZ  ->  (
( 2  x.  -u (
x  +  1 ) )  +  1 )  =  -u ( ( 2  x.  ( x  + 
1 ) )  - 
1 ) )
5343, 52eqtr4d 2659 . . . . . . . . . . . . . . . 16  |-  ( x  e.  ZZ  ->  -u (
( 2  x.  x
)  +  1 )  =  ( ( 2  x.  -u ( x  + 
1 ) )  +  1 ) )
5453adantl 482 . . . . . . . . . . . . . . 15  |-  ( ( N  e.  RR  /\  x  e.  ZZ )  -> 
-u ( ( 2  x.  x )  +  1 )  =  ( ( 2  x.  -u (
x  +  1 ) )  +  1 ) )
5554eqeq1d 2624 . . . . . . . . . . . . . 14  |-  ( ( N  e.  RR  /\  x  e.  ZZ )  ->  ( -u ( ( 2  x.  x )  +  1 )  =  N  <->  ( ( 2  x.  -u ( x  + 
1 ) )  +  1 )  =  N ) )
5625, 55syl5bb 272 . . . . . . . . . . . . 13  |-  ( ( N  e.  RR  /\  x  e.  ZZ )  ->  ( N  =  -u ( ( 2  x.  x )  +  1 )  <->  ( ( 2  x.  -u ( x  + 
1 ) )  +  1 )  =  N ) )
5724, 56bitrd 268 . . . . . . . . . . . 12  |-  ( ( N  e.  RR  /\  x  e.  ZZ )  ->  ( ( ( 2  x.  x )  +  1 )  =  -u N 
<->  ( ( 2  x.  -u ( x  +  1 ) )  +  1 )  =  N ) )
5857biimpa 501 . . . . . . . . . . 11  |-  ( ( ( N  e.  RR  /\  x  e.  ZZ )  /\  ( ( 2  x.  x )  +  1 )  =  -u N )  ->  (
( 2  x.  -u (
x  +  1 ) )  +  1 )  =  N )
59 oveq2 6658 . . . . . . . . . . . . . 14  |-  ( n  =  -u ( x  + 
1 )  ->  (
2  x.  n )  =  ( 2  x.  -u ( x  +  1 ) ) )
6059oveq1d 6665 . . . . . . . . . . . . 13  |-  ( n  =  -u ( x  + 
1 )  ->  (
( 2  x.  n
)  +  1 )  =  ( ( 2  x.  -u ( x  + 
1 ) )  +  1 ) )
6160eqeq1d 2624 . . . . . . . . . . . 12  |-  ( n  =  -u ( x  + 
1 )  ->  (
( ( 2  x.  n )  +  1 )  =  N  <->  ( (
2  x.  -u (
x  +  1 ) )  +  1 )  =  N ) )
6261rspcev 3309 . . . . . . . . . . 11  |-  ( (
-u ( x  + 
1 )  e.  ZZ  /\  ( ( 2  x.  -u ( x  +  1 ) )  +  1 )  =  N )  ->  E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N )
6312, 58, 62syl2anc 693 . . . . . . . . . 10  |-  ( ( ( N  e.  RR  /\  x  e.  ZZ )  /\  ( ( 2  x.  x )  +  1 )  =  -u N )  ->  E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N )
6463ex 450 . . . . . . . . 9  |-  ( ( N  e.  RR  /\  x  e.  ZZ )  ->  ( ( ( 2  x.  x )  +  1 )  =  -u N  ->  E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N ) )
6564rexlimdva 3031 . . . . . . . 8  |-  ( N  e.  RR  ->  ( E. x  e.  ZZ  ( ( 2  x.  x )  +  1 )  =  -u N  ->  E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N ) )
66 znegcl 11412 . . . . . . . . . . . 12  |-  ( y  e.  ZZ  ->  -u y  e.  ZZ )
6766ad2antlr 763 . . . . . . . . . . 11  |-  ( ( ( N  e.  RR  /\  y  e.  ZZ )  /\  ( y  x.  2 )  =  -u N )  ->  -u y  e.  ZZ )
68 zcn 11382 . . . . . . . . . . . . . . 15  |-  ( y  e.  ZZ  ->  y  e.  CC )
69 mulcl 10020 . . . . . . . . . . . . . . 15  |-  ( ( y  e.  CC  /\  2  e.  CC )  ->  ( y  x.  2 )  e.  CC )
7068, 14, 69sylancl 694 . . . . . . . . . . . . . 14  |-  ( y  e.  ZZ  ->  (
y  x.  2 )  e.  CC )
71 recn 10026 . . . . . . . . . . . . . 14  |-  ( N  e.  RR  ->  N  e.  CC )
72 negcon2 10334 . . . . . . . . . . . . . 14  |-  ( ( ( y  x.  2 )  e.  CC  /\  N  e.  CC )  ->  ( ( y  x.  2 )  =  -u N 
<->  N  =  -u (
y  x.  2 ) ) )
7370, 71, 72syl2anr 495 . . . . . . . . . . . . 13  |-  ( ( N  e.  RR  /\  y  e.  ZZ )  ->  ( ( y  x.  2 )  =  -u N 
<->  N  =  -u (
y  x.  2 ) ) )
74 mulneg1 10466 . . . . . . . . . . . . . . . . 17  |-  ( ( y  e.  CC  /\  2  e.  CC )  ->  ( -u y  x.  2 )  =  -u ( y  x.  2 ) )
7568, 14, 74sylancl 694 . . . . . . . . . . . . . . . 16  |-  ( y  e.  ZZ  ->  ( -u y  x.  2 )  =  -u ( y  x.  2 ) )
7675adantl 482 . . . . . . . . . . . . . . 15  |-  ( ( N  e.  RR  /\  y  e.  ZZ )  ->  ( -u y  x.  2 )  =  -u ( y  x.  2 ) )
7776eqeq1d 2624 . . . . . . . . . . . . . 14  |-  ( ( N  e.  RR  /\  y  e.  ZZ )  ->  ( ( -u y  x.  2 )  =  N  <->  -u ( y  x.  2 )  =  N ) )
78 eqcom 2629 . . . . . . . . . . . . . 14  |-  ( N  =  -u ( y  x.  2 )  <->  -u ( y  x.  2 )  =  N )
7977, 78syl6rbbr 279 . . . . . . . . . . . . 13  |-  ( ( N  e.  RR  /\  y  e.  ZZ )  ->  ( N  =  -u ( y  x.  2 )  <->  ( -u y  x.  2 )  =  N ) )
8073, 79bitrd 268 . . . . . . . . . . . 12  |-  ( ( N  e.  RR  /\  y  e.  ZZ )  ->  ( ( y  x.  2 )  =  -u N 
<->  ( -u y  x.  2 )  =  N ) )
8180biimpa 501 . . . . . . . . . . 11  |-  ( ( ( N  e.  RR  /\  y  e.  ZZ )  /\  ( y  x.  2 )  =  -u N )  ->  ( -u y  x.  2 )  =  N )
82 oveq1 6657 . . . . . . . . . . . . 13  |-  ( k  =  -u y  ->  (
k  x.  2 )  =  ( -u y  x.  2 ) )
8382eqeq1d 2624 . . . . . . . . . . . 12  |-  ( k  =  -u y  ->  (
( k  x.  2 )  =  N  <->  ( -u y  x.  2 )  =  N ) )
8483rspcev 3309 . . . . . . . . . . 11  |-  ( (
-u y  e.  ZZ  /\  ( -u y  x.  2 )  =  N )  ->  E. k  e.  ZZ  ( k  x.  2 )  =  N )
8567, 81, 84syl2anc 693 . . . . . . . . . 10  |-  ( ( ( N  e.  RR  /\  y  e.  ZZ )  /\  ( y  x.  2 )  =  -u N )  ->  E. k  e.  ZZ  ( k  x.  2 )  =  N )
8685ex 450 . . . . . . . . 9  |-  ( ( N  e.  RR  /\  y  e.  ZZ )  ->  ( ( y  x.  2 )  =  -u N  ->  E. k  e.  ZZ  ( k  x.  2 )  =  N ) )
8786rexlimdva 3031 . . . . . . . 8  |-  ( N  e.  RR  ->  ( E. y  e.  ZZ  ( y  x.  2 )  =  -u N  ->  E. k  e.  ZZ  ( k  x.  2 )  =  N ) )
8865, 87orim12d 883 . . . . . . 7  |-  ( N  e.  RR  ->  (
( E. x  e.  ZZ  ( ( 2  x.  x )  +  1 )  =  -u N  \/  E. y  e.  ZZ  ( y  x.  2 )  =  -u N )  ->  ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  \/  E. k  e.  ZZ  (
k  x.  2 )  =  N ) ) )
898, 88syl5 34 . . . . . 6  |-  ( N  e.  RR  ->  ( -u N  e.  NN0  ->  ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  \/  E. k  e.  ZZ  (
k  x.  2 )  =  N ) ) )
9089imp 445 . . . . 5  |-  ( ( N  e.  RR  /\  -u N  e.  NN0 )  ->  ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  \/  E. k  e.  ZZ  ( k  x.  2 )  =  N ) )
917, 90jaodan 826 . . . 4  |-  ( ( N  e.  RR  /\  ( N  e.  NN0  \/  -u N  e.  NN0 ) )  ->  ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  \/  E. k  e.  ZZ  (
k  x.  2 )  =  N ) )
925, 91sylbi 207 . . 3  |-  ( N  e.  ZZ  ->  ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  \/  E. k  e.  ZZ  (
k  x.  2 )  =  N ) )
93 halfnz 11455 . . . 4  |-  -.  (
1  /  2 )  e.  ZZ
94 reeanv 3107 . . . . 5  |-  ( E. n  e.  ZZ  E. k  e.  ZZ  (
( ( 2  x.  n )  +  1 )  =  N  /\  ( k  x.  2 )  =  N )  <-> 
( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  /\  E. k  e.  ZZ  ( k  x.  2 )  =  N ) )
95 eqtr3 2643 . . . . . . 7  |-  ( ( ( ( 2  x.  n )  +  1 )  =  N  /\  ( k  x.  2 )  =  N )  ->  ( ( 2  x.  n )  +  1 )  =  ( k  x.  2 ) )
96 zcn 11382 . . . . . . . . . . 11  |-  ( k  e.  ZZ  ->  k  e.  CC )
97 mulcom 10022 . . . . . . . . . . 11  |-  ( ( k  e.  CC  /\  2  e.  CC )  ->  ( k  x.  2 )  =  ( 2  x.  k ) )
9896, 14, 97sylancl 694 . . . . . . . . . 10  |-  ( k  e.  ZZ  ->  (
k  x.  2 )  =  ( 2  x.  k ) )
9998eqeq2d 2632 . . . . . . . . 9  |-  ( k  e.  ZZ  ->  (
( ( 2  x.  n )  +  1 )  =  ( k  x.  2 )  <->  ( (
2  x.  n )  +  1 )  =  ( 2  x.  k
) ) )
10099adantl 482 . . . . . . . 8  |-  ( ( n  e.  ZZ  /\  k  e.  ZZ )  ->  ( ( ( 2  x.  n )  +  1 )  =  ( k  x.  2 )  <-> 
( ( 2  x.  n )  +  1 )  =  ( 2  x.  k ) ) )
101 mulcl 10020 . . . . . . . . . . 11  |-  ( ( 2  e.  CC  /\  k  e.  CC )  ->  ( 2  x.  k
)  e.  CC )
10214, 96, 101sylancr 695 . . . . . . . . . 10  |-  ( k  e.  ZZ  ->  (
2  x.  k )  e.  CC )
103 zcn 11382 . . . . . . . . . . 11  |-  ( n  e.  ZZ  ->  n  e.  CC )
104 mulcl 10020 . . . . . . . . . . 11  |-  ( ( 2  e.  CC  /\  n  e.  CC )  ->  ( 2  x.  n
)  e.  CC )
10514, 103, 104sylancr 695 . . . . . . . . . 10  |-  ( n  e.  ZZ  ->  (
2  x.  n )  e.  CC )
106 subadd 10284 . . . . . . . . . . 11  |-  ( ( ( 2  x.  k
)  e.  CC  /\  ( 2  x.  n
)  e.  CC  /\  1  e.  CC )  ->  ( ( ( 2  x.  k )  -  ( 2  x.  n
) )  =  1  <-> 
( ( 2  x.  n )  +  1 )  =  ( 2  x.  k ) ) )
10727, 106mp3an3 1413 . . . . . . . . . 10  |-  ( ( ( 2  x.  k
)  e.  CC  /\  ( 2  x.  n
)  e.  CC )  ->  ( ( ( 2  x.  k )  -  ( 2  x.  n ) )  =  1  <->  ( ( 2  x.  n )  +  1 )  =  ( 2  x.  k ) ) )
108102, 105, 107syl2anr 495 . . . . . . . . 9  |-  ( ( n  e.  ZZ  /\  k  e.  ZZ )  ->  ( ( ( 2  x.  k )  -  ( 2  x.  n
) )  =  1  <-> 
( ( 2  x.  n )  +  1 )  =  ( 2  x.  k ) ) )
109 subcl 10280 . . . . . . . . . . . . . 14  |-  ( ( k  e.  CC  /\  n  e.  CC )  ->  ( k  -  n
)  e.  CC )
110 2cnne0 11242 . . . . . . . . . . . . . . 15  |-  ( 2  e.  CC  /\  2  =/=  0 )
111 eqcom 2629 . . . . . . . . . . . . . . . 16  |-  ( ( k  -  n )  =  ( 1  / 
2 )  <->  ( 1  /  2 )  =  ( k  -  n
) )
112 divmul 10688 . . . . . . . . . . . . . . . 16  |-  ( ( 1  e.  CC  /\  ( k  -  n
)  e.  CC  /\  ( 2  e.  CC  /\  2  =/=  0 ) )  ->  ( (
1  /  2 )  =  ( k  -  n )  <->  ( 2  x.  ( k  -  n ) )  =  1 ) )
113111, 112syl5bb 272 . . . . . . . . . . . . . . 15  |-  ( ( 1  e.  CC  /\  ( k  -  n
)  e.  CC  /\  ( 2  e.  CC  /\  2  =/=  0 ) )  ->  ( (
k  -  n )  =  ( 1  / 
2 )  <->  ( 2  x.  ( k  -  n ) )  =  1 ) )
11427, 110, 113mp3an13 1415 . . . . . . . . . . . . . 14  |-  ( ( k  -  n )  e.  CC  ->  (
( k  -  n
)  =  ( 1  /  2 )  <->  ( 2  x.  ( k  -  n ) )  =  1 ) )
115109, 114syl 17 . . . . . . . . . . . . 13  |-  ( ( k  e.  CC  /\  n  e.  CC )  ->  ( ( k  -  n )  =  ( 1  /  2 )  <-> 
( 2  x.  (
k  -  n ) )  =  1 ) )
116115ancoms 469 . . . . . . . . . . . 12  |-  ( ( n  e.  CC  /\  k  e.  CC )  ->  ( ( k  -  n )  =  ( 1  /  2 )  <-> 
( 2  x.  (
k  -  n ) )  =  1 ) )
117 subdi 10463 . . . . . . . . . . . . . . 15  |-  ( ( 2  e.  CC  /\  k  e.  CC  /\  n  e.  CC )  ->  (
2  x.  ( k  -  n ) )  =  ( ( 2  x.  k )  -  ( 2  x.  n
) ) )
11814, 117mp3an1 1411 . . . . . . . . . . . . . 14  |-  ( ( k  e.  CC  /\  n  e.  CC )  ->  ( 2  x.  (
k  -  n ) )  =  ( ( 2  x.  k )  -  ( 2  x.  n ) ) )
119118ancoms 469 . . . . . . . . . . . . 13  |-  ( ( n  e.  CC  /\  k  e.  CC )  ->  ( 2  x.  (
k  -  n ) )  =  ( ( 2  x.  k )  -  ( 2  x.  n ) ) )
120119eqeq1d 2624 . . . . . . . . . . . 12  |-  ( ( n  e.  CC  /\  k  e.  CC )  ->  ( ( 2  x.  ( k  -  n
) )  =  1  <-> 
( ( 2  x.  k )  -  (
2  x.  n ) )  =  1 ) )
121116, 120bitrd 268 . . . . . . . . . . 11  |-  ( ( n  e.  CC  /\  k  e.  CC )  ->  ( ( k  -  n )  =  ( 1  /  2 )  <-> 
( ( 2  x.  k )  -  (
2  x.  n ) )  =  1 ) )
122103, 96, 121syl2an 494 . . . . . . . . . 10  |-  ( ( n  e.  ZZ  /\  k  e.  ZZ )  ->  ( ( k  -  n )  =  ( 1  /  2 )  <-> 
( ( 2  x.  k )  -  (
2  x.  n ) )  =  1 ) )
123 zsubcl 11419 . . . . . . . . . . . 12  |-  ( ( k  e.  ZZ  /\  n  e.  ZZ )  ->  ( k  -  n
)  e.  ZZ )
124 eleq1 2689 . . . . . . . . . . . 12  |-  ( ( k  -  n )  =  ( 1  / 
2 )  ->  (
( k  -  n
)  e.  ZZ  <->  ( 1  /  2 )  e.  ZZ ) )
125123, 124syl5ibcom 235 . . . . . . . . . . 11  |-  ( ( k  e.  ZZ  /\  n  e.  ZZ )  ->  ( ( k  -  n )  =  ( 1  /  2 )  ->  ( 1  / 
2 )  e.  ZZ ) )
126125ancoms 469 . . . . . . . . . 10  |-  ( ( n  e.  ZZ  /\  k  e.  ZZ )  ->  ( ( k  -  n )  =  ( 1  /  2 )  ->  ( 1  / 
2 )  e.  ZZ ) )
127122, 126sylbird 250 . . . . . . . . 9  |-  ( ( n  e.  ZZ  /\  k  e.  ZZ )  ->  ( ( ( 2  x.  k )  -  ( 2  x.  n
) )  =  1  ->  ( 1  / 
2 )  e.  ZZ ) )
128108, 127sylbird 250 . . . . . . . 8  |-  ( ( n  e.  ZZ  /\  k  e.  ZZ )  ->  ( ( ( 2  x.  n )  +  1 )  =  ( 2  x.  k )  ->  ( 1  / 
2 )  e.  ZZ ) )
129100, 128sylbid 230 . . . . . . 7  |-  ( ( n  e.  ZZ  /\  k  e.  ZZ )  ->  ( ( ( 2  x.  n )  +  1 )  =  ( k  x.  2 )  ->  ( 1  / 
2 )  e.  ZZ ) )
13095, 129syl5 34 . . . . . 6  |-  ( ( n  e.  ZZ  /\  k  e.  ZZ )  ->  ( ( ( ( 2  x.  n )  +  1 )  =  N  /\  ( k  x.  2 )  =  N )  ->  (
1  /  2 )  e.  ZZ ) )
131130rexlimivv 3036 . . . . 5  |-  ( E. n  e.  ZZ  E. k  e.  ZZ  (
( ( 2  x.  n )  +  1 )  =  N  /\  ( k  x.  2 )  =  N )  ->  ( 1  / 
2 )  e.  ZZ )
13294, 131sylbir 225 . . . 4  |-  ( ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  /\  E. k  e.  ZZ  (
k  x.  2 )  =  N )  -> 
( 1  /  2
)  e.  ZZ )
13393, 132mto 188 . . 3  |-  -.  ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  /\  E. k  e.  ZZ  (
k  x.  2 )  =  N )
134 pm5.17 932 . . . 4  |-  ( ( ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  \/  E. k  e.  ZZ  ( k  x.  2 )  =  N )  /\  -.  ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  /\  E. k  e.  ZZ  (
k  x.  2 )  =  N ) )  <-> 
( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  <->  -.  E. k  e.  ZZ  ( k  x.  2 )  =  N ) )
135 bicom 212 . . . 4  |-  ( ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  <->  -.  E. k  e.  ZZ  ( k  x.  2 )  =  N )  <->  ( -.  E. k  e.  ZZ  (
k  x.  2 )  =  N  <->  E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N ) )
136134, 135bitri 264 . . 3  |-  ( ( ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  \/  E. k  e.  ZZ  ( k  x.  2 )  =  N )  /\  -.  ( E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N  /\  E. k  e.  ZZ  (
k  x.  2 )  =  N ) )  <-> 
( -.  E. k  e.  ZZ  ( k  x.  2 )  =  N  <->  E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N ) )
13792, 133, 136sylanblc 696 . 2  |-  ( N  e.  ZZ  ->  ( -.  E. k  e.  ZZ  ( k  x.  2 )  =  N  <->  E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N ) )
1384, 137bitrd 268 1  |-  ( N  e.  ZZ  ->  ( -.  2  ||  N  <->  E. n  e.  ZZ  ( ( 2  x.  n )  +  1 )  =  N ) )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 196    \/ wo 383    /\ wa 384    /\ w3a 1037    = wceq 1483    e. wcel 1990    =/= wne 2794   E.wrex 2913   class class class wbr 4653  (class class class)co 6650   CCcc 9934   RRcr 9935   0cc0 9936   1c1 9937    + caddc 9939    x. cmul 9941    - cmin 10266   -ucneg 10267    / cdiv 10684   2c2 11070   NN0cn0 11292   ZZcz 11377    || cdvds 14983
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-resscn 9993  ax-1cn 9994  ax-icn 9995  ax-addcl 9996  ax-addrcl 9997  ax-mulcl 9998  ax-mulrcl 9999  ax-mulcom 10000  ax-addass 10001  ax-mulass 10002  ax-distr 10003  ax-i2m1 10004  ax-1ne0 10005  ax-1rid 10006  ax-rnegex 10007  ax-rrecex 10008  ax-cnre 10009  ax-pre-lttri 10010  ax-pre-lttrn 10011  ax-pre-ltadd 10012  ax-pre-mulgt0 10013
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-iun 4522  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-om 7066  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-er 7742  df-en 7956  df-dom 7957  df-sdom 7958  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-n0 11293  df-z 11378  df-dvds 14984
This theorem is referenced by:  oddm1even  15067  oexpneg  15069  mod2eq1n2dvds  15071  oddnn02np1  15072  2tp1odd  15076  sqoddm1div8z  15078  ltoddhalfle  15085  halfleoddlt  15086  opoe  15087  omoe  15088  opeo  15089  omeo  15090  m1expo  15092  m1exp1  15093  flodddiv4  15137  iserodd  15540  leibpilem1  24667  lgsquadlem1  25105  knoppndvlem9  32511  coskpi2  40077  cosknegpi  40080  stirlinglem5  40295  fourierswlem  40447  fmtnoodd  41445  dfodd3  41563
  Copyright terms: Public domain W3C validator