Theorem dvdscmulr 16319

Description: Cancellation law for the divides relation. Theorem 1.1(e) in [ApostolNT] p. 14. (Contributed by Paul Chapman, 21-Mar-2011.)

Assertion

Ref	Expression
dvdscmulr	⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) → ((𝐾 · 𝑀) ∥ (𝐾 · 𝑁) ↔ 𝑀 ∥ 𝑁))

Proof of Theorem dvdscmulr

Dummy variable 𝑥 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		zmulcl 12664	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ) → (𝐾 · 𝑀) ∈ ℤ)
2	1	3adant3 1131	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 · 𝑀) ∈ ℤ)
3		zmulcl 12664	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 · 𝑁) ∈ ℤ)
4	3	3adant2 1130	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 · 𝑁) ∈ ℤ)
5	2, 4	jca 511	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 · 𝑀) ∈ ℤ ∧ (𝐾 · 𝑁) ∈ ℤ))
6	5	3coml 1126	. . . 4 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝐾 ∈ ℤ) → ((𝐾 · 𝑀) ∈ ℤ ∧ (𝐾 · 𝑁) ∈ ℤ))
7	6	3adant3r 1180	. . 3 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) → ((𝐾 · 𝑀) ∈ ℤ ∧ (𝐾 · 𝑁) ∈ ℤ))
8		3simpa 1147	. . 3 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) → (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ))
9		simpr 484	. . 3 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) ∧ 𝑥 ∈ ℤ) → 𝑥 ∈ ℤ)
10		zcn 12616	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℤ → 𝑥 ∈ ℂ)
11		zcn 12616	. . . . . . . . . . . 12 ⊢ (𝑀 ∈ ℤ → 𝑀 ∈ ℂ)
12	10, 11	anim12i 613	. . . . . . . . . . 11 ⊢ ((𝑥 ∈ ℤ ∧ 𝑀 ∈ ℤ) → (𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ))
13		zcn 12616	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℤ → 𝑁 ∈ ℂ)
14		zcn 12616	. . . . . . . . . . . 12 ⊢ (𝐾 ∈ ℤ → 𝐾 ∈ ℂ)
15	14	anim1i 615	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝐾 ≠ 0) → (𝐾 ∈ ℂ ∧ 𝐾 ≠ 0))
16		mul12 11424	. . . . . . . . . . . . . . . . 17 ⊢ ((𝐾 ∈ ℂ ∧ 𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ) → (𝐾 · (𝑥 · 𝑀)) = (𝑥 · (𝐾 · 𝑀)))
17	16	3adant1r 1176	. . . . . . . . . . . . . . . 16 ⊢ (((𝐾 ∈ ℂ ∧ 𝐾 ≠ 0) ∧ 𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ) → (𝐾 · (𝑥 · 𝑀)) = (𝑥 · (𝐾 · 𝑀)))
18	17	3expb 1119	. . . . . . . . . . . . . . 15 ⊢ (((𝐾 ∈ ℂ ∧ 𝐾 ≠ 0) ∧ (𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ)) → (𝐾 · (𝑥 · 𝑀)) = (𝑥 · (𝐾 · 𝑀)))
19	18	ancoms 458	. . . . . . . . . . . . . 14 ⊢ (((𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ) ∧ (𝐾 ∈ ℂ ∧ 𝐾 ≠ 0)) → (𝐾 · (𝑥 · 𝑀)) = (𝑥 · (𝐾 · 𝑀)))
20	19	3adant2 1130	. . . . . . . . . . . . 13 ⊢ (((𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ) ∧ 𝑁 ∈ ℂ ∧ (𝐾 ∈ ℂ ∧ 𝐾 ≠ 0)) → (𝐾 · (𝑥 · 𝑀)) = (𝑥 · (𝐾 · 𝑀)))
21	20	eqeq1d 2737	. . . . . . . . . . . 12 ⊢ (((𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ) ∧ 𝑁 ∈ ℂ ∧ (𝐾 ∈ ℂ ∧ 𝐾 ≠ 0)) → ((𝐾 · (𝑥 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁)))
22		mulcl 11237	. . . . . . . . . . . . 13 ⊢ ((𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ) → (𝑥 · 𝑀) ∈ ℂ)
23		mulcan 11898	. . . . . . . . . . . . 13 ⊢ (((𝑥 · 𝑀) ∈ ℂ ∧ 𝑁 ∈ ℂ ∧ (𝐾 ∈ ℂ ∧ 𝐾 ≠ 0)) → ((𝐾 · (𝑥 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁))
24	22, 23	syl3an1 1162	. . . . . . . . . . . 12 ⊢ (((𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ) ∧ 𝑁 ∈ ℂ ∧ (𝐾 ∈ ℂ ∧ 𝐾 ≠ 0)) → ((𝐾 · (𝑥 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁))
25	21, 24	bitr3d 281	. . . . . . . . . . 11 ⊢ (((𝑥 ∈ ℂ ∧ 𝑀 ∈ ℂ) ∧ 𝑁 ∈ ℂ ∧ (𝐾 ∈ ℂ ∧ 𝐾 ≠ 0)) → ((𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁))
26	12, 13, 15, 25	syl3an 1159	. . . . . . . . . 10 ⊢ (((𝑥 ∈ ℤ ∧ 𝑀 ∈ ℤ) ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) → ((𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁))
27	26	3expb 1119	. . . . . . . . 9 ⊢ (((𝑥 ∈ ℤ ∧ 𝑀 ∈ ℤ) ∧ (𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0))) → ((𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁))
28	27	3impa 1109	. . . . . . . 8 ⊢ ((𝑥 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ (𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0))) → ((𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁))
29	28	3coml 1126	. . . . . . 7 ⊢ ((𝑀 ∈ ℤ ∧ (𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) ∧ 𝑥 ∈ ℤ) → ((𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁))
30	29	3expia 1120	. . . . . 6 ⊢ ((𝑀 ∈ ℤ ∧ (𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0))) → (𝑥 ∈ ℤ → ((𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁)))
31	30	3impb 1114	. . . . 5 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) → (𝑥 ∈ ℤ → ((𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁)))
32	31	imp 406	. . . 4 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) ∧ 𝑥 ∈ ℤ) → ((𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁) ↔ (𝑥 · 𝑀) = 𝑁))
33	32	biimpd 229	. . 3 ⊢ (((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) ∧ 𝑥 ∈ ℤ) → ((𝑥 · (𝐾 · 𝑀)) = (𝐾 · 𝑁) → (𝑥 · 𝑀) = 𝑁))
34	7, 8, 9, 33	dvds1lem 16302	. 2 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) → ((𝐾 · 𝑀) ∥ (𝐾 · 𝑁) → 𝑀 ∥ 𝑁))
35		dvdscmul 16317	. . 3 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ 𝐾 ∈ ℤ) → (𝑀 ∥ 𝑁 → (𝐾 · 𝑀) ∥ (𝐾 · 𝑁)))
36	35	3adant3r 1180	. 2 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) → (𝑀 ∥ 𝑁 → (𝐾 · 𝑀) ∥ (𝐾 · 𝑁)))
37	34, 36	impbid 212	1 ⊢ ((𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ ∧ (𝐾 ∈ ℤ ∧ 𝐾 ≠ 0)) → ((𝐾 · 𝑀) ∥ (𝐾 · 𝑁) ↔ 𝑀 ∥ 𝑁))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395   ∧ w3a 1086   = wceq 1537   ∈ wcel 2106   ≠ wne 2938   class class class wbr 5148  (class class class)co 7431  ℂcc 11151  0cc0 11153   · cmul 11158  ℤcz 12611   ∥ cdvds 16287

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-8 2108  ax-9 2116  ax-10 2139  ax-11 2155  ax-12 2175  ax-ext 2706  ax-sep 5302  ax-nul 5312  ax-pow 5371  ax-pr 5438  ax-un 7754  ax-resscn 11210  ax-1cn 11211  ax-icn 11212  ax-addcl 11213  ax-addrcl 11214  ax-mulcl 11215  ax-mulrcl 11216  ax-mulcom 11217  ax-addass 11218  ax-mulass 11219  ax-distr 11220  ax-i2m1 11221  ax-1ne0 11222  ax-1rid 11223  ax-rnegex 11224  ax-rrecex 11225  ax-cnre 11226  ax-pre-lttri 11227  ax-pre-lttrn 11228  ax-pre-ltadd 11229  ax-pre-mulgt0 11230

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1540  df-fal 1550  df-ex 1777  df-nf 1781  df-sb 2063  df-mo 2538  df-eu 2567  df-clab 2713  df-cleq 2727  df-clel 2814  df-nfc 2890  df-ne 2939  df-nel 3045  df-ral 3060  df-rex 3069  df-reu 3379  df-rab 3434  df-v 3480  df-sbc 3792  df-csb 3909  df-dif 3966  df-un 3968  df-in 3970  df-ss 3980  df-pss 3983  df-nul 4340  df-if 4532  df-pw 4607  df-sn 4632  df-pr 4634  df-op 4638  df-uni 4913  df-iun 4998  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5583  df-eprel 5589  df-po 5597  df-so 5598  df-fr 5641  df-we 5643  df-xp 5695  df-rel 5696  df-cnv 5697  df-co 5698  df-dm 5699  df-rn 5700  df-res 5701  df-ima 5702  df-pred 6323  df-ord 6389  df-on 6390  df-lim 6391  df-suc 6392  df-iota 6516  df-fun 6565  df-fn 6566  df-f 6567  df-f1 6568  df-fo 6569  df-f1o 6570  df-fv 6571  df-riota 7388  df-ov 7434  df-oprab 7435  df-mpo 7436  df-om 7888  df-2nd 8014  df-frecs 8305  df-wrecs 8336  df-recs 8410  df-rdg 8449  df-er 8744  df-en 8985  df-dom 8986  df-sdom 8987  df-pnf 11295  df-mnf 11296  df-xr 11297  df-ltxr 11298  df-le 11299  df-sub 11492  df-neg 11493  df-nn 12265  df-n0 12525  df-z 12612  df-dvds 16288

This theorem is referenced by:  modmulconst  16322  bitsmod  16470  mulgcd  16582  pcpremul  16877  4sqlem17  16995  odmulg  19589  ablfacrp2  20102  ablfac1b  20105  pgpfac1lem3a  20111  znrrg  21602  fsumdvdsdiaglem  27241  oddpwdc  34336  jm2.20nn  42986