Theorem dvdstr 12081

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 996	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ))
2		3simpc 998	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ))
3		3simpb 997	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 ∈ ℤ ∧ 𝑁 ∈ ℤ))
4		zmulcl 9425	. . 3 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ) → (𝑥 · 𝑦) ∈ ℤ)
5	4	adantl 277	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (𝑥 · 𝑦) ∈ ℤ)
6		oveq2 5951	. . . . 5 ⊢ ((𝑥 · 𝐾) = 𝑀 → (𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀))
7	6	adantr 276	. . . 4 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → (𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀))
8		eqeq2 2214	. . . . 5 ⊢ ((𝑦 · 𝑀) = 𝑁 → ((𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀) ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
9	8	adantl 277	. . . 4 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → ((𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀) ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
10	7, 9	mpbid 147	. . 3 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → (𝑦 · (𝑥 · 𝐾)) = 𝑁)
11		zcn 9376	. . . . . . . 8 ⊢ (𝑥 ∈ ℤ → 𝑥 ∈ ℂ)
12		zcn 9376	. . . . . . . 8 ⊢ (𝑦 ∈ ℤ → 𝑦 ∈ ℂ)
13		zcn 9376	. . . . . . . 8 ⊢ (𝐾 ∈ ℤ → 𝐾 ∈ ℂ)
14		mulass 8055	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑥 · 𝑦) · 𝐾) = (𝑥 · (𝑦 · 𝐾)))
15		mul12 8200	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝑥 · (𝑦 · 𝐾)) = (𝑦 · (𝑥 · 𝐾)))
16	14, 15	eqtrd 2237	. . . . . . . 8 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
17	11, 12, 13, 16	syl3an 1291	. . . . . . 7 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ ∧ 𝐾 ∈ ℤ) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
18	17	3comr 1213	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
19	18	3expb 1206	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
20	19	3ad2antl1 1161	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
21	20	eqeq1d 2213	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (((𝑥 · 𝑦) · 𝐾) = 𝑁 ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
22	10, 21	imbitrrid 156	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → ((𝑥 · 𝑦) · 𝐾) = 𝑁))
23	1, 2, 3, 5, 22	dvds2lem 12056	1 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 ∥ 𝑀 ∧ 𝑀 ∥ 𝑁) → 𝐾 ∥ 𝑁))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 980   = wceq 1372   ∈ wcel 2175   class class class wbr 4043  (class class class)co 5943  ℂcc 7922   · cmul 7929  ℤcz 9371   ∥ cdvds 12040

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 710  ax-5 1469  ax-7 1470  ax-gen 1471  ax-ie1 1515  ax-ie2 1516  ax-8 1526  ax-10 1527  ax-11 1528  ax-i12 1529  ax-bndl 1531  ax-4 1532  ax-17 1548  ax-i9 1552  ax-ial 1556  ax-i5r 1557  ax-14 2178  ax-ext 2186  ax-sep 4161  ax-pow 4217  ax-pr 4252  ax-setind 4584  ax-cnex 8015  ax-resscn 8016  ax-1cn 8017  ax-1re 8018  ax-icn 8019  ax-addcl 8020  ax-addrcl 8021  ax-mulcl 8022  ax-mulrcl 8023  ax-addcom 8024  ax-mulcom 8025  ax-addass 8026  ax-mulass 8027  ax-distr 8028  ax-i2m1 8029  ax-1rid 8031  ax-0id 8032  ax-rnegex 8033  ax-cnre 8035

This theorem depends on definitions:  df-bi 117  df-3or 981  df-3an 982  df-tru 1375  df-fal 1378  df-nf 1483  df-sb 1785  df-eu 2056  df-mo 2057  df-clab 2191  df-cleq 2197  df-clel 2200  df-nfc 2336  df-ne 2376  df-ral 2488  df-rex 2489  df-reu 2490  df-rab 2492  df-v 2773  df-sbc 2998  df-dif 3167  df-un 3169  df-in 3171  df-ss 3178  df-pw 3617  df-sn 3638  df-pr 3639  df-op 3641  df-uni 3850  df-int 3885  df-br 4044  df-opab 4105  df-id 4339  df-xp 4680  df-rel 4681  df-cnv 4682  df-co 4683  df-dm 4684  df-iota 5231  df-fun 5272  df-fv 5278  df-riota 5898  df-ov 5946  df-oprab 5947  df-mpo 5948  df-sub 8244  df-neg 8245  df-inn 9036  df-n0 9295  df-z 9372  df-dvds 12041

This theorem is referenced by:  dvdstrd  12083  dvdsmultr1  12084  dvdsmultr2  12086  4dvdseven  12170  dvdsgcdb  12276  dvdsmulgcd  12288  gcddvdslcm  12337  lcmgcdeq  12347  lcmdvdsb  12348  mulgcddvds  12358  rpmulgcd2  12359  rpdvds  12363  exprmfct  12402  rpexp  12417  phimullem  12489  pcpremul  12558  pcdvdsb  12585  pcprmpw2  12598  mpodvdsmulf1o  15404  lgsquad2lem1  15500