Theorem zmulcl 9523

Description: Closure of multiplication of integers. (Contributed by NM, 30-Jul-2004.)

Assertion

Ref	Expression
zmulcl	⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 · 𝑁) ∈ ℤ)

Proof of Theorem zmulcl

Step	Hyp	Ref	Expression
1		elznn0 9484	. 2 ⊢ (𝑀 ∈ ℤ ↔ (𝑀 ∈ ℝ ∧ (𝑀 ∈ ℕ0 ∨ -𝑀 ∈ ℕ0)))
2		elznn0 9484	. 2 ⊢ (𝑁 ∈ ℤ ↔ (𝑁 ∈ ℝ ∧ (𝑁 ∈ ℕ0 ∨ -𝑁 ∈ ℕ0)))
3		nn0mulcl 9428	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (𝑀 · 𝑁) ∈ ℕ0)
4	3	orcd 738	. . . . . . . 8 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))
5	4	a1i 9	. . . . . . 7 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0)))
6		remulcl 8150	. . . . . . 7 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (𝑀 · 𝑁) ∈ ℝ)
7	5, 6	jctild 316	. . . . . 6 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℝ ∧ ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))))
8		nn0mulcl 9428	. . . . . . . . 9 ⊢ ((-𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (-𝑀 · 𝑁) ∈ ℕ0)
9		recn 8155	. . . . . . . . . . 11 ⊢ (𝑀 ∈ ℝ → 𝑀 ∈ ℂ)
10		recn 8155	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℝ → 𝑁 ∈ ℂ)
11		mulneg1 8564	. . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℂ ∧ 𝑁 ∈ ℂ) → (-𝑀 · 𝑁) = -(𝑀 · 𝑁))
12	9, 10, 11	syl2an 289	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (-𝑀 · 𝑁) = -(𝑀 · 𝑁))
13	12	eleq1d 2298	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 · 𝑁) ∈ ℕ0 ↔ -(𝑀 · 𝑁) ∈ ℕ0))
14	8, 13	imbitrid 154	. . . . . . . 8 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → -(𝑀 · 𝑁) ∈ ℕ0))
15		olc 716	. . . . . . . 8 ⊢ (-(𝑀 · 𝑁) ∈ ℕ0 → ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))
16	14, 15	syl6 33	. . . . . . 7 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0)))
17	16, 6	jctild 316	. . . . . 6 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℝ ∧ ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))))
18		nn0mulcl 9428	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → (𝑀 · -𝑁) ∈ ℕ0)
19		mulneg2 8565	. . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℂ ∧ 𝑁 ∈ ℂ) → (𝑀 · -𝑁) = -(𝑀 · 𝑁))
20	9, 10, 19	syl2an 289	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (𝑀 · -𝑁) = -(𝑀 · 𝑁))
21	20	eleq1d 2298	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑀 · -𝑁) ∈ ℕ0 ↔ -(𝑀 · 𝑁) ∈ ℕ0))
22	18, 21	imbitrid 154	. . . . . . . 8 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → -(𝑀 · 𝑁) ∈ ℕ0))
23	22, 15	syl6 33	. . . . . . 7 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0)))
24	23, 6	jctild 316	. . . . . 6 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℝ ∧ ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))))
25		nn0mulcl 9428	. . . . . . . . 9 ⊢ ((-𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → (-𝑀 · -𝑁) ∈ ℕ0)
26		mul2neg 8567	. . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℂ ∧ 𝑁 ∈ ℂ) → (-𝑀 · -𝑁) = (𝑀 · 𝑁))
27	9, 10, 26	syl2an 289	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (-𝑀 · -𝑁) = (𝑀 · 𝑁))
28	27	eleq1d 2298	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 · -𝑁) ∈ ℕ0 ↔ (𝑀 · 𝑁) ∈ ℕ0))
29	25, 28	imbitrid 154	. . . . . . . 8 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → (𝑀 · 𝑁) ∈ ℕ0))
30		orc 717	. . . . . . . 8 ⊢ ((𝑀 · 𝑁) ∈ ℕ0 → ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))
31	29, 30	syl6 33	. . . . . . 7 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0)))
32	31, 6	jctild 316	. . . . . 6 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℝ ∧ ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))))
33	7, 17, 24, 32	ccased 971	. . . . 5 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((𝑀 ∈ ℕ0 ∨ -𝑀 ∈ ℕ0) ∧ (𝑁 ∈ ℕ0 ∨ -𝑁 ∈ ℕ0)) → ((𝑀 · 𝑁) ∈ ℝ ∧ ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))))
34		elznn0 9484	. . . . 5 ⊢ ((𝑀 · 𝑁) ∈ ℤ ↔ ((𝑀 · 𝑁) ∈ ℝ ∧ ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0)))
35	33, 34	imbitrrdi 162	. . . 4 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((𝑀 ∈ ℕ0 ∨ -𝑀 ∈ ℕ0) ∧ (𝑁 ∈ ℕ0 ∨ -𝑁 ∈ ℕ0)) → (𝑀 · 𝑁) ∈ ℤ))
36	35	imp 124	. . 3 ⊢ (((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) ∧ ((𝑀 ∈ ℕ0 ∨ -𝑀 ∈ ℕ0) ∧ (𝑁 ∈ ℕ0 ∨ -𝑁 ∈ ℕ0))) → (𝑀 · 𝑁) ∈ ℤ)
37	36	an4s 590	. 2 ⊢ (((𝑀 ∈ ℝ ∧ (𝑀 ∈ ℕ0 ∨ -𝑀 ∈ ℕ0)) ∧ (𝑁 ∈ ℝ ∧ (𝑁 ∈ ℕ0 ∨ -𝑁 ∈ ℕ0))) → (𝑀 · 𝑁) ∈ ℤ)
38	1, 2, 37	syl2anb 291	1 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 · 𝑁) ∈ ℤ)

Syntax hints:   → wi 4   ∧ wa 104   ∨ wo 713   = wceq 1395   ∈ wcel 2200  (class class class)co 6013  ℂcc 8020  ℝcr 8021   · cmul 8027  -cneg 8341  ℕ₀cn0 9392  ℤcz 9469

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 4205  ax-pow 4262  ax-pr 4297  ax-setind 4633  ax-cnex 8113  ax-resscn 8114  ax-1cn 8115  ax-1re 8116  ax-icn 8117  ax-addcl 8118  ax-addrcl 8119  ax-mulcl 8120  ax-mulrcl 8121  ax-addcom 8122  ax-mulcom 8123  ax-addass 8124  ax-mulass 8125  ax-distr 8126  ax-i2m1 8127  ax-1rid 8129  ax-0id 8130  ax-rnegex 8131  ax-cnre 8133

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 2802  df-sbc 3030  df-dif 3200  df-un 3202  df-in 3204  df-ss 3211  df-pw 3652  df-sn 3673  df-pr 3674  df-op 3676  df-uni 3892  df-int 3927  df-br 4087  df-opab 4149  df-id 4388  df-xp 4729  df-rel 4730  df-cnv 4731  df-co 4732  df-dm 4733  df-iota 5284  df-fun 5326  df-fv 5332  df-riota 5966  df-ov 6016  df-oprab 6017  df-mpo 6018  df-sub 8342  df-neg 8343  df-inn 9134  df-n0 9393  df-z 9470

This theorem is referenced by:  zdivmul  9560  msqznn  9570  zmulcld  9598  uz2mulcl  9832  qaddcl  9859  qmulcl  9861  qreccl  9866  fzctr  10358  flqmulnn0  10549  zexpcl  10806  iexpcyc  10896  zesq  10910  fprodzcl  12160  dvdsmul1  12364  dvdsmul2  12365  muldvds1  12367  muldvds2  12368  dvdscmul  12369  dvdsmulc  12370  dvds2ln  12375  dvdstr  12379  dvdsmultr1  12382  dvdsmultr2  12384  3dvdsdec  12416  3dvds2dec  12417  oexpneg  12428  mulsucdiv2z  12436  divalgb  12476  divalgmod  12478  ndvdsi  12484  absmulgcd  12578  gcdmultiple  12581  gcdmultiplez  12582  dvdsmulgcd  12586  rpmulgcd  12587  lcmcllem  12629  rpmul  12660  cncongr1  12665  cncongr2  12666  modprminv  12812  modprminveq  12813  modprm0  12817  pythagtriplem4  12831  pcpremul  12856  pcmul  12864  gzmulcl  12941  zsubrg  14585  dvdsrzring  14607  mulgrhm  14613  znidom  14661  znunit  14663  lgslem3  15721  lgsval  15723  lgsval2lem  15729  lgsval4a  15741  lgsneg  15743  lgsdir2  15752  lgsdir  15754  lgsdilem2  15755  lgsdi  15756  lgsne0  15757  lgseisenlem1  15789  lgseisenlem2  15790  lgseisenlem3  15791  lgsquadlem1  15796  lgsquad2lem2  15801  2lgsoddprmlem2  15825