Theorem peano2z 9498

Description: Second Peano postulate generalized to integers. (Contributed by NM, 13-Feb-2005.)

Assertion

Ref	Expression
peano2z	|- ( N e. ZZ -> ( N + 1 ) e. ZZ )

Proof of Theorem peano2z

Step	Hyp	Ref	Expression
1		zre 9466	. . 3 |- ( N e. ZZ -> N e. RR )
2		1red 8177	. . 3 |- ( N e. ZZ -> 1 e. RR )
3	1, 2	readdcld 8192	. 2 |- ( N e. ZZ -> ( N + 1 ) e. RR )
4		elznn0nn 9476	. . . . 5 |- ( N e. ZZ <-> ( N e. NN0 \/ ( N e. RR /\ -u N e. NN ) ) )
5	4	biimpi 120	. . . 4 |- ( N e. ZZ -> ( N e. NN0 \/ ( N e. RR /\ -u N e. NN ) ) )
6	1	biantrurd 305	. . . . 5 |- ( N e. ZZ -> ( -u N e. NN <-> ( N e. RR /\ -u N e. NN ) ) )
7	6	orbi2d 795	. . . 4 |- ( N e. ZZ -> ( ( N e. NN0 \/ -u N e. NN ) <-> ( N e. NN0 \/ ( N e. RR /\ -u N e. NN ) ) ) )
8	5, 7	mpbird 167	. . 3 |- ( N e. ZZ -> ( N e. NN0 \/ -u N e. NN ) )
9		peano2nn0 9425	. . . . 5 |- ( N e. NN0 -> ( N + 1 ) e. NN0 )
10	9	a1i 9	. . . 4 |- ( N e. ZZ -> ( N e. NN0 -> ( N + 1 ) e. NN0 ) )
11	1	adantr 276	. . . . . . . . 9 |- ( ( N e. ZZ /\ -u N e. NN ) -> N e. RR )
12		1red 8177	. . . . . . . . 9 |- ( ( N e. ZZ /\ -u N e. NN ) -> 1 e. RR )
13	11, 12	readdcld 8192	. . . . . . . 8 |- ( ( N e. ZZ /\ -u N e. NN ) -> ( N + 1 ) e. RR )
14	13	renegcld 8542	. . . . . . 7 |- ( ( N e. ZZ /\ -u N e. NN ) -> -u ( N + 1 ) e. RR )
15	14	recnd 8191	. . . . . 6 |- ( ( N e. ZZ /\ -u N e. NN ) -> -u ( N + 1 ) e. CC )
16	11	recnd 8191	. . . . . . . . . . . 12 |- ( ( N e. ZZ /\ -u N e. NN ) -> N e. CC )
17		1cnd 8178	. . . . . . . . . . . 12 |- ( ( N e. ZZ /\ -u N e. NN ) -> 1 e. CC )
18	16, 17	negdid 8486	. . . . . . . . . . 11 |- ( ( N e. ZZ /\ -u N e. NN ) -> -u ( N + 1 ) = ( -u N + -u 1 ) )
19	18	oveq1d 6025	. . . . . . . . . 10 |- ( ( N e. ZZ /\ -u N e. NN ) -> ( -u ( N + 1 ) + 1 ) = ( ( -u N + -u 1 ) + 1 ) )
20	16	negcld 8460	. . . . . . . . . . 11 |- ( ( N e. ZZ /\ -u N e. NN ) -> -u N e. CC )
21		neg1cn 9231	. . . . . . . . . . . 12 |- -u 1 e. CC
22	21	a1i 9	. . . . . . . . . . 11 |- ( ( N e. ZZ /\ -u N e. NN ) -> -u 1 e. CC )
23	20, 22, 17	addassd 8185	. . . . . . . . . 10 |- ( ( N e. ZZ /\ -u N e. NN ) -> ( ( -u N + -u 1 ) + 1 ) = ( -u N + ( -u 1 + 1 ) ) )
24	19, 23	eqtrd 2262	. . . . . . . . 9 |- ( ( N e. ZZ /\ -u N e. NN ) -> ( -u ( N + 1 ) + 1 ) = ( -u N + ( -u 1 + 1 ) ) )
25		ax-1cn 8108	. . . . . . . . . . 11 |- 1 e. CC
26		1pneg1e0 9237	. . . . . . . . . . 11 |- ( 1 + -u 1 ) = 0
27	25, 21, 26	addcomli 8307	. . . . . . . . . 10 |- ( -u 1 + 1 ) = 0
28	27	oveq2i 6021	. . . . . . . . 9 |- ( -u N + ( -u 1 + 1 ) ) = ( -u N + 0 )
29	24, 28	eqtrdi 2278	. . . . . . . 8 |- ( ( N e. ZZ /\ -u N e. NN ) -> ( -u ( N + 1 ) + 1 ) = ( -u N + 0 ) )
30	20	addridd 8311	. . . . . . . 8 |- ( ( N e. ZZ /\ -u N e. NN ) -> ( -u N + 0 ) = -u N )
31	29, 30	eqtrd 2262	. . . . . . 7 |- ( ( N e. ZZ /\ -u N e. NN ) -> ( -u ( N + 1 ) + 1 ) = -u N )
32		simpr 110	. . . . . . 7 |- ( ( N e. ZZ /\ -u N e. NN ) -> -u N e. NN )
33	31, 32	eqeltrd 2306	. . . . . 6 |- ( ( N e. ZZ /\ -u N e. NN ) -> ( -u ( N + 1 ) + 1 ) e. NN )
34		elnn0nn 9427	. . . . . 6 |- ( -u ( N + 1 ) e. NN0 <-> ( -u ( N + 1 ) e. CC /\ ( -u ( N + 1 ) + 1 ) e. NN ) )
35	15, 33, 34	sylanbrc 417	. . . . 5 |- ( ( N e. ZZ /\ -u N e. NN ) -> -u ( N + 1 ) e. NN0 )
36	35	ex 115	. . . 4 |- ( N e. ZZ -> ( -u N e. NN -> -u ( N + 1 ) e. NN0 ) )
37	10, 36	orim12d 791	. . 3 |- ( N e. ZZ -> ( ( N e. NN0 \/ -u N e. NN ) -> ( ( N + 1 ) e. NN0 \/ -u ( N + 1 ) e. NN0 ) ) )
38	8, 37	mpd 13	. 2 |- ( N e. ZZ -> ( ( N + 1 ) e. NN0 \/ -u ( N + 1 ) e. NN0 ) )
39		elznn0 9477	. 2 |- ( ( N + 1 ) e. ZZ <-> ( ( N + 1 ) e. RR /\ ( ( N + 1 ) e. NN0 \/ -u ( N + 1 ) e. NN0 ) ) )
40	3, 38, 39	sylanbrc 417	1 |- ( N e. ZZ -> ( N + 1 ) e. ZZ )

Syntax hints:   -> wi 4   /\ wa 104   \/ wo 713   e. wcel 2200  (class class class)co 6010   CCcc 8013   RRcr 8014   0cc0 8015   1c1 8016   + caddc 8018   -ucneg 8334   NNcn 9126   NN0cn0 9385   ZZcz 9462

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 617  ax-in2 618  ax-io 714  ax-5 1493  ax-7 1494  ax-gen 1495  ax-ie1 1539  ax-ie2 1540  ax-8 1550  ax-10 1551  ax-11 1552  ax-i12 1553  ax-bndl 1555  ax-4 1556  ax-17 1572  ax-i9 1576  ax-ial 1580  ax-i5r 1581  ax-14 2203  ax-ext 2211  ax-sep 4202  ax-pow 4259  ax-pr 4294  ax-setind 4630  ax-cnex 8106  ax-resscn 8107  ax-1cn 8108  ax-1re 8109  ax-icn 8110  ax-addcl 8111  ax-addrcl 8112  ax-mulcl 8113  ax-addcom 8115  ax-addass 8117  ax-distr 8119  ax-i2m1 8120  ax-0id 8123  ax-rnegex 8124  ax-cnre 8126

This theorem depends on definitions:  df-bi 117  df-3or 1003  df-3an 1004  df-tru 1398  df-fal 1401  df-nf 1507  df-sb 1809  df-eu 2080  df-mo 2081  df-clab 2216  df-cleq 2222  df-clel 2225  df-nfc 2361  df-ne 2401  df-ral 2513  df-rex 2514  df-reu 2515  df-rab 2517  df-v 2801  df-sbc 3029  df-dif 3199  df-un 3201  df-in 3203  df-ss 3210  df-pw 3651  df-sn 3672  df-pr 3673  df-op 3675  df-uni 3889  df-int 3924  df-br 4084  df-opab 4146  df-id 4385  df-xp 4726  df-rel 4727  df-cnv 4728  df-co 4729  df-dm 4730  df-iota 5281  df-fun 5323  df-fv 5329  df-riota 5963  df-ov 6013  df-oprab 6014  df-mpo 6015  df-sub 8335  df-neg 8336  df-inn 9127  df-n0 9386  df-z 9463

This theorem is referenced by:  zaddcllempos  9499  peano2zm  9500  zleltp1  9518  btwnnz  9557  peano2uz2  9570  uzind  9574  uzind2  9575  peano2zd  9588  eluzp1m1  9763  eluzp1p1  9765  peano2uz  9795  zltaddlt1le  10220  fzp1disj  10293  elfzp1b  10310  fzneuz  10314  fzp1nel  10317  fzval3  10427  fzossfzop1  10435  rebtwn2zlemstep  10489  flhalf  10539  frec2uzsucd  10640  zesq  10897  hashfzp1  11064  odd2np1lem  12404  odd2np1  12405  mulsucdiv2z  12417  oddp1d2  12422  zob  12423  ltoddhalfle  12425  fldivp1  12892  lgsdir2lem2  15729