pcgcd1 - Intuitionistic Logic Explorer

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

Theorem pcgcd1 12236

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 5844	. . . 4 ⊢ (𝐵 = 0 → (𝐴 gcd 𝐵) = (𝐴 gcd 0))
2	1	oveq2d 5852	. . 3 ⊢ (𝐵 = 0 → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt (𝐴 gcd 0)))
3		simp2 987	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐴 ∈ ℤ)
4		gcdid0 11898	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → (𝐴 gcd 0) = (abs‘𝐴))
5	3, 4	syl 14	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 gcd 0) = (abs‘𝐴))
6	5	oveq2d 5852	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt (abs‘𝐴)))
7		zq 9555	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → 𝐴 ∈ ℚ)
8		pcabs 12234	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
9	7, 8	sylan2 284	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
10	9	3adant3 1006	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
11	6, 10	eqtrd 2197	. . . 4 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
12	11	adantr 274	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
13	2, 12	sylan9eqr 2219	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 = 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
14		simpl1 989	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℙ)
15	3	adantr 274	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℤ)
16		simpl3 991	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ∈ ℤ)
17		simprr 522	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ≠ 0)
18		simpr 109	. . . . . . . . 9 ⊢ ((𝐴 = 0 ∧ 𝐵 = 0) → 𝐵 = 0)
19	18	necon3ai 2383	. . . . . . . 8 ⊢ (𝐵 ≠ 0 → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
20	17, 19	syl 14	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
21		gcdn0cl 11880	. . . . . . 7 ⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ¬ (𝐴 = 0 ∧ 𝐵 = 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
22	15, 16, 20, 21	syl21anc 1226	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
23	22	nnzd 9303	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℤ)
24		gcddvds 11881	. . . . . . 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 12235	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ ((𝐴 gcd 𝐵) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ (𝐴 gcd 𝐵) ∥ 𝐴)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
28	14, 23, 15, 26, 27	syl13anc 1229	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
29	15, 7	syl 14	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℚ)
30		pcxcl 12220	. . . . . . . . . 10 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
31	14, 29, 30	syl2anc 409	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
32		pczcl 12207	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ (𝐵 ∈ ℤ ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
33	14, 16, 17, 32	syl12anc 1225	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
34	33	nn0red 9159	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℝ)
35		pcge0 12221	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → 0 ≤ (𝑃 pCnt 𝐴))
36	14, 15, 35	syl2anc 409	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 0 ≤ (𝑃 pCnt 𝐴))
37		ge0gtmnf 9750	. . . . . . . . . 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 9747	. . . . . . . . 9 ⊢ ((((𝑃 pCnt 𝐴) ∈ ℝ^* ∧ (𝑃 pCnt 𝐵) ∈ ℝ) ∧ (-∞ < (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))) → (𝑃 pCnt 𝐴) ∈ ℝ)
41	31, 34, 38, 39, 40	syl22anc 1228	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ)
42		pnfnre 7931	. . . . . . . . . . . 12 ⊢ +∞ ∉ ℝ
43	42	neli 2431	. . . . . . . . . . 11 ⊢ ¬ +∞ ∈ ℝ
44		pc0 12213	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ ℙ → (𝑃 pCnt 0) = +∞)
45	14, 44	syl 14	. . . . . . . . . . . 12 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 0) = +∞)
46	45	eleq1d 2233	. . . . . . . . . . 11 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 0) ∈ ℝ ↔ +∞ ∈ ℝ))
47	43, 46	mtbiri 665	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝑃 pCnt 0) ∈ ℝ)
48		oveq2 5844	. . . . . . . . . . . 12 ⊢ (𝐴 = 0 → (𝑃 pCnt 𝐴) = (𝑃 pCnt 0))
49	48	eleq1d 2233	. . . . . . . . . . 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 2391	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ∈ ℝ → 𝐴 ≠ 0))
53	41, 52	mpd 13	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ≠ 0)
54		pczdvds 12222	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
55	14, 15, 53, 54	syl12anc 1225	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
56		pczcl 12207	. . . . . . . . 9 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
57	14, 15, 53, 56	syl12anc 1225	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
58		pcdvdsb 12228	. . . . . . . 8 ⊢ ((𝑃 ∈ ℙ ∧ 𝐵 ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
59	14, 16, 57, 58	syl3anc 1227	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
60	39, 59	mpbid 146	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵)
61		prmnn 12021	. . . . . . . . . 10 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
62	14, 61	syl 14	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℕ)
63	62, 57	nnexpcld 10599	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℕ)
64	63	nnzd 9303	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ)
65		dvdsgcd 11930	. . . . . . 7 ⊢ (((𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
66	64, 15, 16, 65	syl3anc 1227	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
67	55, 60, 66	mp2and 430	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵))
68		pcdvdsb 12228	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 gcd 𝐵) ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
69	14, 23, 57, 68	syl3anc 1227	. . . . 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 12209	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℕ₀)
72	71	nn0red 9159	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℝ)
73	72, 41	letri3d 8005	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴) ↔ ((𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)))))
74	28, 70, 73	mpbir2and 933	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
75	74	anassrs 398	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 ≠ 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
76		simpl3 991	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 𝐵 ∈ ℤ)
77		0zd 9194	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 0 ∈ ℤ)
78		zdceq 9257	. . . 4 ⊢ ((𝐵 ∈ ℤ ∧ 0 ∈ ℤ) → DECID 𝐵 = 0)
79	76, 77, 78	syl2anc 409	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → DECID 𝐵 = 0)
80		dcne 2345	. . 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 967 = wceq 1342 ∈ wcel 2135 ≠ wne 2334 class class class wbr 3976 ‘cfv 5182 (class class class)co 5836 ℝcr 7743 0cc0 7744 +∞cpnf 7921 -∞cmnf 7922 ℝ^*cxr 7923 < clt 7924 ≤ cle 7925 ℕcn 8848 ℕ₀cn0 9105 ℤcz 9182 ℚcq 9548 ↑cexp 10444 abscabs 10925 ∥ cdvds 11713 gcd cgcd 11860 ℙcprime 12018 pCnt cpc 12193

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 1434 ax-7 1435 ax-gen 1436 ax-ie1 1480 ax-ie2 1481 ax-8 1491 ax-10 1492 ax-11 1493 ax-i12 1494 ax-bndl 1496 ax-4 1497 ax-17 1513 ax-i9 1517 ax-ial 1521 ax-i5r 1522 ax-13 2137 ax-14 2138 ax-ext 2146 ax-coll 4091 ax-sep 4094 ax-nul 4102 ax-pow 4147 ax-pr 4181 ax-un 4405 ax-setind 4508 ax-iinf 4559 ax-cnex 7835 ax-resscn 7836 ax-1cn 7837 ax-1re 7838 ax-icn 7839 ax-addcl 7840 ax-addrcl 7841 ax-mulcl 7842 ax-mulrcl 7843 ax-addcom 7844 ax-mulcom 7845 ax-addass 7846 ax-mulass 7847 ax-distr 7848 ax-i2m1 7849 ax-0lt1 7850 ax-1rid 7851 ax-0id 7852 ax-rnegex 7853 ax-precex 7854 ax-cnre 7855 ax-pre-ltirr 7856 ax-pre-ltwlin 7857 ax-pre-lttrn 7858 ax-pre-apti 7859 ax-pre-ltadd 7860 ax-pre-mulgt0 7861 ax-pre-mulext 7862 ax-arch 7863 ax-caucvg 7864

This theorem depends on definitions: df-bi 116 df-stab 821 df-dc 825 df-3or 968 df-3an 969 df-tru 1345 df-fal 1348 df-nf 1448 df-sb 1750 df-eu 2016 df-mo 2017 df-clab 2151 df-cleq 2157 df-clel 2160 df-nfc 2295 df-ne 2335 df-nel 2430 df-ral 2447 df-rex 2448 df-reu 2449 df-rmo 2450 df-rab 2451 df-v 2723 df-sbc 2947 df-csb 3041 df-dif 3113 df-un 3115 df-in 3117 df-ss 3124 df-nul 3405 df-if 3516 df-pw 3555 df-sn 3576 df-pr 3577 df-op 3579 df-uni 3784 df-int 3819 df-iun 3862 df-br 3977 df-opab 4038 df-mpt 4039 df-tr 4075 df-id 4265 df-po 4268 df-iso 4269 df-iord 4338 df-on 4340 df-ilim 4341 df-suc 4343 df-iom 4562 df-xp 4604 df-rel 4605 df-cnv 4606 df-co 4607 df-dm 4608 df-rn 4609 df-res 4610 df-ima 4611 df-iota 5147 df-fun 5184 df-fn 5185 df-f 5186 df-f1 5187 df-fo 5188 df-f1o 5189 df-fv 5190 df-isom 5191 df-riota 5792 df-ov 5839 df-oprab 5840 df-mpo 5841 df-1st 6100 df-2nd 6101 df-recs 6264 df-frec 6350 df-1o 6375 df-2o 6376 df-er 6492 df-en 6698 df-sup 6940 df-inf 6941 df-pnf 7926 df-mnf 7927 df-xr 7928 df-ltxr 7929 df-le 7930 df-sub 8062 df-neg 8063 df-reap 8464 df-ap 8471 df-div 8560 df-inn 8849 df-2 8907 df-3 8908 df-4 8909 df-n0 9106 df-z 9183 df-uz 9458 df-q 9549 df-rp 9581 df-fz 9936 df-fzo 10068 df-fl 10195 df-mod 10248 df-seqfrec 10371 df-exp 10445 df-cj 10770 df-re 10771 df-im 10772 df-rsqrt 10926 df-abs 10927 df-dvds 11714 df-gcd 11861 df-prm 12019 df-pc 12194

This theorem is referenced by: pcgcd 12237

W3C validator