Theorem nnmulcl 12257

Description: Closure of multiplication of positive integers. (Contributed by NM, 12-Jan-1997.) Remove dependency on ax-mulcom 11164 and ax-mulass 11166. (Revised by Steven Nguyen, 24-Sep-2022.)

Assertion

Ref	Expression
nnmulcl	⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) → (𝐴 · 𝐵) ∈ ℕ)

Proof of Theorem nnmulcl

Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		oveq2 7419	. . . . 5 ⊢ (𝑥 = 1 → (𝐴 · 𝑥) = (𝐴 · 1))
2	1	eleq1d 2854	. . . 4 ⊢ (𝑥 = 1 → ((𝐴 · 𝑥) ∈ ℕ ↔ (𝐴 · 1) ∈ ℕ))
3	2	imbi2d 343	. . 3 ⊢ (𝑥 = 1 → ((𝐴 ∈ ℕ → (𝐴 · 𝑥) ∈ ℕ) ↔ (𝐴 ∈ ℕ → (𝐴 · 1) ∈ ℕ)))
4		oveq2 7419	. . . . 5 ⊢ (𝑥 = 𝑦 → (𝐴 · 𝑥) = (𝐴 · 𝑦))
5	4	eleq1d 2854	. . . 4 ⊢ (𝑥 = 𝑦 → ((𝐴 · 𝑥) ∈ ℕ ↔ (𝐴 · 𝑦) ∈ ℕ))
6	5	imbi2d 343	. . 3 ⊢ (𝑥 = 𝑦 → ((𝐴 ∈ ℕ → (𝐴 · 𝑥) ∈ ℕ) ↔ (𝐴 ∈ ℕ → (𝐴 · 𝑦) ∈ ℕ)))
7		oveq2 7419	. . . . 5 ⊢ (𝑥 = (𝑦 + 1) → (𝐴 · 𝑥) = (𝐴 · (𝑦 + 1)))
8	7	eleq1d 2854	. . . 4 ⊢ (𝑥 = (𝑦 + 1) → ((𝐴 · 𝑥) ∈ ℕ ↔ (𝐴 · (𝑦 + 1)) ∈ ℕ))
9	8	imbi2d 343	. . 3 ⊢ (𝑥 = (𝑦 + 1) → ((𝐴 ∈ ℕ → (𝐴 · 𝑥) ∈ ℕ) ↔ (𝐴 ∈ ℕ → (𝐴 · (𝑦 + 1)) ∈ ℕ)))
10		oveq2 7419	. . . . 5 ⊢ (𝑥 = 𝐵 → (𝐴 · 𝑥) = (𝐴 · 𝐵))
11	10	eleq1d 2854	. . . 4 ⊢ (𝑥 = 𝐵 → ((𝐴 · 𝑥) ∈ ℕ ↔ (𝐴 · 𝐵) ∈ ℕ))
12	11	imbi2d 343	. . 3 ⊢ (𝑥 = 𝐵 → ((𝐴 ∈ ℕ → (𝐴 · 𝑥) ∈ ℕ) ↔ (𝐴 ∈ ℕ → (𝐴 · 𝐵) ∈ ℕ)))
13		nnre 12240	. . . 4 ⊢ (𝐴 ∈ ℕ → 𝐴 ∈ ℝ)
14		ax-1rid 11170	. . . . . 6 ⊢ (𝐴 ∈ ℝ → (𝐴 · 1) = 𝐴)
15	14	eleq1d 2854	. . . . 5 ⊢ (𝐴 ∈ ℝ → ((𝐴 · 1) ∈ ℕ ↔ 𝐴 ∈ ℕ))
16	15	biimprd 251	. . . 4 ⊢ (𝐴 ∈ ℝ → (𝐴 ∈ ℕ → (𝐴 · 1) ∈ ℕ))
17	13, 16	mpcom 39	. . 3 ⊢ (𝐴 ∈ ℕ → (𝐴 · 1) ∈ ℕ)
18		nnaddcl 12256	. . . . . . . 8 ⊢ (((𝐴 · 𝑦) ∈ ℕ ∧ 𝐴 ∈ ℕ) → ((𝐴 · 𝑦) + 𝐴) ∈ ℕ)
19	18	ancoms 463	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ (𝐴 · 𝑦) ∈ ℕ) → ((𝐴 · 𝑦) + 𝐴) ∈ ℕ)
20		nncn 12241	. . . . . . . . . 10 ⊢ (𝐴 ∈ ℕ → 𝐴 ∈ ℂ)
21		nncn 12241	. . . . . . . . . 10 ⊢ (𝑦 ∈ ℕ → 𝑦 ∈ ℂ)
22		ax-1cn 11158	. . . . . . . . . . 11 ⊢ 1 ∈ ℂ
23		adddi 11189	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 1 ∈ ℂ) → (𝐴 · (𝑦 + 1)) = ((𝐴 · 𝑦) + (𝐴 · 1)))
24	22, 23	mp3an3 1476	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℂ ∧ 𝑦 ∈ ℂ) → (𝐴 · (𝑦 + 1)) = ((𝐴 · 𝑦) + (𝐴 · 1)))
25	20, 21, 24	syl2an 607	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℕ ∧ 𝑦 ∈ ℕ) → (𝐴 · (𝑦 + 1)) = ((𝐴 · 𝑦) + (𝐴 · 1)))
26	13, 14	syl 18	. . . . . . . . . . 11 ⊢ (𝐴 ∈ ℕ → (𝐴 · 1) = 𝐴)
27	26	adantr 485	. . . . . . . . . 10 ⊢ ((𝐴 ∈ ℕ ∧ 𝑦 ∈ ℕ) → (𝐴 · 1) = 𝐴)
28	27	oveq2d 7427	. . . . . . . . 9 ⊢ ((𝐴 ∈ ℕ ∧ 𝑦 ∈ ℕ) → ((𝐴 · 𝑦) + (𝐴 · 1)) = ((𝐴 · 𝑦) + 𝐴))
29	25, 28	eqtrd 2804	. . . . . . . 8 ⊢ ((𝐴 ∈ ℕ ∧ 𝑦 ∈ ℕ) → (𝐴 · (𝑦 + 1)) = ((𝐴 · 𝑦) + 𝐴))
30	29	eleq1d 2854	. . . . . . 7 ⊢ ((𝐴 ∈ ℕ ∧ 𝑦 ∈ ℕ) → ((𝐴 · (𝑦 + 1)) ∈ ℕ ↔ ((𝐴 · 𝑦) + 𝐴) ∈ ℕ))
31	19, 30	imbitrrid 249	. . . . . 6 ⊢ ((𝐴 ∈ ℕ ∧ 𝑦 ∈ ℕ) → ((𝐴 ∈ ℕ ∧ (𝐴 · 𝑦) ∈ ℕ) → (𝐴 · (𝑦 + 1)) ∈ ℕ))
32	31	exp4b 435	. . . . 5 ⊢ (𝐴 ∈ ℕ → (𝑦 ∈ ℕ → (𝐴 ∈ ℕ → ((𝐴 · 𝑦) ∈ ℕ → (𝐴 · (𝑦 + 1)) ∈ ℕ))))
33	32	pm2.43b 56	. . . 4 ⊢ (𝑦 ∈ ℕ → (𝐴 ∈ ℕ → ((𝐴 · 𝑦) ∈ ℕ → (𝐴 · (𝑦 + 1)) ∈ ℕ)))
34	33	a2d 30	. . 3 ⊢ (𝑦 ∈ ℕ → ((𝐴 ∈ ℕ → (𝐴 · 𝑦) ∈ ℕ) → (𝐴 ∈ ℕ → (𝐴 · (𝑦 + 1)) ∈ ℕ)))
35	3, 6, 9, 12, 17, 34	nnind 12251	. 2 ⊢ (𝐵 ∈ ℕ → (𝐴 ∈ ℕ → (𝐴 · 𝐵) ∈ ℕ))
36	35	impcom 412	1 ⊢ ((𝐴 ∈ ℕ ∧ 𝐵 ∈ ℕ) → (𝐴 · 𝐵) ∈ ℕ)

Syntax hints:   → wi 4   ∧ wa 400   = wceq 1567   ∈ wcel 2149  (class class class)co 7411  ℂcc 11098  ℝcr 11099  1c1 11101   + caddc 11103   · cmul 11105  ℕcn 12233

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-sep 5261  ax-nul 5271  ax-pr 5405  ax-un 7733  ax-1cn 11158  ax-icn 11159  ax-addcl 11160  ax-addrcl 11161  ax-mulcl 11162  ax-mulrcl 11163  ax-addass 11165  ax-distr 11167  ax-i2m1 11168  ax-1ne0 11169  ax-1rid 11170  ax-rrecex 11172  ax-cnre 11173

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-ral 3086  df-rex 3096  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-op 4601  df-uni 4877  df-iun 4962  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-ov 7414  df-om 7863  df-2nd 7987  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-nn 12234

This theorem is referenced by:  nnmulcli  12258  nnmtmip  12262  nndivtr  12283  nnmulcld  12289  nn0mulcl  12540  qaddcl  12989  qmulcl  12991  modmulnn  13922  nnexpcl  14110  nnsqcl  14164  expmulnbnd  14271  faccl  14319  facdiv  14323  faclbnd3  14328  faclbnd4lem3  14331  faclbnd5  14334  bcrpcl  14344  trirecip  15917  fprodnncl  16009  nnrisefaccl  16073  lcmgcdlem  16664  lcmgcdnn  16669  pcmptcl  16951  prmreclem1  16976  prmreclem6  16981  4sqlem12  17016  vdwlem3  17043  vdwlem9  17049  vdwlem10  17050  mulgnnass  19175  ovolunlem1a  25624  ovolunlem1  25625  mbfi1fseqlem3  25845  mbfi1fseqlem4  25846  elqaalem2  26450  elqaalem3  26451  log2cnv  27075  log2tlbnd  27076  log2ublem2  27078  log2ub  27080  basellem1  27211  basellem2  27212  basellem3  27213  basellem4  27214  basellem5  27215  basellem6  27216  basellem7  27217  basellem8  27218  basellem9  27219  efnnfsumcl  27233  efchtdvds  27289  mumullem1  27309  mumullem2  27310  fsumdvdscom  27315  dvdsflf1o  27317  chtublem  27341  pcbcctr  27406  bclbnd  27410  bposlem1  27414  bposlem2  27415  bposlem3  27416  bposlem4  27417  bposlem5  27418  bposlem6  27419  lgseisenlem1  27505  lgseisenlem2  27506  lgseisenlem3  27507  lgseisenlem4  27508  lgsquadlem1  27510  lgsquadlem2  27511  chebbnd1lem1  27599  chebbnd1lem3  27601  dchrisumlem1  27619  mulogsum  27662  pntrsumo1  27695  pntrsumbnd  27696  ostth2lem1  27748  subfaclim  35613  jm2.17a  43613  jm2.17b  43614  jm2.17c  43615  acongrep  43633  acongeq  43636  jm2.27a  43658  jm2.27c  43660