Theorem zmulcl 9532

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 9493	. 2 ⊢ (𝑀 ∈ ℤ ↔ (𝑀 ∈ ℝ ∧ (𝑀 ∈ ℕ0 ∨ -𝑀 ∈ ℕ0)))
2		elznn0 9493	. 2 ⊢ (𝑁 ∈ ℤ ↔ (𝑁 ∈ ℝ ∧ (𝑁 ∈ ℕ0 ∨ -𝑁 ∈ ℕ0)))
3		nn0mulcl 9437	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (𝑀 · 𝑁) ∈ ℕ0)
4	3	orcd 740	. . . . . . . 8 ⊢ ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))
5	4	a1i 9	. . . . . . 7 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0)))
6		remulcl 8159	. . . . . . 7 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (𝑀 · 𝑁) ∈ ℝ)
7	5, 6	jctild 316	. . . . . 6 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → ((𝑀 · 𝑁) ∈ ℝ ∧ ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))))
8		nn0mulcl 9437	. . . . . . . . 9 ⊢ ((-𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → (-𝑀 · 𝑁) ∈ ℕ0)
9		recn 8164	. . . . . . . . . . 11 ⊢ (𝑀 ∈ ℝ → 𝑀 ∈ ℂ)
10		recn 8164	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℝ → 𝑁 ∈ ℂ)
11		mulneg1 8573	. . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℂ ∧ 𝑁 ∈ ℂ) → (-𝑀 · 𝑁) = -(𝑀 · 𝑁))
12	9, 10, 11	syl2an 289	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (-𝑀 · 𝑁) = -(𝑀 · 𝑁))
13	12	eleq1d 2300	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 · 𝑁) ∈ ℕ0 ↔ -(𝑀 · 𝑁) ∈ ℕ0))
14	8, 13	imbitrid 154	. . . . . . . 8 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 ∈ ℕ0 ∧ 𝑁 ∈ ℕ0) → -(𝑀 · 𝑁) ∈ ℕ0))
15		olc 718	. . . . . . . 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 9437	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → (𝑀 · -𝑁) ∈ ℕ0)
19		mulneg2 8574	. . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℂ ∧ 𝑁 ∈ ℂ) → (𝑀 · -𝑁) = -(𝑀 · 𝑁))
20	9, 10, 19	syl2an 289	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (𝑀 · -𝑁) = -(𝑀 · 𝑁))
21	20	eleq1d 2300	. . . . . . . . 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 9437	. . . . . . . . 9 ⊢ ((-𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → (-𝑀 · -𝑁) ∈ ℕ0)
26		mul2neg 8576	. . . . . . . . . . 11 ⊢ ((𝑀 ∈ ℂ ∧ 𝑁 ∈ ℂ) → (-𝑀 · -𝑁) = (𝑀 · 𝑁))
27	9, 10, 26	syl2an 289	. . . . . . . . . 10 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (-𝑀 · -𝑁) = (𝑀 · 𝑁))
28	27	eleq1d 2300	. . . . . . . . 9 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 · -𝑁) ∈ ℕ0 ↔ (𝑀 · 𝑁) ∈ ℕ0))
29	25, 28	imbitrid 154	. . . . . . . 8 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((-𝑀 ∈ ℕ0 ∧ -𝑁 ∈ ℕ0) → (𝑀 · 𝑁) ∈ ℕ0))
30		orc 719	. . . . . . . 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 973	. . . . 5 ⊢ ((𝑀 ∈ ℝ ∧ 𝑁 ∈ ℝ) → (((𝑀 ∈ ℕ0 ∨ -𝑀 ∈ ℕ0) ∧ (𝑁 ∈ ℕ0 ∨ -𝑁 ∈ ℕ0)) → ((𝑀 · 𝑁) ∈ ℝ ∧ ((𝑀 · 𝑁) ∈ ℕ0 ∨ -(𝑀 · 𝑁) ∈ ℕ0))))
34		elznn0 9493	. . . . 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 592	. 2 ⊢ (((𝑀 ∈ ℝ ∧ (𝑀 ∈ ℕ0 ∨ -𝑀 ∈ ℕ0)) ∧ (𝑁 ∈ ℝ ∧ (𝑁 ∈ ℕ0 ∨ -𝑁 ∈ ℕ0))) → (𝑀 · 𝑁) ∈ ℤ)
38	1, 2, 37	syl2anb 291	1 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 · 𝑁) ∈ ℤ)

Syntax hints:   → wi 4   ∧ wa 104   ∨ wo 715   = wceq 1397   ∈ wcel 2202  (class class class)co 6017  ℂcc 8029  ℝcr 8030   · cmul 8036  -cneg 8350  ℕ₀cn0 9401  ℤcz 9478

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 619  ax-in2 620  ax-io 716  ax-5 1495  ax-7 1496  ax-gen 1497  ax-ie1 1541  ax-ie2 1542  ax-8 1552  ax-10 1553  ax-11 1554  ax-i12 1555  ax-bndl 1557  ax-4 1558  ax-17 1574  ax-i9 1578  ax-ial 1582  ax-i5r 1583  ax-14 2205  ax-ext 2213  ax-sep 4207  ax-pow 4264  ax-pr 4299  ax-setind 4635  ax-cnex 8122  ax-resscn 8123  ax-1cn 8124  ax-1re 8125  ax-icn 8126  ax-addcl 8127  ax-addrcl 8128  ax-mulcl 8129  ax-mulrcl 8130  ax-addcom 8131  ax-mulcom 8132  ax-addass 8133  ax-mulass 8134  ax-distr 8135  ax-i2m1 8136  ax-1rid 8138  ax-0id 8139  ax-rnegex 8140  ax-cnre 8142

This theorem depends on definitions:  df-bi 117  df-3or 1005  df-3an 1006  df-tru 1400  df-fal 1403  df-nf 1509  df-sb 1811  df-eu 2082  df-mo 2083  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2363  df-ne 2403  df-ral 2515  df-rex 2516  df-reu 2517  df-rab 2519  df-v 2804  df-sbc 3032  df-dif 3202  df-un 3204  df-in 3206  df-ss 3213  df-pw 3654  df-sn 3675  df-pr 3676  df-op 3678  df-uni 3894  df-int 3929  df-br 4089  df-opab 4151  df-id 4390  df-xp 4731  df-rel 4732  df-cnv 4733  df-co 4734  df-dm 4735  df-iota 5286  df-fun 5328  df-fv 5334  df-riota 5970  df-ov 6020  df-oprab 6021  df-mpo 6022  df-sub 8351  df-neg 8352  df-inn 9143  df-n0 9402  df-z 9479

This theorem is referenced by:  zdivmul  9569  msqznn  9579  zmulcld  9607  uz2mulcl  9841  qaddcl  9868  qmulcl  9870  qreccl  9875  fzctr  10367  flqmulnn0  10558  zexpcl  10815  iexpcyc  10905  zesq  10919  fprodzcl  12169  dvdsmul1  12373  dvdsmul2  12374  muldvds1  12376  muldvds2  12377  dvdscmul  12378  dvdsmulc  12379  dvds2ln  12384  dvdstr  12388  dvdsmultr1  12391  dvdsmultr2  12393  3dvdsdec  12425  3dvds2dec  12426  oexpneg  12437  mulsucdiv2z  12445  divalgb  12485  divalgmod  12487  ndvdsi  12493  absmulgcd  12587  gcdmultiple  12590  gcdmultiplez  12591  dvdsmulgcd  12595  rpmulgcd  12596  lcmcllem  12638  rpmul  12669  cncongr1  12674  cncongr2  12675  modprminv  12821  modprminveq  12822  modprm0  12826  pythagtriplem4  12840  pcpremul  12865  pcmul  12873  gzmulcl  12950  zsubrg  14594  dvdsrzring  14616  mulgrhm  14622  znidom  14670  znunit  14672  lgslem3  15730  lgsval  15732  lgsval2lem  15738  lgsval4a  15750  lgsneg  15752  lgsdir2  15761  lgsdir  15763  lgsdilem2  15764  lgsdi  15765  lgsne0  15766  lgseisenlem1  15798  lgseisenlem2  15799  lgseisenlem3  15800  lgsquadlem1  15805  lgsquad2lem2  15810  2lgsoddprmlem2  15834