Theorem nnaddclt 5898

Description: Closure of addition of natural numbers, proved by induction on the second addend.

Assertion

Ref	Expression
nnaddclt	|- ((A e. NN /\ B e. NN) -> (A + B) e. NN)

Proof of Theorem nnaddclt

Step	Hyp	Ref	Expression
1		opreq2 3964	. . . . 5 |- (x = 1 -> (A + x) = (A + 1))
2	1	eleq1d 1538	. . . 4 |- (x = 1 -> ((A + x) e. NN <-> (A + 1) e. NN))
3	2	imbi2d 611	. . 3 |- (x = 1 -> ((A e. NN -> (A + x) e. NN) <-> (A e. NN -> (A + 1) e. NN)))
4		opreq2 3964	. . . . 5 |- (x = y -> (A + x) = (A + y))
5	4	eleq1d 1538	. . . 4 |- (x = y -> ((A + x) e. NN <-> (A + y) e. NN))
6	5	imbi2d 611	. . 3 |- (x = y -> ((A e. NN -> (A + x) e. NN) <-> (A e. NN -> (A + y) e. NN)))
7		opreq2 3964	. . . . 5 |- (x = (y + 1) -> (A + x) = (A + (y + 1)))
8	7	eleq1d 1538	. . . 4 |- (x = (y + 1) -> ((A + x) e. NN <-> (A + (y + 1)) e. NN))
9	8	imbi2d 611	. . 3 |- (x = (y + 1) -> ((A e. NN -> (A + x) e. NN) <-> (A e. NN -> (A + (y + 1)) e. NN)))
10		opreq2 3964	. . . . 5 |- (x = B -> (A + x) = (A + B))
11	10	eleq1d 1538	. . . 4 |- (x = B -> ((A + x) e. NN <-> (A + B) e. NN))
12	11	imbi2d 611	. . 3 |- (x = B -> ((A e. NN -> (A + x) e. NN) <-> (A e. NN -> (A + B) e. NN)))
13		peano2nn 5893	. . 3 |- (A e. NN -> (A + 1) e. NN)
14		ax1cn 5252	. . . . . . . . 9 |- 1 e. CC
15		axaddass 5260	. . . . . . . . 9 |- ((A e. CC /\ y e. CC /\ 1 e. CC) -> ((A + y) + 1) = (A + (y + 1)))
16	14, 15	mp3an3 904	. . . . . . . 8 |- ((A e. CC /\ y e. CC) -> ((A + y) + 1) = (A + (y + 1)))
17		nncnt 5888	. . . . . . . 8 |- (A e. NN -> A e. CC)
18		nncnt 5888	. . . . . . . 8 |- (y e. NN -> y e. CC)
19	16, 17, 18	syl2an 454	. . . . . . 7 |- ((A e. NN /\ y e. NN) -> ((A + y) + 1) = (A + (y + 1)))
20	19	eleq1d 1538	. . . . . 6 |- ((A e. NN /\ y e. NN) -> (((A + y) + 1) e. NN <-> (A + (y + 1)) e. NN))
21		peano2nn 5893	. . . . . 6 |- ((A + y) e. NN -> ((A + y) + 1) e. NN)
22	20, 21	syl5bi 208	. . . . 5 |- ((A e. NN /\ y e. NN) -> ((A + y) e. NN -> (A + (y + 1)) e. NN))
23	22	expcom 374	. . . 4 |- (y e. NN -> (A e. NN -> ((A + y) e. NN -> (A + (y + 1)) e. NN)))
24	23	a2d 13	. . 3 |- (y e. NN -> ((A e. NN -> (A + y) e. NN) -> (A e. NN -> (A + (y + 1)) e. NN)))
25	3, 6, 9, 12, 13, 24	nnind 5895	. 2 |- (B e. NN -> (A e. NN -> (A + B) e. NN))
26	25	impcom 351	1 |- ((A e. NN /\ B e. NN) -> (A + B) e. NN)

Syntax hints:   -> wi 3   /\ wa 223   = wceq 955   e. wcel 957  (class class class)co 3958  CCcc 5215  1c1 5218   + caddc 5220  NNcn 5279

This theorem is referenced by:  nnmulclt 5899  nnaddm1clt 5915  2nn 5956  3nn 5957  4nn 5959  nn0addclt 6077  nnnn0addclt 6082  ser1absdiflem 6881  bccl2t 6924  climubi 7106  caucvglem6 7115  cvgratlem1ALT 7199  cvgratlem1 7202  xpnnen 7458  ruclem30 7499  ruclem31 7500  ruclem32 7501  nndivsub 10379

This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 961  ax-gen 962  ax-8 963  ax-9 964  ax-10 965  ax-11 966  ax-12 967  ax-13 968  ax-14 969  ax-17 970  ax-4 972  ax-5o 974  ax-6o 977  ax-9o 1122  ax-10o 1139  ax-16 1209  ax-11o 1217  ax-ext 1458  ax-rep 2689  ax-sep 2699  ax-nul 2706  ax-pow 2738  ax-pr 2775  ax-un 2862  ax-inf2 4608

This theorem depends on definitions:  df-bi 147  df-or 224  df-an 225  df-3or 775  df-3an 776  df-ex 980  df-sb 1171  df-eu 1381  df-mo 1382  df-clab 1463  df-cleq 1468  df-clel 1471  df-ne 1585  df-ral 1647  df-rex 1648  df-reu 1649  df-rab 1650  df-v 1809  df-sbc 1939  df-csb 1999  df-dif 2046  df-un 2047  df-in 2048  df-ss 2050  df-pss 2052  df-nul 2278  df-if 2359  df-pw 2399  df-sn 2409  df-pr 2410  df-tp 2412  df-op 2413  df-uni 2500  df-int 2530  df-iun 2564  df-br 2616  df-opab 2663  df-tr 2677  df-eprel 2828  df-id 2831  df-po 2836  df-so 2846  df-fr 2913  df-we 2930  df-ord 2947  df-on 2948  df-lim 2949  df-suc 2950  df-om 3128  df-xp 3180  df-rel 3181  df-cnv 3182  df-co 3183  df-dm 3184  df-rn 3185  df-res 3186  df-ima 3187  df-fun 3188  df-fn 3189  df-f 3190  df-fv 3194  df-rdg 3927  df-opr 3960  df-oprab 3961  df-1st 4072  df-2nd 4073  df-1o 4126  df-oadd 4128  df-omul 4129  df-er 4254  df-ec 4256  df-qs 4259  df-ni 4983  df-pli 4984  df-mi 4985  df-lti 4986  df-plpq 5018  df-mpq 5019  df-enq 5020  df-nq 5021  df-plq 5022  df-mq 5023  df-rq 5024  df-ltq 5025  df-1q 5026  df-np 5069  df-1p 5070  df-plp 5071  df-mp 5072  df-ltp 5073  df-plpr 5147  df-mpr 5148  df-enr 5149  df-nr 5150  df-plr 5151  df-mr 5152  df-ltr 5153  df-0r 5154  df-1r 5155  df-m1r 5156  df-c 5223  df-0 5224  df-1 5225  df-i 5226  df-r 5227  df-plus 5228  df-mul 5229  df-sub 5339  df-neg 5341  df-n 5883

Copyright terms: Public domain