pcgcd1 - Intuitionistic Logic Explorer

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

Theorem pcgcd1 12268

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 5858	. . . 4 ⊢ (𝐵 = 0 → (𝐴 gcd 𝐵) = (𝐴 gcd 0))
2	1	oveq2d 5866	. . 3 ⊢ (𝐵 = 0 → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt (𝐴 gcd 0)))
3		simp2 993	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐴 ∈ ℤ)
4		gcdid0 11922	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → (𝐴 gcd 0) = (abs‘𝐴))
5	3, 4	syl 14	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 gcd 0) = (abs‘𝐴))
6	5	oveq2d 5866	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt (abs‘𝐴)))
7		zq 9572	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → 𝐴 ∈ ℚ)
8		pcabs 12266	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
9	7, 8	sylan2 284	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
10	9	3adant3 1012	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
11	6, 10	eqtrd 2203	. . . 4 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
12	11	adantr 274	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
13	2, 12	sylan9eqr 2225	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 = 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
14		simpl1 995	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℙ)
15	3	adantr 274	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℤ)
16		simpl3 997	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ∈ ℤ)
17		simprr 527	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ≠ 0)
18		simpr 109	. . . . . . . . 9 ⊢ ((𝐴 = 0 ∧ 𝐵 = 0) → 𝐵 = 0)
19	18	necon3ai 2389	. . . . . . . 8 ⊢ (𝐵 ≠ 0 → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
20	17, 19	syl 14	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
21		gcdn0cl 11904	. . . . . . 7 ⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ¬ (𝐴 = 0 ∧ 𝐵 = 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
22	15, 16, 20, 21	syl21anc 1232	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
23	22	nnzd 9320	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℤ)
24		gcddvds 11905	. . . . . . 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 12267	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ ((𝐴 gcd 𝐵) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ (𝐴 gcd 𝐵) ∥ 𝐴)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
28	14, 23, 15, 26, 27	syl13anc 1235	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
29	15, 7	syl 14	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℚ)
30		pcxcl 12252	. . . . . . . . . 10 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
31	14, 29, 30	syl2anc 409	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
32		pczcl 12239	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ (𝐵 ∈ ℤ ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
33	14, 16, 17, 32	syl12anc 1231	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
34	33	nn0red 9176	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℝ)
35		pcge0 12253	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → 0 ≤ (𝑃 pCnt 𝐴))
36	14, 15, 35	syl2anc 409	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 0 ≤ (𝑃 pCnt 𝐴))
37		ge0gtmnf 9767	. . . . . . . . . 10 ⊢ (((𝑃 pCnt 𝐴) ∈ ℝ^* ∧ 0 ≤ (𝑃 pCnt 𝐴)) → -∞ < (𝑃 pCnt 𝐴))
38	31, 36, 37	syl2anc 409	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → -∞ < (𝑃 pCnt 𝐴))
39		simprl 526	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))
40		xrre 9764	. . . . . . . . 9 ⊢ ((((𝑃 pCnt 𝐴) ∈ ℝ^* ∧ (𝑃 pCnt 𝐵) ∈ ℝ) ∧ (-∞ < (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))) → (𝑃 pCnt 𝐴) ∈ ℝ)
41	31, 34, 38, 39, 40	syl22anc 1234	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ)
42		pnfnre 7948	. . . . . . . . . . . 12 ⊢ +∞ ∉ ℝ
43	42	neli 2437	. . . . . . . . . . 11 ⊢ ¬ +∞ ∈ ℝ
44		pc0 12245	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ ℙ → (𝑃 pCnt 0) = +∞)
45	14, 44	syl 14	. . . . . . . . . . . 12 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 0) = +∞)
46	45	eleq1d 2239	. . . . . . . . . . 11 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 0) ∈ ℝ ↔ +∞ ∈ ℝ))
47	43, 46	mtbiri 670	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝑃 pCnt 0) ∈ ℝ)
48		oveq2 5858	. . . . . . . . . . . 12 ⊢ (𝐴 = 0 → (𝑃 pCnt 𝐴) = (𝑃 pCnt 0))
49	48	eleq1d 2239	. . . . . . . . . . 11 ⊢ (𝐴 = 0 → ((𝑃 pCnt 𝐴) ∈ ℝ ↔ (𝑃 pCnt 0) ∈ ℝ))
50	49	notbid 662	. . . . . . . . . 10 ⊢ (𝐴 = 0 → (¬ (𝑃 pCnt 𝐴) ∈ ℝ ↔ ¬ (𝑃 pCnt 0) ∈ ℝ))
51	47, 50	syl5ibrcom 156	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 = 0 → ¬ (𝑃 pCnt 𝐴) ∈ ℝ))
52	51	necon2ad 2397	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ∈ ℝ → 𝐴 ≠ 0))
53	41, 52	mpd 13	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ≠ 0)
54		pczdvds 12254	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
55	14, 15, 53, 54	syl12anc 1231	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
56		pczcl 12239	. . . . . . . . 9 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
57	14, 15, 53, 56	syl12anc 1231	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
58		pcdvdsb 12260	. . . . . . . 8 ⊢ ((𝑃 ∈ ℙ ∧ 𝐵 ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
59	14, 16, 57, 58	syl3anc 1233	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
60	39, 59	mpbid 146	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵)
61		prmnn 12051	. . . . . . . . . 10 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
62	14, 61	syl 14	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℕ)
63	62, 57	nnexpcld 10618	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℕ)
64	63	nnzd 9320	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ)
65		dvdsgcd 11954	. . . . . . 7 ⊢ (((𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
66	64, 15, 16, 65	syl3anc 1233	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
67	55, 60, 66	mp2and 431	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵))
68		pcdvdsb 12260	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 gcd 𝐵) ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
69	14, 23, 57, 68	syl3anc 1233	. . . . 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 12241	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℕ₀)
72	71	nn0red 9176	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℝ)
73	72, 41	letri3d 8022	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴) ↔ ((𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)))))
74	28, 70, 73	mpbir2and 939	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
75	74	anassrs 398	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 ≠ 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
76		simpl3 997	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 𝐵 ∈ ℤ)
77		0zd 9211	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 0 ∈ ℤ)
78		zdceq 9274	. . . 4 ⊢ ((𝐵 ∈ ℤ ∧ 0 ∈ ℤ) → DECID 𝐵 = 0)
79	76, 77, 78	syl2anc 409	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → DECID 𝐵 = 0)
80		dcne 2351	. . 3 ⊢ (DECID 𝐵 = 0 ↔ (𝐵 = 0 ∨ 𝐵 ≠ 0))
81	79, 80	sylib 121	. 2 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝐵 = 0 ∨ 𝐵 ≠ 0))
82	13, 75, 81	mpjaodan 793	1 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 103 ↔ wb 104 ∨ wo 703 DECID wdc 829 ∧ w3a 973 = wceq 1348 ∈ wcel 2141 ≠ wne 2340 class class class wbr 3987 ‘cfv 5196 (class class class)co 5850 ℝcr 7760 0cc0 7761 +∞cpnf 7938 -∞cmnf 7939 ℝ^*cxr 7940 < clt 7941 ≤ cle 7942 ℕcn 8865 ℕ₀cn0 9122 ℤcz 9199 ℚcq 9565 ↑cexp 10462 abscabs 10948 ∥ cdvds 11736 gcd cgcd 11884 ℙcprime 12048 pCnt cpc 12225

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 609 ax-in2 610 ax-io 704 ax-5 1440 ax-7 1441 ax-gen 1442 ax-ie1 1486 ax-ie2 1487 ax-8 1497 ax-10 1498 ax-11 1499 ax-i12 1500 ax-bndl 1502 ax-4 1503 ax-17 1519 ax-i9 1523 ax-ial 1527 ax-i5r 1528 ax-13 2143 ax-14 2144 ax-ext 2152 ax-coll 4102 ax-sep 4105 ax-nul 4113 ax-pow 4158 ax-pr 4192 ax-un 4416 ax-setind 4519 ax-iinf 4570 ax-cnex 7852 ax-resscn 7853 ax-1cn 7854 ax-1re 7855 ax-icn 7856 ax-addcl 7857 ax-addrcl 7858 ax-mulcl 7859 ax-mulrcl 7860 ax-addcom 7861 ax-mulcom 7862 ax-addass 7863 ax-mulass 7864 ax-distr 7865 ax-i2m1 7866 ax-0lt1 7867 ax-1rid 7868 ax-0id 7869 ax-rnegex 7870 ax-precex 7871 ax-cnre 7872 ax-pre-ltirr 7873 ax-pre-ltwlin 7874 ax-pre-lttrn 7875 ax-pre-apti 7876 ax-pre-ltadd 7877 ax-pre-mulgt0 7878 ax-pre-mulext 7879 ax-arch 7880 ax-caucvg 7881

This theorem depends on definitions: df-bi 116 df-stab 826 df-dc 830 df-3or 974 df-3an 975 df-tru 1351 df-fal 1354 df-nf 1454 df-sb 1756 df-eu 2022 df-mo 2023 df-clab 2157 df-cleq 2163 df-clel 2166 df-nfc 2301 df-ne 2341 df-nel 2436 df-ral 2453 df-rex 2454 df-reu 2455 df-rmo 2456 df-rab 2457 df-v 2732 df-sbc 2956 df-csb 3050 df-dif 3123 df-un 3125 df-in 3127 df-ss 3134 df-nul 3415 df-if 3526 df-pw 3566 df-sn 3587 df-pr 3588 df-op 3590 df-uni 3795 df-int 3830 df-iun 3873 df-br 3988 df-opab 4049 df-mpt 4050 df-tr 4086 df-id 4276 df-po 4279 df-iso 4280 df-iord 4349 df-on 4351 df-ilim 4352 df-suc 4354 df-iom 4573 df-xp 4615 df-rel 4616 df-cnv 4617 df-co 4618 df-dm 4619 df-rn 4620 df-res 4621 df-ima 4622 df-iota 5158 df-fun 5198 df-fn 5199 df-f 5200 df-f1 5201 df-fo 5202 df-f1o 5203 df-fv 5204 df-isom 5205 df-riota 5806 df-ov 5853 df-oprab 5854 df-mpo 5855 df-1st 6116 df-2nd 6117 df-recs 6281 df-frec 6367 df-1o 6392 df-2o 6393 df-er 6509 df-en 6715 df-sup 6957 df-inf 6958 df-pnf 7943 df-mnf 7944 df-xr 7945 df-ltxr 7946 df-le 7947 df-sub 8079 df-neg 8080 df-reap 8481 df-ap 8488 df-div 8577 df-inn 8866 df-2 8924 df-3 8925 df-4 8926 df-n0 9123 df-z 9200 df-uz 9475 df-q 9566 df-rp 9598 df-fz 9953 df-fzo 10086 df-fl 10213 df-mod 10266 df-seqfrec 10389 df-exp 10463 df-cj 10793 df-re 10794 df-im 10795 df-rsqrt 10949 df-abs 10950 df-dvds 11737 df-gcd 11885 df-prm 12049 df-pc 12226

This theorem is referenced by: pcgcd 12269

W3C validator