Theorem dvdstr 12300

Description: The divides relation is transitive. Theorem 1.1(b) in [ApostolNT] p. 14 (transitive property of the divides relation). (Contributed by Paul Chapman, 21-Mar-2011.)

Assertion

Ref	Expression
dvdstr	⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 ∥ 𝑀 ∧ 𝑀 ∥ 𝑁) → 𝐾 ∥ 𝑁))

Proof of Theorem dvdstr

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

Step	Hyp	Ref	Expression
1		3simpa 997	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ))
2		3simpc 999	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ))
3		3simpb 998	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 ∈ ℤ ∧ 𝑁 ∈ ℤ))
4		zmulcl 9463	. . 3 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ) → (𝑥 · 𝑦) ∈ ℤ)
5	4	adantl 277	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (𝑥 · 𝑦) ∈ ℤ)
6		oveq2 5977	. . . . 5 ⊢ ((𝑥 · 𝐾) = 𝑀 → (𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀))
7	6	adantr 276	. . . 4 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → (𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀))
8		eqeq2 2217	. . . . 5 ⊢ ((𝑦 · 𝑀) = 𝑁 → ((𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀) ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
9	8	adantl 277	. . . 4 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → ((𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀) ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
10	7, 9	mpbid 147	. . 3 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → (𝑦 · (𝑥 · 𝐾)) = 𝑁)
11		zcn 9414	. . . . . . . 8 ⊢ (𝑥 ∈ ℤ → 𝑥 ∈ ℂ)
12		zcn 9414	. . . . . . . 8 ⊢ (𝑦 ∈ ℤ → 𝑦 ∈ ℂ)
13		zcn 9414	. . . . . . . 8 ⊢ (𝐾 ∈ ℤ → 𝐾 ∈ ℂ)
14		mulass 8093	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑥 · 𝑦) · 𝐾) = (𝑥 · (𝑦 · 𝐾)))
15		mul12 8238	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝑥 · (𝑦 · 𝐾)) = (𝑦 · (𝑥 · 𝐾)))
16	14, 15	eqtrd 2240	. . . . . . . 8 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
17	11, 12, 13, 16	syl3an 1292	. . . . . . 7 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ ∧ 𝐾 ∈ ℤ) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
18	17	3comr 1214	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
19	18	3expb 1207	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
20	19	3ad2antl1 1162	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
21	20	eqeq1d 2216	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (((𝑥 · 𝑦) · 𝐾) = 𝑁 ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
22	10, 21	imbitrrid 156	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → ((𝑥 · 𝑦) · 𝐾) = 𝑁))
23	1, 2, 3, 5, 22	dvds2lem 12275	1 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 ∥ 𝑀 ∧ 𝑀 ∥ 𝑁) → 𝐾 ∥ 𝑁))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 981   = wceq 1373   ∈ wcel 2178   class class class wbr 4060  (class class class)co 5969  ℂcc 7960   · cmul 7967  ℤcz 9409   ∥ cdvds 12259

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 615  ax-in2 616  ax-io 711  ax-5 1471  ax-7 1472  ax-gen 1473  ax-ie1 1517  ax-ie2 1518  ax-8 1528  ax-10 1529  ax-11 1530  ax-i12 1531  ax-bndl 1533  ax-4 1534  ax-17 1550  ax-i9 1554  ax-ial 1558  ax-i5r 1559  ax-14 2181  ax-ext 2189  ax-sep 4179  ax-pow 4235  ax-pr 4270  ax-setind 4604  ax-cnex 8053  ax-resscn 8054  ax-1cn 8055  ax-1re 8056  ax-icn 8057  ax-addcl 8058  ax-addrcl 8059  ax-mulcl 8060  ax-mulrcl 8061  ax-addcom 8062  ax-mulcom 8063  ax-addass 8064  ax-mulass 8065  ax-distr 8066  ax-i2m1 8067  ax-1rid 8069  ax-0id 8070  ax-rnegex 8071  ax-cnre 8073

This theorem depends on definitions:  df-bi 117  df-3or 982  df-3an 983  df-tru 1376  df-fal 1379  df-nf 1485  df-sb 1787  df-eu 2058  df-mo 2059  df-clab 2194  df-cleq 2200  df-clel 2203  df-nfc 2339  df-ne 2379  df-ral 2491  df-rex 2492  df-reu 2493  df-rab 2495  df-v 2779  df-sbc 3007  df-dif 3177  df-un 3179  df-in 3181  df-ss 3188  df-pw 3629  df-sn 3650  df-pr 3651  df-op 3653  df-uni 3866  df-int 3901  df-br 4061  df-opab 4123  df-id 4359  df-xp 4700  df-rel 4701  df-cnv 4702  df-co 4703  df-dm 4704  df-iota 5252  df-fun 5293  df-fv 5299  df-riota 5924  df-ov 5972  df-oprab 5973  df-mpo 5974  df-sub 8282  df-neg 8283  df-inn 9074  df-n0 9333  df-z 9410  df-dvds 12260

This theorem is referenced by:  dvdstrd  12302  dvdsmultr1  12303  dvdsmultr2  12305  4dvdseven  12389  dvdsgcdb  12495  dvdsmulgcd  12507  gcddvdslcm  12556  lcmgcdeq  12566  lcmdvdsb  12567  mulgcddvds  12577  rpmulgcd2  12578  rpdvds  12582  exprmfct  12621  rpexp  12636  phimullem  12708  pcpremul  12777  pcdvdsb  12804  pcprmpw2  12817  mpodvdsmulf1o  15623  lgsquad2lem1  15719