pcgcd1 - Intuitionistic Logic Explorer

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

Theorem pcgcd1 12497

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 5930	. . . 4 ⊢ (𝐵 = 0 → (𝐴 gcd 𝐵) = (𝐴 gcd 0))
2	1	oveq2d 5938	. . 3 ⊢ (𝐵 = 0 → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt (𝐴 gcd 0)))
3		simp2 1000	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → 𝐴 ∈ ℤ)
4		gcdid0 12147	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → (𝐴 gcd 0) = (abs‘𝐴))
5	3, 4	syl 14	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝐴 gcd 0) = (abs‘𝐴))
6	5	oveq2d 5938	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt (abs‘𝐴)))
7		zq 9700	. . . . . . 7 ⊢ (𝐴 ∈ ℤ → 𝐴 ∈ ℚ)
8		pcabs 12495	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
9	7, 8	sylan2 286	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
10	9	3adant3 1019	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (abs‘𝐴)) = (𝑃 pCnt 𝐴))
11	6, 10	eqtrd 2229	. . . 4 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
12	11	adantr 276	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 0)) = (𝑃 pCnt 𝐴))
13	2, 12	sylan9eqr 2251	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 = 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
14		simpl1 1002	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℙ)
15	3	adantr 276	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℤ)
16		simpl3 1004	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ∈ ℤ)
17		simprr 531	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐵 ≠ 0)
18		simpr 110	. . . . . . . . 9 ⊢ ((𝐴 = 0 ∧ 𝐵 = 0) → 𝐵 = 0)
19	18	necon3ai 2416	. . . . . . . 8 ⊢ (𝐵 ≠ 0 → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
20	17, 19	syl 14	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝐴 = 0 ∧ 𝐵 = 0))
21		gcdn0cl 12129	. . . . . . 7 ⊢ (((𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ¬ (𝐴 = 0 ∧ 𝐵 = 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
22	15, 16, 20, 21	syl21anc 1248	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℕ)
23	22	nnzd 9447	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 gcd 𝐵) ∈ ℤ)
24		gcddvds 12130	. . . . . . 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 12496	. . . . 5 ⊢ ((𝑃 ∈ ℙ ∧ ((𝐴 gcd 𝐵) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ (𝐴 gcd 𝐵) ∥ 𝐴)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
28	14, 23, 15, 26, 27	syl13anc 1251	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴))
29	15, 7	syl 14	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ∈ ℚ)
30		pcxcl 12480	. . . . . . . . . 10 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
31	14, 29, 30	syl2anc 411	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
32		pczcl 12467	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ (𝐵 ∈ ℤ ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
33	14, 16, 17, 32	syl12anc 1247	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℕ₀)
34	33	nn0red 9303	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℝ)
35		pcge0 12482	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ) → 0 ≤ (𝑃 pCnt 𝐴))
36	14, 15, 35	syl2anc 411	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 0 ≤ (𝑃 pCnt 𝐴))
37		ge0gtmnf 9898	. . . . . . . . . 10 ⊢ (((𝑃 pCnt 𝐴) ∈ ℝ^* ∧ 0 ≤ (𝑃 pCnt 𝐴)) → -∞ < (𝑃 pCnt 𝐴))
38	31, 36, 37	syl2anc 411	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → -∞ < (𝑃 pCnt 𝐴))
39		simprl 529	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))
40		xrre 9895	. . . . . . . . 9 ⊢ ((((𝑃 pCnt 𝐴) ∈ ℝ^* ∧ (𝑃 pCnt 𝐵) ∈ ℝ) ∧ (-∞ < (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))) → (𝑃 pCnt 𝐴) ∈ ℝ)
41	31, 34, 38, 39, 40	syl22anc 1250	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℝ)
42		pnfnre 8068	. . . . . . . . . . . 12 ⊢ +∞ ∉ ℝ
43	42	neli 2464	. . . . . . . . . . 11 ⊢ ¬ +∞ ∈ ℝ
44		pc0 12473	. . . . . . . . . . . . 13 ⊢ (𝑃 ∈ ℙ → (𝑃 pCnt 0) = +∞)
45	14, 44	syl 14	. . . . . . . . . . . 12 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 0) = +∞)
46	45	eleq1d 2265	. . . . . . . . . . 11 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 0) ∈ ℝ ↔ +∞ ∈ ℝ))
47	43, 46	mtbiri 676	. . . . . . . . . 10 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ¬ (𝑃 pCnt 0) ∈ ℝ)
48		oveq2 5930	. . . . . . . . . . . 12 ⊢ (𝐴 = 0 → (𝑃 pCnt 𝐴) = (𝑃 pCnt 0))
49	48	eleq1d 2265	. . . . . . . . . . 11 ⊢ (𝐴 = 0 → ((𝑃 pCnt 𝐴) ∈ ℝ ↔ (𝑃 pCnt 0) ∈ ℝ))
50	49	notbid 668	. . . . . . . . . 10 ⊢ (𝐴 = 0 → (¬ (𝑃 pCnt 𝐴) ∈ ℝ ↔ ¬ (𝑃 pCnt 0) ∈ ℝ))
51	47, 50	syl5ibrcom 157	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝐴 = 0 → ¬ (𝑃 pCnt 𝐴) ∈ ℝ))
52	51	necon2ad 2424	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ∈ ℝ → 𝐴 ≠ 0))
53	41, 52	mpd 13	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝐴 ≠ 0)
54		pczdvds 12483	. . . . . . 7 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
55	14, 15, 53, 54	syl12anc 1247	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴)
56		pczcl 12467	. . . . . . . . 9 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℤ ∧ 𝐴 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
57	14, 15, 53, 56	syl12anc 1247	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℕ₀)
58		pcdvdsb 12489	. . . . . . . 8 ⊢ ((𝑃 ∈ ℙ ∧ 𝐵 ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
59	14, 16, 57, 58	syl3anc 1249	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵))
60	39, 59	mpbid 147	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵)
61		prmnn 12278	. . . . . . . . . 10 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
62	14, 61	syl 14	. . . . . . . . 9 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → 𝑃 ∈ ℕ)
63	62, 57	nnexpcld 10787	. . . . . . . 8 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℕ)
64	63	nnzd 9447	. . . . . . 7 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ)
65		dvdsgcd 12179	. . . . . . 7 ⊢ (((𝑃↑(𝑃 pCnt 𝐴)) ∈ ℤ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
66	64, 15, 16, 65	syl3anc 1249	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (((𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐴 ∧ (𝑃↑(𝑃 pCnt 𝐴)) ∥ 𝐵) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
67	55, 60, 66	mp2and 433	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵))
68		pcdvdsb 12489	. . . . . 6 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 gcd 𝐵) ∈ ℤ ∧ (𝑃 pCnt 𝐴) ∈ ℕ₀) → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)) ↔ (𝑃↑(𝑃 pCnt 𝐴)) ∥ (𝐴 gcd 𝐵)))
69	14, 23, 57, 68	syl3anc 1249	. . . . 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 12469	. . . . . 6 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℕ₀)
72	71	nn0red 9303	. . . . 5 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) ∈ ℝ)
73	72, 41	letri3d 8142	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → ((𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴) ↔ ((𝑃 pCnt (𝐴 gcd 𝐵)) ≤ (𝑃 pCnt 𝐴) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 gcd 𝐵)))))
74	28, 70, 73	mpbir2and 946	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ∧ 𝐵 ≠ 0)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
75	74	anassrs 400	. 2 ⊢ ((((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) ∧ 𝐵 ≠ 0) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))
76		simpl3 1004	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 𝐵 ∈ ℤ)
77		0zd 9338	. . . 4 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → 0 ∈ ℤ)
78		zdceq 9401	. . . 4 ⊢ ((𝐵 ∈ ℤ ∧ 0 ∈ ℤ) → DECID 𝐵 = 0)
79	76, 77, 78	syl2anc 411	. . 3 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → DECID 𝐵 = 0)
80		dcne 2378	. . 3 ⊢ (DECID 𝐵 = 0 ↔ (𝐵 = 0 ∨ 𝐵 ≠ 0))
81	79, 80	sylib 122	. 2 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝐵 = 0 ∨ 𝐵 ≠ 0))
82	13, 75, 81	mpjaodan 799	1 ⊢ (((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℤ ∧ 𝐵 ∈ ℤ) ∧ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)) → (𝑃 pCnt (𝐴 gcd 𝐵)) = (𝑃 pCnt 𝐴))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ↔ wb 105 ∨ wo 709 DECID wdc 835 ∧ w3a 980 = wceq 1364 ∈ wcel 2167 ≠ wne 2367 class class class wbr 4033 ‘cfv 5258 (class class class)co 5922 ℝcr 7878 0cc0 7879 +∞cpnf 8058 -∞cmnf 8059 ℝ^*cxr 8060 < clt 8061 ≤ cle 8062 ℕcn 8990 ℕ₀cn0 9249 ℤcz 9326 ℚcq 9693 ↑cexp 10630 abscabs 11162 ∥ cdvds 11952 gcd cgcd 12120 ℙcprime 12275 pCnt cpc 12453

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 615 ax-in2 616 ax-io 710 ax-5 1461 ax-7 1462 ax-gen 1463 ax-ie1 1507 ax-ie2 1508 ax-8 1518 ax-10 1519 ax-11 1520 ax-i12 1521 ax-bndl 1523 ax-4 1524 ax-17 1540 ax-i9 1544 ax-ial 1548 ax-i5r 1549 ax-13 2169 ax-14 2170 ax-ext 2178 ax-coll 4148 ax-sep 4151 ax-nul 4159 ax-pow 4207 ax-pr 4242 ax-un 4468 ax-setind 4573 ax-iinf 4624 ax-cnex 7970 ax-resscn 7971 ax-1cn 7972 ax-1re 7973 ax-icn 7974 ax-addcl 7975 ax-addrcl 7976 ax-mulcl 7977 ax-mulrcl 7978 ax-addcom 7979 ax-mulcom 7980 ax-addass 7981 ax-mulass 7982 ax-distr 7983 ax-i2m1 7984 ax-0lt1 7985 ax-1rid 7986 ax-0id 7987 ax-rnegex 7988 ax-precex 7989 ax-cnre 7990 ax-pre-ltirr 7991 ax-pre-ltwlin 7992 ax-pre-lttrn 7993 ax-pre-apti 7994 ax-pre-ltadd 7995 ax-pre-mulgt0 7996 ax-pre-mulext 7997 ax-arch 7998 ax-caucvg 7999

This theorem depends on definitions: df-bi 117 df-stab 832 df-dc 836 df-3or 981 df-3an 982 df-tru 1367 df-fal 1370 df-nf 1475 df-sb 1777 df-eu 2048 df-mo 2049 df-clab 2183 df-cleq 2189 df-clel 2192 df-nfc 2328 df-ne 2368 df-nel 2463 df-ral 2480 df-rex 2481 df-reu 2482 df-rmo 2483 df-rab 2484 df-v 2765 df-sbc 2990 df-csb 3085 df-dif 3159 df-un 3161 df-in 3163 df-ss 3170 df-nul 3451 df-if 3562 df-pw 3607 df-sn 3628 df-pr 3629 df-op 3631 df-uni 3840 df-int 3875 df-iun 3918 df-br 4034 df-opab 4095 df-mpt 4096 df-tr 4132 df-id 4328 df-po 4331 df-iso 4332 df-iord 4401 df-on 4403 df-ilim 4404 df-suc 4406 df-iom 4627 df-xp 4669 df-rel 4670 df-cnv 4671 df-co 4672 df-dm 4673 df-rn 4674 df-res 4675 df-ima 4676 df-iota 5219 df-fun 5260 df-fn 5261 df-f 5262 df-f1 5263 df-fo 5264 df-f1o 5265 df-fv 5266 df-isom 5267 df-riota 5877 df-ov 5925 df-oprab 5926 df-mpo 5927 df-1st 6198 df-2nd 6199 df-recs 6363 df-frec 6449 df-1o 6474 df-2o 6475 df-er 6592 df-en 6800 df-sup 7050 df-inf 7051 df-pnf 8063 df-mnf 8064 df-xr 8065 df-ltxr 8066 df-le 8067 df-sub 8199 df-neg 8200 df-reap 8602 df-ap 8609 df-div 8700 df-inn 8991 df-2 9049 df-3 9050 df-4 9051 df-n0 9250 df-z 9327 df-uz 9602 df-q 9694 df-rp 9729 df-fz 10084 df-fzo 10218 df-fl 10360 df-mod 10415 df-seqfrec 10540 df-exp 10631 df-cj 11007 df-re 11008 df-im 11009 df-rsqrt 11163 df-abs 11164 df-dvds 11953 df-gcd 12121 df-prm 12276 df-pc 12454

This theorem is referenced by: pcgcd 12498

W3C validator