mulgcddvds - Intuitionistic Logic Explorer

	Intuitionistic Logic Explorer		< Previous Next > Nearby theorems
Mirrors > Home > ILE Home > Th. List > mulgcddvds		GIF version

Theorem mulgcddvds 10476

Description: One half of rpmulgcd2 10477, which does not need the coprimality assumption. (Contributed by Mario Carneiro, 2-Jul-2015.)

**Assertion**
Ref	Expression
mulgcddvds	⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)))

**Proof of Theorem mulgcddvds**
Step	Hyp	Ref	Expression
1		simp1 938	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝐾 ∈ ℤ)
2		simp2 939	. . . . . . . 8 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑀 ∈ ℤ)
3		simp3 940	. . . . . . . 8 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑁 ∈ ℤ)
4	2, 3	zmulcld 8475	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 · 𝑁) ∈ ℤ)
5	1, 4	gcdcld 10360	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∈ ℕ₀)
6	5	nn0zd 8467	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ)
7		dvds0 10210	. . . . 5 ⊢ ((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ → (𝐾 gcd (𝑀 · 𝑁)) ∥ 0)
8	6, 7	syl 14	. . . 4 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ 0)
9	8	adantr 270	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) = 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ 0)
10		oveq2 5540	. . . 4 ⊢ ((𝐾 gcd 𝑁) = 0 → ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)) = ((𝐾 gcd 𝑀) · 0))
11	1, 2	gcdcld 10360	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑀) ∈ ℕ₀)
12	11	nn0cnd 8343	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑀) ∈ ℂ)
13	12	mul01d 7497	. . . 4 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑀) · 0) = 0)
14	10, 13	sylan9eqr 2135	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) = 0) → ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)) = 0)
15	9, 14	breqtrrd 3811	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) = 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)))
16	6	adantr 270	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ)
17	16	zcnd 8470	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∈ ℂ)
18	1, 3	gcdcld 10360	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∈ ℕ₀)
19	18	nn0zd 8467	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∈ ℤ)
20	19	adantr 270	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) ∈ ℤ)
21	20	zcnd 8470	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) ∈ ℂ)
22		0zd 8363	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 0 ∈ ℤ)
23		zapne 8422	. . . . . 6 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ 0 ∈ ℤ) → ((𝐾 gcd 𝑁) # 0 ↔ (𝐾 gcd 𝑁) ≠ 0))
24	19, 22, 23	syl2anc 403	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) # 0 ↔ (𝐾 gcd 𝑁) ≠ 0))
25	24	biimpar 291	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) # 0)
26	17, 21, 25	divcanap1d 7878	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) = (𝐾 gcd (𝑀 · 𝑁)))
27		gcddvds 10355	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ (𝑀 · 𝑁) ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾 ∧ (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁)))
28	1, 4, 27	syl2anc 403	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾 ∧ (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁)))
29	28	simpld 110	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾)
30	6, 1, 19, 29	dvdsmultr1d 10234	. . . . . . . 8 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)))
31	30	adantr 270	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)))
32	26, 31	eqbrtrd 3805	. . . . . 6 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)))
33		gcddvds 10355	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ 𝐾 ∧ (𝐾 gcd 𝑁) ∥ 𝑁))
34	1, 3, 33	syl2anc 403	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ 𝐾 ∧ (𝐾 gcd 𝑁) ∥ 𝑁))
35	34	simpld 110	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∥ 𝐾)
36	34	simprd 112	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∥ 𝑁)
37		dvdsmultr2 10235	. . . . . . . . . . . 12 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ 𝑁 → (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁)))
38	19, 2, 3, 37	syl3anc 1169	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ 𝑁 → (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁)))
39	36, 38	mpd 13	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁))
40		dvdsgcd 10401	. . . . . . . . . . 11 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ (𝑀 · 𝑁) ∈ ℤ) → (((𝐾 gcd 𝑁) ∥ 𝐾 ∧ (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁)) → (𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁))))
41	19, 1, 4, 40	syl3anc 1169	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝐾 gcd 𝑁) ∥ 𝐾 ∧ (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁)) → (𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁))))
42	35, 39, 41	mp2and 423	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁)))
43	42	adantr 270	. . . . . . . 8 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁)))
44		simpr 108	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) ≠ 0)
45		dvdsval2 10198	. . . . . . . . 9 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ (𝐾 gcd 𝑁) ≠ 0 ∧ (𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ))
46	20, 44, 16, 45	syl3anc 1169	. . . . . . . 8 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ))
47	43, 46	mpbid 145	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ)
48	1	adantr 270	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → 𝐾 ∈ ℤ)
49		dvdsmulcr 10225	. . . . . . 7 ⊢ ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ ((𝐾 gcd 𝑁) ∈ ℤ ∧ (𝐾 gcd 𝑁) ≠ 0)) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾))
50	47, 48, 20, 44, 49	syl112anc 1173	. . . . . 6 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾))
51	32, 50	mpbid 145	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾)
52		nn0abscl 9971	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℤ → (abs‘𝑀) ∈ ℕ₀)
53	2, 52	syl 14	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘𝑀) ∈ ℕ₀)
54	53	nn0zd 8467	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘𝑀) ∈ ℤ)
55		dvdsmultr2 10235	. . . . . . . . . . . . 13 ⊢ (((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ ∧ (abs‘𝑀) ∈ ℤ ∧ 𝐾 ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾 → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾)))
56	6, 54, 1, 55	syl3anc 1169	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾 → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾)))
57	29, 56	mpd 13	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾))
58	28	simprd 112	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁))
59		iddvds 10208	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℤ → 𝑀 ∥ 𝑀)
60	2, 59	syl 14	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑀 ∥ 𝑀)
61		dvdsabsb 10214	. . . . . . . . . . . . . . 15 ⊢ ((𝑀 ∈ ℤ ∧ 𝑀 ∈ ℤ) → (𝑀 ∥ 𝑀 ↔ 𝑀 ∥ (abs‘𝑀)))
62	2, 2, 61	syl2anc 403	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∥ 𝑀 ↔ 𝑀 ∥ (abs‘𝑀)))
63	60, 62	mpbid 145	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑀 ∥ (abs‘𝑀))
64		dvdsmulc 10223	. . . . . . . . . . . . . 14 ⊢ ((𝑀 ∈ ℤ ∧ (abs‘𝑀) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∥ (abs‘𝑀) → (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁)))
65	2, 54, 3, 64	syl3anc 1169	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∥ (abs‘𝑀) → (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁)))
66	63, 65	mpd 13	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁))
67	54, 3	zmulcld 8475	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((abs‘𝑀) · 𝑁) ∈ ℤ)
68		dvdstr 10232	. . . . . . . . . . . . 13 ⊢ (((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ ∧ (𝑀 · 𝑁) ∈ ℤ ∧ ((abs‘𝑀) · 𝑁) ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁) ∧ (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁)) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁)))
69	6, 4, 67, 68	syl3anc 1169	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁) ∧ (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁)) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁)))
70	58, 66, 69	mp2and 423	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁))
71	54, 1	zmulcld 8475	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((abs‘𝑀) · 𝐾) ∈ ℤ)
72		dvdsgcd 10401	. . . . . . . . . . . 12 ⊢ (((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ ∧ ((abs‘𝑀) · 𝐾) ∈ ℤ ∧ ((abs‘𝑀) · 𝑁) ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾) ∧ (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁)) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁))))
73	6, 71, 67, 72	syl3anc 1169	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾) ∧ (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁)) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁))))
74	57, 70, 73	mp2and 423	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁)))
75	18	nn0red 8342	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∈ ℝ)
76	18	nn0ge0d 8344	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 0 ≤ (𝐾 gcd 𝑁))
77	75, 76	absidd 10053	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘(𝐾 gcd 𝑁)) = (𝐾 gcd 𝑁))
78	77	oveq2d 5548	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((abs‘𝑀) · (abs‘(𝐾 gcd 𝑁))) = ((abs‘𝑀) · (𝐾 gcd 𝑁)))
79	2	zcnd 8470	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑀 ∈ ℂ)
80	18	nn0cnd 8343	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∈ ℂ)
81	79, 80	absmuld 10080	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘(𝑀 · (𝐾 gcd 𝑁))) = ((abs‘𝑀) · (abs‘(𝐾 gcd 𝑁))))
82		mulgcd 10405	. . . . . . . . . . . 12 ⊢ (((abs‘𝑀) ∈ ℕ₀ ∧ 𝐾 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁)) = ((abs‘𝑀) · (𝐾 gcd 𝑁)))
83	53, 1, 3, 82	syl3anc 1169	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁)) = ((abs‘𝑀) · (𝐾 gcd 𝑁)))
84	78, 81, 83	3eqtr4d 2123	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘(𝑀 · (𝐾 gcd 𝑁))) = (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁)))
85	74, 84	breqtrrd 3811	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (abs‘(𝑀 · (𝐾 gcd 𝑁))))
86	2, 19	zmulcld 8475	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 · (𝐾 gcd 𝑁)) ∈ ℤ)
87		dvdsabsb 10214	. . . . . . . . . 10 ⊢ (((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ ∧ (𝑀 · (𝐾 gcd 𝑁)) ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)) ↔ (𝐾 gcd (𝑀 · 𝑁)) ∥ (abs‘(𝑀 · (𝐾 gcd 𝑁)))))
88	6, 86, 87	syl2anc 403	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)) ↔ (𝐾 gcd (𝑀 · 𝑁)) ∥ (abs‘(𝑀 · (𝐾 gcd 𝑁)))))
89	85, 88	mpbird 165	. . . . . . . 8 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)))
90	89	adantr 270	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)))
91	26, 90	eqbrtrd 3805	. . . . . 6 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)))
92	2	adantr 270	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → 𝑀 ∈ ℤ)
93		dvdsmulcr 10225	. . . . . . 7 ⊢ ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ ((𝐾 gcd 𝑁) ∈ ℤ ∧ (𝐾 gcd 𝑁) ≠ 0)) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀))
94	47, 92, 20, 44, 93	syl112anc 1173	. . . . . 6 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀))
95	91, 94	mpbid 145	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀)
96		dvdsgcd 10401	. . . . . 6 ⊢ ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾 ∧ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ (𝐾 gcd 𝑀)))
97	47, 48, 92, 96	syl3anc 1169	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾 ∧ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ (𝐾 gcd 𝑀)))
98	51, 95, 97	mp2and 423	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ (𝐾 gcd 𝑀))
99	11	nn0zd 8467	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑀) ∈ ℤ)
100	99	adantr 270	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑀) ∈ ℤ)
101		dvdsmulc 10223	. . . . 5 ⊢ ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ ∧ (𝐾 gcd 𝑀) ∈ ℤ ∧ (𝐾 gcd 𝑁) ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ (𝐾 gcd 𝑀) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁))))
102	47, 100, 20, 101	syl3anc 1169	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ (𝐾 gcd 𝑀) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁))))
103	98, 102	mpd 13	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)))
104	26, 103	eqbrtrrd 3807	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)))
105		zdceq 8423	. . . 4 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ 0 ∈ ℤ) → DECID (𝐾 gcd 𝑁) = 0)
106	19, 22, 105	syl2anc 403	. . 3 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → DECID (𝐾 gcd 𝑁) = 0)
107		exmiddc 777	. . . 4 ⊢ (DECID (𝐾 gcd 𝑁) = 0 → ((𝐾 gcd 𝑁) = 0 ∨ ¬ (𝐾 gcd 𝑁) = 0))
108		df-ne 2246	. . . . 5 ⊢ ((𝐾 gcd 𝑁) ≠ 0 ↔ ¬ (𝐾 gcd 𝑁) = 0)
109	108	orbi2i 711	. . . 4 ⊢ (((𝐾 gcd 𝑁) = 0 ∨ (𝐾 gcd 𝑁) ≠ 0) ↔ ((𝐾 gcd 𝑁) = 0 ∨ ¬ (𝐾 gcd 𝑁) = 0))
110	107, 109	sylibr 132	. . 3 ⊢ (DECID (𝐾 gcd 𝑁) = 0 → ((𝐾 gcd 𝑁) = 0 ∨ (𝐾 gcd 𝑁) ≠ 0))
111	106, 110	syl 14	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) = 0 ∨ (𝐾 gcd 𝑁) ≠ 0))
112	15, 104, 111	mpjaodan 744	1 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 102 ↔ wb 103 ∨ wo 661 DECID wdc 775 ∧ w3a 919 = wceq 1284 ∈ wcel 1433 ≠ wne 2245 class class class wbr 3785 ‘cfv 4922 (class class class)co 5532 0cc0 6981 · cmul 6986 # cap 7681 / cdiv 7760 ℕ₀cn0 8288 ℤcz 8351 abscabs 9883 ∥ cdvds 10195 gcd cgcd 10338

This theorem was proved from axioms: ax-1 5 ax-2 6 ax-mp 7 ax-ia1 104 ax-ia2 105 ax-ia3 106 ax-in1 576 ax-in2 577 ax-io 662 ax-5 1376 ax-7 1377 ax-gen 1378 ax-ie1 1422 ax-ie2 1423 ax-8 1435 ax-10 1436 ax-11 1437 ax-i12 1438 ax-bndl 1439 ax-4 1440 ax-13 1444 ax-14 1445 ax-17 1459 ax-i9 1463 ax-ial 1467 ax-i5r 1468 ax-ext 2063 ax-coll 3893 ax-sep 3896 ax-nul 3904 ax-pow 3948 ax-pr 3964 ax-un 4188 ax-setind 4280 ax-iinf 4329 ax-cnex 7067 ax-resscn 7068 ax-1cn 7069 ax-1re 7070 ax-icn 7071 ax-addcl 7072 ax-addrcl 7073 ax-mulcl 7074 ax-mulrcl 7075 ax-addcom 7076 ax-mulcom 7077 ax-addass 7078 ax-mulass 7079 ax-distr 7080 ax-i2m1 7081 ax-0lt1 7082 ax-1rid 7083 ax-0id 7084 ax-rnegex 7085 ax-precex 7086 ax-cnre 7087 ax-pre-ltirr 7088 ax-pre-ltwlin 7089 ax-pre-lttrn 7090 ax-pre-apti 7091 ax-pre-ltadd 7092 ax-pre-mulgt0 7093 ax-pre-mulext 7094 ax-arch 7095 ax-caucvg 7096

This theorem depends on definitions: df-bi 115 df-dc 776 df-3or 920 df-3an 921 df-tru 1287 df-fal 1290 df-nf 1390 df-sb 1686 df-eu 1944 df-mo 1945 df-clab 2068 df-cleq 2074 df-clel 2077 df-nfc 2208 df-ne 2246 df-nel 2340 df-ral 2353 df-rex 2354 df-reu 2355 df-rmo 2356 df-rab 2357 df-v 2603 df-sbc 2816 df-csb 2909 df-dif 2975 df-un 2977 df-in 2979 df-ss 2986 df-nul 3252 df-if 3352 df-pw 3384 df-sn 3404 df-pr 3405 df-op 3407 df-uni 3602 df-int 3637 df-iun 3680 df-br 3786 df-opab 3840 df-mpt 3841 df-tr 3876 df-id 4048 df-po 4051 df-iso 4052 df-iord 4121 df-on 4123 df-suc 4126 df-iom 4332 df-xp 4369 df-rel 4370 df-cnv 4371 df-co 4372 df-dm 4373 df-rn 4374 df-res 4375 df-ima 4376 df-iota 4887 df-fun 4924 df-fn 4925 df-f 4926 df-f1 4927 df-fo 4928 df-f1o 4929 df-fv 4930 df-riota 5488 df-ov 5535 df-oprab 5536 df-mpt2 5537 df-1st 5787 df-2nd 5788 df-recs 5943 df-frec 6001 df-sup 6397 df-pnf 7155 df-mnf 7156 df-xr 7157 df-ltxr 7158 df-le 7159 df-sub 7281 df-neg 7282 df-reap 7675 df-ap 7682 df-div 7761 df-inn 8040 df-2 8098 df-3 8099 df-4 8100 df-n0 8289 df-z 8352 df-uz 8620 df-q 8705 df-rp 8735 df-fz 9030 df-fzo 9153 df-fl 9274 df-mod 9325 df-iseq 9432 df-iexp 9476 df-cj 9729 df-re 9730 df-im 9731 df-rsqrt 9884 df-abs 9885 df-dvds 10196 df-gcd 10339

This theorem is referenced by: rpmulgcd2 10477 rpmul 10480

W3C validator