Theorem dvdstr 12545

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 1021	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ))
2		3simpc 1023	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ))
3		3simpb 1022	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 ∈ ℤ ∧ 𝑁 ∈ ℤ))
4		zmulcl 9653	. . 3 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ) → (𝑥 · 𝑦) ∈ ℤ)
5	4	adantl 277	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (𝑥 · 𝑦) ∈ ℤ)
6		oveq2 6068	. . . . 5 ⊢ ((𝑥 · 𝐾) = 𝑀 → (𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀))
7	6	adantr 276	. . . 4 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → (𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀))
8		eqeq2 2244	. . . . 5 ⊢ ((𝑦 · 𝑀) = 𝑁 → ((𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀) ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
9	8	adantl 277	. . . 4 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → ((𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀) ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
10	7, 9	mpbid 147	. . 3 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → (𝑦 · (𝑥 · 𝐾)) = 𝑁)
11		zcn 9604	. . . . . . . 8 ⊢ (𝑥 ∈ ℤ → 𝑥 ∈ ℂ)
12		zcn 9604	. . . . . . . 8 ⊢ (𝑦 ∈ ℤ → 𝑦 ∈ ℂ)
13		zcn 9604	. . . . . . . 8 ⊢ (𝐾 ∈ ℤ → 𝐾 ∈ ℂ)
14		mulass 8276	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑥 · 𝑦) · 𝐾) = (𝑥 · (𝑦 · 𝐾)))
15		mul12 8421	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝑥 · (𝑦 · 𝐾)) = (𝑦 · (𝑥 · 𝐾)))
16	14, 15	eqtrd 2267	. . . . . . . 8 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
17	11, 12, 13, 16	syl3an 1316	. . . . . . 7 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ ∧ 𝐾 ∈ ℤ) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
18	17	3comr 1238	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
19	18	3expb 1231	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
20	19	3ad2antl1 1186	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → ((𝑥 · 𝑦) · 𝐾) = (𝑦 · (𝑥 · 𝐾)))
21	20	eqeq1d 2243	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (((𝑥 · 𝑦) · 𝐾) = 𝑁 ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
22	10, 21	imbitrrid 156	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → ((𝑥 · 𝑦) · 𝐾) = 𝑁))
23	1, 2, 3, 5, 22	dvds2lem 12520	1 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 ∥ 𝑀 ∧ 𝑀 ∥ 𝑁) → 𝐾 ∥ 𝑁))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 1005   = wceq 1398   ∈ wcel 2205   class class class wbr 4115  (class class class)co 6060  ℂcc 8143   · cmul 8150  ℤcz 9599   ∥ cdvds 12504

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 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-14 2208  ax-ext 2216  ax-sep 4234  ax-pow 4293  ax-pr 4328  ax-setind 4666  ax-cnex 8236  ax-resscn 8237  ax-1cn 8238  ax-1re 8239  ax-icn 8240  ax-addcl 8241  ax-addrcl 8242  ax-mulcl 8243  ax-mulrcl 8244  ax-addcom 8245  ax-mulcom 8246  ax-addass 8247  ax-mulass 8248  ax-distr 8249  ax-i2m1 8250  ax-1rid 8252  ax-0id 8253  ax-rnegex 8254  ax-cnre 8256

This theorem depends on definitions:  df-bi 117  df-3or 1006  df-3an 1007  df-tru 1401  df-fal 1404  df-nf 1510  df-sb 1812  df-eu 2085  df-mo 2086  df-clab 2221  df-cleq 2227  df-clel 2230  df-nfc 2375  df-ne 2415  df-ral 2527  df-rex 2528  df-reu 2529  df-rab 2531  df-v 2817  df-sbc 3046  df-dif 3216  df-un 3218  df-in 3220  df-ss 3227  df-pw 3677  df-sn 3701  df-pr 3702  df-op 3704  df-uni 3921  df-int 3956  df-br 4116  df-opab 4178  df-id 4420  df-xp 4762  df-rel 4763  df-cnv 4764  df-co 4765  df-dm 4766  df-iota 5319  df-fun 5361  df-fv 5367  df-riota 6013  df-ov 6063  df-oprab 6064  df-mpo 6065  df-sub 8465  df-neg 8466  df-inn 9260  df-n0 9519  df-z 9600  df-dvds 12505

This theorem is referenced by:  dvdstrd  12547  dvdsmultr1  12548  dvdsmultr2  12550  4dvdseven  12634  dvdsgcdb  12740  dvdsmulgcd  12752  gcddvdslcm  12801  lcmgcdeq  12811  lcmdvdsb  12812  mulgcddvds  12822  rpmulgcd2  12823  rpdvds  12827  exprmfct  12866  rpexp  12881  phimullem  12953  pcpremul  13022  pcdvdsb  13049  pcprmpw2  13062  mpodvdsmulf1o  15989  lgsquad2lem1  16085