pcgcd1 - Intuitionistic Logic Explorer

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

Theorem pcgcd1 12259

Description: The prime count of a GCD is the minimum of the prime counts of the arguments. (Contributed by Mario Carneiro, 3-Oct-2014.)

**Assertion**
Ref	Expression
pcgcd1	⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))

**Proof of Theorem pcgcd1**
Step	Hyp	Ref	Expression
1		oveq2 5850	. . . 4 ⊢ (𝐵 = 0 → (𝐴 gcd 𝐵) = (𝐴 gcd 0))
2	1	oveq2d 5858	. . 3 ⊢ (𝐵 = 0 → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt (𝐴 gcd 0)))
3		simp2 988	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐴 ∈ ℤ)
4		gcdid0 11913	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → (𝐴 gcd 0) = (abs‘𝐴))
5	3, 4	syl 14	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 gcd 0) = (abs‘𝐴))
6	5	oveq2d 5858	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt (abs‘𝐴)))
7		zq 9564	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → 𝐴 ∈ ℚ)
8		pcabs 12257	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
9	7, 8	sylan2 284	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
10	9	3adant3 1007	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
11	6, 10	eqtrd 2198	. . . 4 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
12	11	adantr 274	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
13	2, 12	sylan9eqr 2221	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 = 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
14		simpl1 990	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℙ)
15	3	adantr 274	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℤ)
16		simpl3 992	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ∈ ℤ)
17		simprr 522	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ≠ 0)
18		simpr 109	. . . . . . . . 9 ⊢ ((𝐴 = 0 ∧ 𝐵 = 0) → 𝐵 = 0)
19	18	necon3ai 2385	. . . . . . . 8 ⊢ (𝐵 ≠ 0 → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
20	17, 19	syl 14	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
21		gcdn0cl 11895	. . . . . . 7 ⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ¬ (𝐴 = 0 ∧ 𝐵 = 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
22	15, 16, 20, 21	syl21anc 1227	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
23	22	nnzd 9312	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℤ)
24		gcddvds 11896	. . . . . . 7 ⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → ((𝐴 gcd 𝐵) ∥ 𝐴 ∧ (𝐴 gcd 𝐵) ∥ 𝐵))
25	15, 16, 24	syl2anc 409	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝐴 gcd 𝐵) ∥ 𝐴 ∧ (𝐴 gcd 𝐵) ∥ 𝐵))
26	25	simpld 111	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∥ 𝐴)
27		pcdvdstr 12258	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ ((𝐴 gcd 𝐵) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ (𝐴 gcd 𝐵) ∥ 𝐴)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
28	14, 23, 15, 26, 27	syl13anc 1230	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
29	15, 7	syl 14	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℚ)
30		pcxcl 12243	. . . . . . . . . 10 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
31	14, 29, 30	syl2anc 409	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
32		pczcl 12230	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ (𝐵 ∈ ℤ ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
33	14, 16, 17, 32	syl12anc 1226	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
34	33	nn0red 9168	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℝ)
35		pcge0 12244	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → 0 ≤ (𝑃 pCnt 𝐴))
36	14, 15, 35	syl2anc 409	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 0 ≤ (𝑃 pCnt 𝐴))
37		ge0gtmnf 9759	. . . . . . . . . 10 ⊢ (((𝑃 pCnt 𝐴) ∈ ℝ^* ∧ 0 ≤ (𝑃 pCnt 𝐴)) → -∞ < (𝑃 pCnt 𝐴))
38	31, 36, 37	syl2anc 409	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → -∞ < (𝑃 pCnt 𝐴))
39		simprl 521	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))
40		xrre 9756	. . . . . . . . 9 ⊢ ((((𝑃 pCnt 𝐴) ∈ ℝ^* ∧ (𝑃 pCnt 𝐵) ∈ ℝ) ∧ (-∞ < (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))) → (𝑃 pCnt 𝐴) ∈ ℝ)
41	31, 34, 38, 39, 40	syl22anc 1229	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ)
42		pnfnre 7940	. . . . . . . . . . . 12 ⊢ +∞ ∉ ℝ
43	42	neli 2433	. . . . . . . . . . 11 ⊢ ¬ +∞ ∈ ℝ
44		pc0 12236	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ ℙ → (𝑃 pCnt 0) = +∞)
45	14, 44	syl 14	. . . . . . . . . . . 12 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 0) = +∞)
46	45	eleq1d 2235	. . . . . . . . . . 11 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 0) ∈ ℝ ↔ +∞ ∈ ℝ))
47	43, 46	mtbiri 665	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝑃 pCnt 0) ∈ ℝ)
48		oveq2 5850	. . . . . . . . . . . 12 ⊢ (𝐴 = 0 → (𝑃 pCnt 𝐴) = (𝑃 pCnt 0))
49	48	eleq1d 2235	. . . . . . . . . . 11 ⊢ (𝐴 = 0 → ((𝑃 pCnt 𝐴) ∈ ℝ ↔ (𝑃 pCnt 0) ∈ ℝ))
50	49	notbid 657	. . . . . . . . . 10 ⊢ (𝐴 = 0 → (¬ (𝑃 pCnt 𝐴) ∈ ℝ ↔ ¬ (𝑃 pCnt 0) ∈ ℝ))
51	47, 50	syl5ibrcom 156	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 = 0 → ¬ (𝑃 pCnt 𝐴) ∈ ℝ))
52	51	necon2ad 2393	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ∈ ℝ → 𝐴 ≠ 0))
53	41, 52	mpd 13	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ≠ 0)
54		pczdvds 12245	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
55	14, 15, 53, 54	syl12anc 1226	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
56		pczcl 12230	. . . . . . . . 9 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
57	14, 15, 53, 56	syl12anc 1226	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
58		pcdvdsb 12251	. . . . . . . 8 ⊢ ((𝑃 ∈ ℙ ∧ 𝐵 ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
59	14, 16, 57, 58	syl3anc 1228	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
60	39, 59	mpbid 146	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵)
61		prmnn 12042	. . . . . . . . . 10 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
62	14, 61	syl 14	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℕ)
63	62, 57	nnexpcld 10610	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℕ)
64	63	nnzd 9312	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ)
65		dvdsgcd 11945	. . . . . . 7 ⊢ (((𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
66	64, 15, 16, 65	syl3anc 1228	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
67	55, 60, 66	mp2and 430	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵))
68		pcdvdsb 12251	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 gcd 𝐵) ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
69	14, 23, 57, 68	syl3anc 1228	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
70	67, 69	mpbird 166	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)))
71	14, 22	pccld 12232	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℕ₀)
72	71	nn0red 9168	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℝ)
73	72, 41	letri3d 8014	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴) ↔ ((𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)))))
74	28, 70, 73	mpbir2and 934	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
75	74	anassrs 398	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 ≠ 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
76		simpl3 992	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 𝐵 ∈ ℤ)
77		0zd 9203	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 0 ∈ ℤ)
78		zdceq 9266	. . . 4 ⊢ ((𝐵 ∈ ℤ ∧ 0 ∈ ℤ) → DECID 𝐵 = 0)
79	76, 77, 78	syl2anc 409	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → DECID 𝐵 = 0)
80		dcne 2347	. . 3 ⊢ (DECID 𝐵 = 0 ↔ (𝐵 = 0 ∨ 𝐵 ≠ 0))
81	79, 80	sylib 121	. 2 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝐵 = 0 ∨ 𝐵 ≠ 0))
82	13, 75, 81	mpjaodan 788	1 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 103 ↔ wb 104 ∨ wo 698 DECID wdc 824 ∧ w3a 968 = wceq 1343 ∈ wcel 2136 ≠ wne 2336 class class class wbr 3982 ‘cfv 5188 (class class class)co 5842 ℝcr 7752 0cc0 7753 +∞cpnf 7930 -∞cmnf 7931 ℝ^*cxr 7932 < clt 7933 ≤ cle 7934 ℕcn 8857 ℕ₀cn0 9114 ℤcz 9191 ℚcq 9557 ↑cexp 10454 abscabs 10939 ∥ cdvds 11727 gcd cgcd 11875 ℙcprime 12039 pCnt cpc 12216

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 1435 ax-7 1436 ax-gen 1437 ax-ie1 1481 ax-ie2 1482 ax-8 1492 ax-10 1493 ax-11 1494 ax-i12 1495 ax-bndl 1497 ax-4 1498 ax-17 1514 ax-i9 1518 ax-ial 1522 ax-i5r 1523 ax-13 2138 ax-14 2139 ax-ext 2147 ax-coll 4097 ax-sep 4100 ax-nul 4108 ax-pow 4153 ax-pr 4187 ax-un 4411 ax-setind 4514 ax-iinf 4565 ax-cnex 7844 ax-resscn 7845 ax-1cn 7846 ax-1re 7847 ax-icn 7848 ax-addcl 7849 ax-addrcl 7850 ax-mulcl 7851 ax-mulrcl 7852 ax-addcom 7853 ax-mulcom 7854 ax-addass 7855 ax-mulass 7856 ax-distr 7857 ax-i2m1 7858 ax-0lt1 7859 ax-1rid 7860 ax-0id 7861 ax-rnegex 7862 ax-precex 7863 ax-cnre 7864 ax-pre-ltirr 7865 ax-pre-ltwlin 7866 ax-pre-lttrn 7867 ax-pre-apti 7868 ax-pre-ltadd 7869 ax-pre-mulgt0 7870 ax-pre-mulext 7871 ax-arch 7872 ax-caucvg 7873

This theorem depends on definitions: df-bi 116 df-stab 821 df-dc 825 df-3or 969 df-3an 970 df-tru 1346 df-fal 1349 df-nf 1449 df-sb 1751 df-eu 2017 df-mo 2018 df-clab 2152 df-cleq 2158 df-clel 2161 df-nfc 2297 df-ne 2337 df-nel 2432 df-ral 2449 df-rex 2450 df-reu 2451 df-rmo 2452 df-rab 2453 df-v 2728 df-sbc 2952 df-csb 3046 df-dif 3118 df-un 3120 df-in 3122 df-ss 3129 df-nul 3410 df-if 3521 df-pw 3561 df-sn 3582 df-pr 3583 df-op 3585 df-uni 3790 df-int 3825 df-iun 3868 df-br 3983 df-opab 4044 df-mpt 4045 df-tr 4081 df-id 4271 df-po 4274 df-iso 4275 df-iord 4344 df-on 4346 df-ilim 4347 df-suc 4349 df-iom 4568 df-xp 4610 df-rel 4611 df-cnv 4612 df-co 4613 df-dm 4614 df-rn 4615 df-res 4616 df-ima 4617 df-iota 5153 df-fun 5190 df-fn 5191 df-f 5192 df-f1 5193 df-fo 5194 df-f1o 5195 df-fv 5196 df-isom 5197 df-riota 5798 df-ov 5845 df-oprab 5846 df-mpo 5847 df-1st 6108 df-2nd 6109 df-recs 6273 df-frec 6359 df-1o 6384 df-2o 6385 df-er 6501 df-en 6707 df-sup 6949 df-inf 6950 df-pnf 7935 df-mnf 7936 df-xr 7937 df-ltxr 7938 df-le 7939 df-sub 8071 df-neg 8072 df-reap 8473 df-ap 8480 df-div 8569 df-inn 8858 df-2 8916 df-3 8917 df-4 8918 df-n0 9115 df-z 9192 df-uz 9467 df-q 9558 df-rp 9590 df-fz 9945 df-fzo 10078 df-fl 10205 df-mod 10258 df-seqfrec 10381 df-exp 10455 df-cj 10784 df-re 10785 df-im 10786 df-rsqrt 10940 df-abs 10941 df-dvds 11728 df-gcd 11876 df-prm 12040 df-pc 12217

This theorem is referenced by: pcgcd 12260

W3C validator