mulgcddvds - Intuitionistic Logic Explorer

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

Theorem mulgcddvds 11811

Description: One half of rpmulgcd2 11812, 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 982	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝐾 ∈ ℤ)
2		simp2 983	. . . . . . . 8 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑀 ∈ ℤ)
3		simp3 984	. . . . . . . 8 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑁 ∈ ℤ)
4	2, 3	zmulcld 9203	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 · 𝑁) ∈ ℤ)
5	1, 4	gcdcld 11693	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∈ ℕ₀)
6	5	nn0zd 9195	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ)
7		dvds0 11544	. . . . 5 ⊢ ((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ → (𝐾 gcd (𝑀 · 𝑁)) ∥ 0)
8	6, 7	syl 14	. . . 4 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ 0)
9	8	adantr 274	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) = 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ 0)
10		oveq2 5790	. . . 4 ⊢ ((𝐾 gcd 𝑁) = 0 → ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)) = ((𝐾 gcd 𝑀) · 0))
11	1, 2	gcdcld 11693	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑀) ∈ ℕ₀)
12	11	nn0cnd 9056	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑀) ∈ ℂ)
13	12	mul01d 8179	. . . 4 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑀) · 0) = 0)
14	10, 13	sylan9eqr 2195	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) = 0) → ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)) = 0)
15	9, 14	breqtrrd 3964	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) = 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)))
16	6	adantr 274	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ)
17	16	zcnd 9198	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∈ ℂ)
18	1, 3	gcdcld 11693	. . . . . . 7 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∈ ℕ₀)
19	18	nn0zd 9195	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∈ ℤ)
20	19	adantr 274	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) ∈ ℤ)
21	20	zcnd 9198	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) ∈ ℂ)
22		0zd 9090	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 0 ∈ ℤ)
23		zapne 9149	. . . . . 6 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ 0 ∈ ℤ) → ((𝐾 gcd 𝑁) # 0 ↔ (𝐾 gcd 𝑁) ≠ 0))
24	19, 22, 23	syl2anc 409	. . . . 5 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) # 0 ↔ (𝐾 gcd 𝑁) ≠ 0))
25	24	biimpar 295	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) # 0)
26	17, 21, 25	divcanap1d 8575	. . 3 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) = (𝐾 gcd (𝑀 · 𝑁)))
27		gcddvds 11688	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ (𝑀 · 𝑁) ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾 ∧ (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁)))
28	1, 4, 27	syl2anc 409	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾 ∧ (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁)))
29	28	simpld 111	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾)
30	6, 1, 19, 29	dvdsmultr1d 11568	. . . . . . . 8 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)))
31	30	adantr 274	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)))
32	26, 31	eqbrtrd 3958	. . . . . 6 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)))
33		gcddvds 11688	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ 𝐾 ∧ (𝐾 gcd 𝑁) ∥ 𝑁))
34	1, 3, 33	syl2anc 409	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ 𝐾 ∧ (𝐾 gcd 𝑁) ∥ 𝑁))
35	34	simpld 111	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∥ 𝐾)
36	34	simprd 113	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∥ 𝑁)
37		dvdsmultr2 11569	. . . . . . . . . . . 12 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ 𝑁 → (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁)))
38	19, 2, 3, 37	syl3anc 1217	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ 𝑁 → (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁)))
39	36, 38	mpd 13	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁))
40		dvdsgcd 11736	. . . . . . . . . . 11 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ (𝑀 · 𝑁) ∈ ℤ) → (((𝐾 gcd 𝑁) ∥ 𝐾 ∧ (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁)) → (𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁))))
41	19, 1, 4, 40	syl3anc 1217	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝐾 gcd 𝑁) ∥ 𝐾 ∧ (𝐾 gcd 𝑁) ∥ (𝑀 · 𝑁)) → (𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁))))
42	35, 39, 41	mp2and 430	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁)))
43	42	adantr 274	. . . . . . . 8 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁)))
44		simpr 109	. . . . . . . . 9 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑁) ≠ 0)
45		dvdsval2 11532	. . . . . . . . 9 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ (𝐾 gcd 𝑁) ≠ 0 ∧ (𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ) → ((𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ))
46	20, 44, 16, 45	syl3anc 1217	. . . . . . . 8 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd 𝑁) ∥ (𝐾 gcd (𝑀 · 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ))
47	43, 46	mpbid 146	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ)
48	1	adantr 274	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → 𝐾 ∈ ℤ)
49		dvdsmulcr 11559	. . . . . . 7 ⊢ ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ ((𝐾 gcd 𝑁) ∈ ℤ ∧ (𝐾 gcd 𝑁) ≠ 0)) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾))
50	47, 48, 20, 44, 49	syl112anc 1221	. . . . . 6 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝐾 · (𝐾 gcd 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾))
51	32, 50	mpbid 146	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾)
52		nn0abscl 10889	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℤ → (abs‘𝑀) ∈ ℕ₀)
53	2, 52	syl 14	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘𝑀) ∈ ℕ₀)
54	53	nn0zd 9195	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘𝑀) ∈ ℤ)
55		dvdsmultr2 11569	. . . . . . . . . . . . 13 ⊢ (((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ ∧ (abs‘𝑀) ∈ ℤ ∧ 𝐾 ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾 → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾)))
56	6, 54, 1, 55	syl3anc 1217	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ 𝐾 → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾)))
57	29, 56	mpd 13	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾))
58	28	simprd 113	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁))
59		iddvds 11542	. . . . . . . . . . . . . . 15 ⊢ (𝑀 ∈ ℤ → 𝑀 ∥ 𝑀)
60	2, 59	syl 14	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑀 ∥ 𝑀)
61		dvdsabsb 11548	. . . . . . . . . . . . . . 15 ⊢ ((𝑀 ∈ ℤ ∧ 𝑀 ∈ ℤ) → (𝑀 ∥ 𝑀 ↔ 𝑀 ∥ (abs‘𝑀)))
62	2, 2, 61	syl2anc 409	. . . . . . . . . . . . . 14 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∥ 𝑀 ↔ 𝑀 ∥ (abs‘𝑀)))
63	60, 62	mpbid 146	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑀 ∥ (abs‘𝑀))
64		dvdsmulc 11557	. . . . . . . . . . . . . 14 ⊢ ((𝑀 ∈ ℤ ∧ (abs‘𝑀) ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∥ (abs‘𝑀) → (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁)))
65	2, 54, 3, 64	syl3anc 1217	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 ∥ (abs‘𝑀) → (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁)))
66	63, 65	mpd 13	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁))
67	54, 3	zmulcld 9203	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((abs‘𝑀) · 𝑁) ∈ ℤ)
68		dvdstr 11566	. . . . . . . . . . . . 13 ⊢ (((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ ∧ (𝑀 · 𝑁) ∈ ℤ ∧ ((abs‘𝑀) · 𝑁) ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁) ∧ (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁)) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁)))
69	6, 4, 67, 68	syl3anc 1217	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · 𝑁) ∧ (𝑀 · 𝑁) ∥ ((abs‘𝑀) · 𝑁)) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁)))
70	58, 66, 69	mp2and 430	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁))
71	54, 1	zmulcld 9203	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((abs‘𝑀) · 𝐾) ∈ ℤ)
72		dvdsgcd 11736	. . . . . . . . . . . 12 ⊢ (((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ ∧ ((abs‘𝑀) · 𝐾) ∈ ℤ ∧ ((abs‘𝑀) · 𝑁) ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾) ∧ (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁)) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁))))
73	6, 71, 67, 72	syl3anc 1217	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝐾) ∧ (𝐾 gcd (𝑀 · 𝑁)) ∥ ((abs‘𝑀) · 𝑁)) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁))))
74	57, 70, 73	mp2and 430	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁)))
75	18	nn0red 9055	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∈ ℝ)
76	18	nn0ge0d 9057	. . . . . . . . . . . . 13 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 0 ≤ (𝐾 gcd 𝑁))
77	75, 76	absidd 10971	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘(𝐾 gcd 𝑁)) = (𝐾 gcd 𝑁))
78	77	oveq2d 5798	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((abs‘𝑀) · (abs‘(𝐾 gcd 𝑁))) = ((abs‘𝑀) · (𝐾 gcd 𝑁)))
79	2	zcnd 9198	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → 𝑀 ∈ ℂ)
80	18	nn0cnd 9056	. . . . . . . . . . . 12 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑁) ∈ ℂ)
81	79, 80	absmuld 10998	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘(𝑀 · (𝐾 gcd 𝑁))) = ((abs‘𝑀) · (abs‘(𝐾 gcd 𝑁))))
82		mulgcd 11740	. . . . . . . . . . . 12 ⊢ (((abs‘𝑀) ∈ ℕ₀ ∧ 𝐾 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁)) = ((abs‘𝑀) · (𝐾 gcd 𝑁)))
83	53, 1, 3, 82	syl3anc 1217	. . . . . . . . . . 11 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁)) = ((abs‘𝑀) · (𝐾 gcd 𝑁)))
84	78, 81, 83	3eqtr4d 2183	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (abs‘(𝑀 · (𝐾 gcd 𝑁))) = (((abs‘𝑀) · 𝐾) gcd ((abs‘𝑀) · 𝑁)))
85	74, 84	breqtrrd 3964	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (abs‘(𝑀 · (𝐾 gcd 𝑁))))
86	2, 19	zmulcld 9203	. . . . . . . . . 10 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝑀 · (𝐾 gcd 𝑁)) ∈ ℤ)
87		dvdsabsb 11548	. . . . . . . . . 10 ⊢ (((𝐾 gcd (𝑀 · 𝑁)) ∈ ℤ ∧ (𝑀 · (𝐾 gcd 𝑁)) ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)) ↔ (𝐾 gcd (𝑀 · 𝑁)) ∥ (abs‘(𝑀 · (𝐾 gcd 𝑁)))))
88	6, 86, 87	syl2anc 409	. . . . . . . . 9 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)) ↔ (𝐾 gcd (𝑀 · 𝑁)) ∥ (abs‘(𝑀 · (𝐾 gcd 𝑁)))))
89	85, 88	mpbird 166	. . . . . . . 8 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)))
90	89	adantr 274	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)))
91	26, 90	eqbrtrd 3958	. . . . . 6 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)))
92	2	adantr 274	. . . . . . 7 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → 𝑀 ∈ ℤ)
93		dvdsmulcr 11559	. . . . . . 7 ⊢ ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ ((𝐾 gcd 𝑁) ∈ ℤ ∧ (𝐾 gcd 𝑁) ≠ 0)) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀))
94	47, 92, 20, 44, 93	syl112anc 1221	. . . . . 6 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ (𝑀 · (𝐾 gcd 𝑁)) ↔ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀))
95	91, 94	mpbid 146	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀)
96		dvdsgcd 11736	. . . . . 6 ⊢ ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾 ∧ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ (𝐾 gcd 𝑀)))
97	47, 48, 92, 96	syl3anc 1217	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝐾 ∧ ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ 𝑀) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ (𝐾 gcd 𝑀)))
98	51, 95, 97	mp2and 430	. . . 4 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → ((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ (𝐾 gcd 𝑀))
99	11	nn0zd 9195	. . . . . 6 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd 𝑀) ∈ ℤ)
100	99	adantr 274	. . . . 5 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd 𝑀) ∈ ℤ)
101		dvdsmulc 11557	. . . . 5 ⊢ ((((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∈ ℤ ∧ (𝐾 gcd 𝑀) ∈ ℤ ∧ (𝐾 gcd 𝑁) ∈ ℤ) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) ∥ (𝐾 gcd 𝑀) → (((𝐾 gcd (𝑀 · 𝑁)) / (𝐾 gcd 𝑁)) · (𝐾 gcd 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁))))
102	47, 100, 20, 101	syl3anc 1217	. . . 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 3960	. 2 ⊢ (((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) ∧ (𝐾 gcd 𝑁) ≠ 0) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)))
105		zdceq 9150	. . . 4 ⊢ (((𝐾 gcd 𝑁) ∈ ℤ ∧ 0 ∈ ℤ) → DECID (𝐾 gcd 𝑁) = 0)
106	19, 22, 105	syl2anc 409	. . 3 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → DECID (𝐾 gcd 𝑁) = 0)
107		exmiddc 822	. . . 4 ⊢ (DECID (𝐾 gcd 𝑁) = 0 → ((𝐾 gcd 𝑁) = 0 ∨ ¬ (𝐾 gcd 𝑁) = 0))
108		df-ne 2310	. . . . 5 ⊢ ((𝐾 gcd 𝑁) ≠ 0 ↔ ¬ (𝐾 gcd 𝑁) = 0)
109	108	orbi2i 752	. . . 4 ⊢ (((𝐾 gcd 𝑁) = 0 ∨ (𝐾 gcd 𝑁) ≠ 0) ↔ ((𝐾 gcd 𝑁) = 0 ∨ ¬ (𝐾 gcd 𝑁) = 0))
110	107, 109	sylibr 133	. . 3 ⊢ (DECID (𝐾 gcd 𝑁) = 0 → ((𝐾 gcd 𝑁) = 0 ∨ (𝐾 gcd 𝑁) ≠ 0))
111	106, 110	syl 14	. 2 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝐾 gcd 𝑁) = 0 ∨ (𝐾 gcd 𝑁) ≠ 0))
112	15, 104, 111	mpjaodan 788	1 ⊢ ((𝐾 ∈ ℤ ∧ 𝑀 ∈ ℤ ∧ 𝑁 ∈ ℤ) → (𝐾 gcd (𝑀 · 𝑁)) ∥ ((𝐾 gcd 𝑀) · (𝐾 gcd 𝑁)))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 103 ↔ wb 104 ∨ wo 698 DECID wdc 820 ∧ w3a 963 = wceq 1332 ∈ wcel 1481 ≠ wne 2309 class class class wbr 3937 ‘cfv 5131 (class class class)co 5782 0cc0 7644 · cmul 7649 # cap 8367 / cdiv 8456 ℕ₀cn0 9001 ℤcz 9078 abscabs 10801 ∥ cdvds 11529 gcd cgcd 11671

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-ia1 105 ax-ia2 106 ax-ia3 107 ax-in1 604 ax-in2 605 ax-io 699 ax-5 1424 ax-7 1425 ax-gen 1426 ax-ie1 1470 ax-ie2 1471 ax-8 1483 ax-10 1484 ax-11 1485 ax-i12 1486 ax-bndl 1487 ax-4 1488 ax-13 1492 ax-14 1493 ax-17 1507 ax-i9 1511 ax-ial 1515 ax-i5r 1516 ax-ext 2122 ax-coll 4051 ax-sep 4054 ax-nul 4062 ax-pow 4106 ax-pr 4139 ax-un 4363 ax-setind 4460 ax-iinf 4510 ax-cnex 7735 ax-resscn 7736 ax-1cn 7737 ax-1re 7738 ax-icn 7739 ax-addcl 7740 ax-addrcl 7741 ax-mulcl 7742 ax-mulrcl 7743 ax-addcom 7744 ax-mulcom 7745 ax-addass 7746 ax-mulass 7747 ax-distr 7748 ax-i2m1 7749 ax-0lt1 7750 ax-1rid 7751 ax-0id 7752 ax-rnegex 7753 ax-precex 7754 ax-cnre 7755 ax-pre-ltirr 7756 ax-pre-ltwlin 7757 ax-pre-lttrn 7758 ax-pre-apti 7759 ax-pre-ltadd 7760 ax-pre-mulgt0 7761 ax-pre-mulext 7762 ax-arch 7763 ax-caucvg 7764

This theorem depends on definitions: df-bi 116 df-dc 821 df-3or 964 df-3an 965 df-tru 1335 df-fal 1338 df-nf 1438 df-sb 1737 df-eu 2003 df-mo 2004 df-clab 2127 df-cleq 2133 df-clel 2136 df-nfc 2271 df-ne 2310 df-nel 2405 df-ral 2422 df-rex 2423 df-reu 2424 df-rmo 2425 df-rab 2426 df-v 2691 df-sbc 2914 df-csb 3008 df-dif 3078 df-un 3080 df-in 3082 df-ss 3089 df-nul 3369 df-if 3480 df-pw 3517 df-sn 3538 df-pr 3539 df-op 3541 df-uni 3745 df-int 3780 df-iun 3823 df-br 3938 df-opab 3998 df-mpt 3999 df-tr 4035 df-id 4223 df-po 4226 df-iso 4227 df-iord 4296 df-on 4298 df-ilim 4299 df-suc 4301 df-iom 4513 df-xp 4553 df-rel 4554 df-cnv 4555 df-co 4556 df-dm 4557 df-rn 4558 df-res 4559 df-ima 4560 df-iota 5096 df-fun 5133 df-fn 5134 df-f 5135 df-f1 5136 df-fo 5137 df-f1o 5138 df-fv 5139 df-riota 5738 df-ov 5785 df-oprab 5786 df-mpo 5787 df-1st 6046 df-2nd 6047 df-recs 6210 df-frec 6296 df-sup 6879 df-pnf 7826 df-mnf 7827 df-xr 7828 df-ltxr 7829 df-le 7830 df-sub 7959 df-neg 7960 df-reap 8361 df-ap 8368 df-div 8457 df-inn 8745 df-2 8803 df-3 8804 df-4 8805 df-n0 9002 df-z 9079 df-uz 9351 df-q 9439 df-rp 9471 df-fz 9822 df-fzo 9951 df-fl 10074 df-mod 10127 df-seqfrec 10250 df-exp 10324 df-cj 10646 df-re 10647 df-im 10648 df-rsqrt 10802 df-abs 10803 df-dvds 11530 df-gcd 11672

This theorem is referenced by: rpmulgcd2 11812 rpmul 11815

W3C validator