Theorem dvdstr 12214

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 9446	. . 3 ⊢ ((𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ) → (𝑥 · 𝑦) ∈ ℤ)
5	4	adantl 277	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (𝑥 · 𝑦) ∈ ℤ)
6		oveq2 5965	. . . . 5 ⊢ ((𝑥 · 𝐾) = 𝑀 → (𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀))
7	6	adantr 276	. . . 4 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → (𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀))
8		eqeq2 2216	. . . . 5 ⊢ ((𝑦 · 𝑀) = 𝑁 → ((𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀) ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
9	8	adantl 277	. . . 4 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → ((𝑦 · (𝑥 · 𝐾)) = (𝑦 · 𝑀) ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
10	7, 9	mpbid 147	. . 3 ⊢ (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → (𝑦 · (𝑥 · 𝐾)) = 𝑁)
11		zcn 9397	. . . . . . . 8 ⊢ (𝑥 ∈ ℤ → 𝑥 ∈ ℂ)
12		zcn 9397	. . . . . . . 8 ⊢ (𝑦 ∈ ℤ → 𝑦 ∈ ℂ)
13		zcn 9397	. . . . . . . 8 ⊢ (𝐾 ∈ ℤ → 𝐾 ∈ ℂ)
14		mulass 8076	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → ((𝑥 · 𝑦) · 𝐾) = (𝑥 · (𝑦 · 𝐾)))
15		mul12 8221	. . . . . . . . 9 ⊢ ((𝑥 ∈ ℂ ∧ 𝑦 ∈ ℂ ∧ 𝐾 ∈ ℂ) → (𝑥 · (𝑦 · 𝐾)) = (𝑦 · (𝑥 · 𝐾)))
16	14, 15	eqtrd 2239	. . . . . . . 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 2215	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (((𝑥 · 𝑦) · 𝐾) = 𝑁 ↔ (𝑦 · (𝑥 · 𝐾)) = 𝑁))
22	10, 21	imbitrrid 156	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝑥 ∈ ℤ ∧ 𝑦 ∈ ℤ)) → (((𝑥 · 𝐾) = 𝑀 ∧ (𝑦 · 𝑀) = 𝑁) → ((𝑥 · 𝑦) · 𝐾) = 𝑁))
23	1, 2, 3, 5, 22	dvds2lem 12189	1 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 ∥ 𝑀 ∧ 𝑀 ∥ 𝑁) → 𝐾 ∥ 𝑁))

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 981   = wceq 1373   ∈ wcel 2177   class class class wbr 4051  (class class class)co 5957  ℂcc 7943   · cmul 7950  ℤcz 9392   ∥ cdvds 12173

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 2180  ax-ext 2188  ax-sep 4170  ax-pow 4226  ax-pr 4261  ax-setind 4593  ax-cnex 8036  ax-resscn 8037  ax-1cn 8038  ax-1re 8039  ax-icn 8040  ax-addcl 8041  ax-addrcl 8042  ax-mulcl 8043  ax-mulrcl 8044  ax-addcom 8045  ax-mulcom 8046  ax-addass 8047  ax-mulass 8048  ax-distr 8049  ax-i2m1 8050  ax-1rid 8052  ax-0id 8053  ax-rnegex 8054  ax-cnre 8056

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 2193  df-cleq 2199  df-clel 2202  df-nfc 2338  df-ne 2378  df-ral 2490  df-rex 2491  df-reu 2492  df-rab 2494  df-v 2775  df-sbc 3003  df-dif 3172  df-un 3174  df-in 3176  df-ss 3183  df-pw 3623  df-sn 3644  df-pr 3645  df-op 3647  df-uni 3857  df-int 3892  df-br 4052  df-opab 4114  df-id 4348  df-xp 4689  df-rel 4690  df-cnv 4691  df-co 4692  df-dm 4693  df-iota 5241  df-fun 5282  df-fv 5288  df-riota 5912  df-ov 5960  df-oprab 5961  df-mpo 5962  df-sub 8265  df-neg 8266  df-inn 9057  df-n0 9316  df-z 9393  df-dvds 12174

This theorem is referenced by:  dvdstrd  12216  dvdsmultr1  12217  dvdsmultr2  12219  4dvdseven  12303  dvdsgcdb  12409  dvdsmulgcd  12421  gcddvdslcm  12470  lcmgcdeq  12480  lcmdvdsb  12481  mulgcddvds  12491  rpmulgcd2  12492  rpdvds  12496  exprmfct  12535  rpexp  12550  phimullem  12622  pcpremul  12691  pcdvdsb  12718  pcprmpw2  12731  mpodvdsmulf1o  15537  lgsquad2lem1  15633