pcgcd1 - Intuitionistic Logic Explorer

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

Theorem pcgcd1 13051

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 6066	. . . 4 ⊢ (𝐵 = 0 → (𝐴 gcd 𝐵) = (𝐴 gcd 0))
2	1	oveq2d 6074	. . 3 ⊢ (𝐵 = 0 → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt (𝐴 gcd 0)))
3		simp2 1025	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐴 ∈ ℤ)
4		gcdid0 12701	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → (𝐴 gcd 0) = (abs‘𝐴))
5	3, 4	syl 14	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 gcd 0) = (abs‘𝐴))
6	5	oveq2d 6074	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt (abs‘𝐴)))
7		zq 9976	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → 𝐴 ∈ ℚ)
8		pcabs 13049	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
9	7, 8	sylan2 286	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
10	9	3adant3 1044	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
11	6, 10	eqtrd 2267	. . . 4 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
12	11	adantr 276	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
13	2, 12	sylan9eqr 2289	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 = 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
14		simpl1 1027	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℙ)
15	3	adantr 276	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℤ)
16		simpl3 1029	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ∈ ℤ)
17		simprr 533	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ≠ 0)
18		simpr 110	. . . . . . . . 9 ⊢ ((𝐴 = 0 ∧ 𝐵 = 0) → 𝐵 = 0)
19	18	necon3ai 2463	. . . . . . . 8 ⊢ (𝐵 ≠ 0 → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
20	17, 19	syl 14	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
21		gcdn0cl 12683	. . . . . . 7 ⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ¬ (𝐴 = 0 ∧ 𝐵 = 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
22	15, 16, 20, 21	syl21anc 1273	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
23	22	nnzd 9717	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℤ)
24		gcddvds 12684	. . . . . . 7 ⊢ ((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → ((𝐴 gcd 𝐵) ∥ 𝐴 ∧ (𝐴 gcd 𝐵) ∥ 𝐵))
25	15, 16, 24	syl2anc 411	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝐴 gcd 𝐵) ∥ 𝐴 ∧ (𝐴 gcd 𝐵) ∥ 𝐵))
26	25	simpld 112	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∥ 𝐴)
27		pcdvdstr 13050	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ ((𝐴 gcd 𝐵) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ (𝐴 gcd 𝐵) ∥ 𝐴)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
28	14, 23, 15, 26, 27	syl13anc 1276	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
29	15, 7	syl 14	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℚ)
30		pcxcl 13034	. . . . . . . . . 10 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
31	14, 29, 30	syl2anc 411	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
32		pczcl 13021	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ (𝐵 ∈ ℤ ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
33	14, 16, 17, 32	syl12anc 1272	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
34	33	nn0red 9571	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℝ)
35		pcge0 13036	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → 0 ≤ (𝑃 pCnt 𝐴))
36	14, 15, 35	syl2anc 411	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 0 ≤ (𝑃 pCnt 𝐴))
37		ge0gtmnf 10175	. . . . . . . . . 10 ⊢ (((𝑃 pCnt 𝐴) ∈ ℝ^* ∧ 0 ≤ (𝑃 pCnt 𝐴)) → -∞ < (𝑃 pCnt 𝐴))
38	31, 36, 37	syl2anc 411	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → -∞ < (𝑃 pCnt 𝐴))
39		simprl 531	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))
40		xrre 10172	. . . . . . . . 9 ⊢ ((((𝑃 pCnt 𝐴) ∈ ℝ^* ∧ (𝑃 pCnt 𝐵) ∈ ℝ) ∧ (-∞ < (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))) → (𝑃 pCnt 𝐴) ∈ ℝ)
41	31, 34, 38, 39, 40	syl22anc 1275	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ)
42		pnfnre 8331	. . . . . . . . . . . 12 ⊢ +∞ ∉ ℝ
43	42	neli 2511	. . . . . . . . . . 11 ⊢ ¬ +∞ ∈ ℝ
44		pc0 13027	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ ℙ → (𝑃 pCnt 0) = +∞)
45	14, 44	syl 14	. . . . . . . . . . . 12 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 0) = +∞)
46	45	eleq1d 2303	. . . . . . . . . . 11 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 0) ∈ ℝ ↔ +∞ ∈ ℝ))
47	43, 46	mtbiri 682	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝑃 pCnt 0) ∈ ℝ)
48		oveq2 6066	. . . . . . . . . . . 12 ⊢ (𝐴 = 0 → (𝑃 pCnt 𝐴) = (𝑃 pCnt 0))
49	48	eleq1d 2303	. . . . . . . . . . 11 ⊢ (𝐴 = 0 → ((𝑃 pCnt 𝐴) ∈ ℝ ↔ (𝑃 pCnt 0) ∈ ℝ))
50	49	notbid 673	. . . . . . . . . 10 ⊢ (𝐴 = 0 → (¬ (𝑃 pCnt 𝐴) ∈ ℝ ↔ ¬ (𝑃 pCnt 0) ∈ ℝ))
51	47, 50	syl5ibrcom 157	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 = 0 → ¬ (𝑃 pCnt 𝐴) ∈ ℝ))
52	51	necon2ad 2471	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ∈ ℝ → 𝐴 ≠ 0))
53	41, 52	mpd 13	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ≠ 0)
54		pczdvds 13037	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
55	14, 15, 53, 54	syl12anc 1272	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
56		pczcl 13021	. . . . . . . . 9 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
57	14, 15, 53, 56	syl12anc 1272	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
58		pcdvdsb 13043	. . . . . . . 8 ⊢ ((𝑃 ∈ ℙ ∧ 𝐵 ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
59	14, 16, 57, 58	syl3anc 1274	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
60	39, 59	mpbid 147	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵)
61		prmnn 12832	. . . . . . . . . 10 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
62	14, 61	syl 14	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℕ)
63	62, 57	nnexpcld 11082	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℕ)
64	63	nnzd 9717	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ)
65		dvdsgcd 12733	. . . . . . 7 ⊢ (((𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
66	64, 15, 16, 65	syl3anc 1274	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
67	55, 60, 66	mp2and 433	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵))
68		pcdvdsb 13043	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 gcd 𝐵) ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
69	14, 23, 57, 68	syl3anc 1274	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
70	67, 69	mpbird 167	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)))
71	14, 22	pccld 13023	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℕ₀)
72	71	nn0red 9571	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℝ)
73	72, 41	letri3d 8405	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴) ↔ ((𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)))))
74	28, 70, 73	mpbir2and 953	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
75	74	anassrs 400	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 ≠ 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
76		simpl3 1029	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 𝐵 ∈ ℤ)
77		0zd 9606	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 0 ∈ ℤ)
78		zdceq 9670	. . . 4 ⊢ ((𝐵 ∈ ℤ ∧ 0 ∈ ℤ) → DECID 𝐵 = 0)
79	76, 77, 78	syl2anc 411	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → DECID 𝐵 = 0)
80		dcne 2425	. . 3 ⊢ (DECID 𝐵 = 0 ↔ (𝐵 = 0 ∨ 𝐵 ≠ 0))
81	79, 80	sylib 122	. 2 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝐵 = 0 ∨ 𝐵 ≠ 0))
82	13, 75, 81	mpjaodan 806	1 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ↔ wb 105 ∨ wo 716 DECID wdc 842 ∧ w3a 1005 = wceq 1398 ∈ wcel 2205 ≠ wne 2414 class class class wbr 4114 ‘cfv 5357 (class class class)co 6058 ℝcr 8142 0cc0 8143 +∞cpnf 8321 -∞cmnf 8322 ℝ^*cxr 8323 < clt 8324 ≤ cle 8325 ℕcn 9254 ℕ₀cn0 9513 ℤcz 9594 ℚcq 9969 ↑cexp 10924 abscabs 11707 ∥ cdvds 12498 gcd cgcd 12674 ℙcprime 12829 pCnt cpc 13007

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-ia1 106 ax-ia2 107 ax-ia3 108 ax-in1 619 ax-in2 620 ax-io 717 ax-5 1496 ax-7 1497 ax-gen 1498 ax-ie1 1542 ax-ie2 1543 ax-8 1553 ax-10 1554 ax-11 1555 ax-i12 1556 ax-bndl 1558 ax-4 1559 ax-17 1575 ax-i9 1579 ax-ial 1583 ax-i5r 1584 ax-13 2207 ax-14 2208 ax-ext 2216 ax-coll 4230 ax-sep 4233 ax-nul 4241 ax-pow 4292 ax-pr 4327 ax-un 4559 ax-setind 4664 ax-iinf 4715 ax-cnex 8234 ax-resscn 8235 ax-1cn 8236 ax-1re 8237 ax-icn 8238 ax-addcl 8239 ax-addrcl 8240 ax-mulcl 8241 ax-mulrcl 8242 ax-addcom 8243 ax-mulcom 8244 ax-addass 8245 ax-mulass 8246 ax-distr 8247 ax-i2m1 8248 ax-0lt1 8249 ax-1rid 8250 ax-0id 8251 ax-rnegex 8252 ax-precex 8253 ax-cnre 8254 ax-pre-ltirr 8255 ax-pre-ltwlin 8256 ax-pre-lttrn 8257 ax-pre-apti 8258 ax-pre-ltadd 8259 ax-pre-mulgt0 8260 ax-pre-mulext 8261 ax-arch 8262 ax-caucvg 8263

This theorem depends on definitions: df-bi 117 df-stab 839 df-dc 843 df-3or 1006 df-3an 1007 df-tru 1401 df-fal 1404 df-nf 1510 df-sb 1812 df-eu 2085 df-mo 2086 df-clab 2221 df-cleq 2227 df-clel 2230 df-nfc 2375 df-ne 2415 df-nel 2510 df-ral 2527 df-rex 2528 df-reu 2529 df-rmo 2530 df-rab 2531 df-v 2817 df-sbc 3046 df-csb 3142 df-dif 3216 df-un 3218 df-in 3220 df-ss 3227 df-nul 3513 df-if 3625 df-pw 3676 df-sn 3700 df-pr 3701 df-op 3703 df-uni 3920 df-int 3955 df-iun 3998 df-br 4115 df-opab 4177 df-mpt 4178 df-tr 4214 df-id 4419 df-po 4422 df-iso 4423 df-iord 4492 df-on 4494 df-ilim 4495 df-suc 4497 df-iom 4718 df-xp 4760 df-rel 4761 df-cnv 4762 df-co 4763 df-dm 4764 df-rn 4765 df-res 4766 df-ima 4767 df-iota 5317 df-fun 5359 df-fn 5360 df-f 5361 df-f1 5362 df-fo 5363 df-f1o 5364 df-fv 5365 df-isom 5366 df-riota 6011 df-ov 6061 df-oprab 6062 df-mpo 6063 df-1st 6347 df-2nd 6348 df-recs 6549 df-frec 6635 df-1o 6660 df-2o 6661 df-er 6780 df-en 6989 df-sup 7288 df-inf 7289 df-pnf 8326 df-mnf 8327 df-xr 8328 df-ltxr 8329 df-le 8330 df-sub 8462 df-neg 8463 df-reap 8866 df-ap 8873 df-div 8964 df-inn 9255 df-2 9313 df-3 9314 df-4 9315 df-n0 9514 df-z 9595 df-uz 9872 df-q 9970 df-rp 10005 df-fz 10362 df-fzo 10499 df-fl 10654 df-mod 10709 df-seqfrec 10834 df-exp 10925 df-cj 11552 df-re 11553 df-im 11554 df-rsqrt 11708 df-abs 11709 df-dvds 12499 df-gcd 12675 df-prm 12830 df-pc 13008

This theorem is referenced by: pcgcd 13052

W3C validator