pcadd - Intuitionistic Logic Explorer

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

Theorem pcadd 12372

Description: An inequality for the prime count of a sum. This is the source of the ultrametric inequality for the p-adic metric. (Contributed by Mario Carneiro, 9-Sep-2014.)

**Hypotheses**
Ref	Expression
pcadd.1	⊢ (𝜑 → 𝑃 ∈ ℙ)
pcadd.2	⊢ (𝜑 → 𝐴 ∈ ℚ)
pcadd.3	⊢ (𝜑 → 𝐵 ∈ ℚ)
pcadd.4	⊢ (𝜑 → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))

**Assertion**
Ref	Expression
pcadd	⊢ (𝜑 → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵)))

Proof of Theorem pcadd Dummy variables 𝑥 𝑤 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		pcadd.2	. . 3 ⊢ (𝜑 → 𝐴 ∈ ℚ)
2		elq 9652	. . 3 ⊢ (𝐴 ∈ ℚ ↔ ∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦))
3	1, 2	sylib 122	. 2 ⊢ (𝜑 → ∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦))
4		pcadd.3	. . 3 ⊢ (𝜑 → 𝐵 ∈ ℚ)
5		elq 9652	. . 3 ⊢ (𝐵 ∈ ℚ ↔ ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤))
6	4, 5	sylib 122	. 2 ⊢ (𝜑 → ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤))
7		pcadd.1	. . . . . . . 8 ⊢ (𝜑 → 𝑃 ∈ ℙ)
8		pcxcl 12343	. . . . . . . 8 ⊢ ((𝑃 ∈ ℙ ∧ 𝐴 ∈ ℚ) → (𝑃 pCnt 𝐴) ∈ ℝ^*)
9	7, 1, 8	syl2anc 411	. . . . . . 7 ⊢ (𝜑 → (𝑃 pCnt 𝐴) ∈ ℝ^*)
10	9	xrleidd 9831	. . . . . 6 ⊢ (𝜑 → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐴))
11	10	adantr 276	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 = 0) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐴))
12		oveq2 5904	. . . . . . 7 ⊢ (𝐵 = 0 → (𝐴 + 𝐵) = (𝐴 + 0))
13		qcn 9664	. . . . . . . . 9 ⊢ (𝐴 ∈ ℚ → 𝐴 ∈ ℂ)
14	1, 13	syl 14	. . . . . . . 8 ⊢ (𝜑 → 𝐴 ∈ ℂ)
15	14	addridd 8136	. . . . . . 7 ⊢ (𝜑 → (𝐴 + 0) = 𝐴)
16	12, 15	sylan9eqr 2244	. . . . . 6 ⊢ ((𝜑 ∧ 𝐵 = 0) → (𝐴 + 𝐵) = 𝐴)
17	16	oveq2d 5912	. . . . 5 ⊢ ((𝜑 ∧ 𝐵 = 0) → (𝑃 pCnt (𝐴 + 𝐵)) = (𝑃 pCnt 𝐴))
18	11, 17	breqtrrd 4046	. . . 4 ⊢ ((𝜑 ∧ 𝐵 = 0) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵)))
19	18	a1d 22	. . 3 ⊢ ((𝜑 ∧ 𝐵 = 0) → ((∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵))))
20		reeanv 2660	. . . 4 ⊢ (∃𝑥 ∈ ℤ ∃𝑧 ∈ ℤ (∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)) ↔ (∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)))
21		reeanv 2660	. . . . . 6 ⊢ (∃𝑦 ∈ ℕ ∃𝑤 ∈ ℕ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)) ↔ (∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)))
22	7	ad3antrrr 492	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑃 ∈ ℙ)
23		prmnn 12142	. . . . . . . . . . . . . . . . 17 ⊢ (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
24	22, 23	syl 14	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑃 ∈ ℕ)
25		simplrl 535	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑥 ∈ ℤ)
26		simprrl 539	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐴 = (𝑥 / 𝑦))
27		pc0 12336	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑃 ∈ ℙ → (𝑃 pCnt 0) = +∞)
28	22, 27	syl 14	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 0) = +∞)
29	4	ad3antrrr 492	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐵 ∈ ℚ)
30		simpllr 534	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐵 ≠ 0)
31		pcqcl 12338	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑃 ∈ ℙ ∧ (𝐵 ∈ ℚ ∧ 𝐵 ≠ 0)) → (𝑃 pCnt 𝐵) ∈ ℤ)
32	22, 29, 30, 31	syl12anc 1247	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐵) ∈ ℤ)
33	32	zred 9405	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐵) ∈ ℝ)
34	33	ltpnfd 9811	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐵) < +∞)
35		pnfxr 8040	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ +∞ ∈ ℝ^*
36	33	rexrd 8037	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐵) ∈ ℝ^*)
37		xrlenlt 8052	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((+∞ ∈ ℝ^* ∧ (𝑃 pCnt 𝐵) ∈ ℝ^*) → (+∞ ≤ (𝑃 pCnt 𝐵) ↔ ¬ (𝑃 pCnt 𝐵) < +∞))
38	35, 36, 37	sylancr 414	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (+∞ ≤ (𝑃 pCnt 𝐵) ↔ ¬ (𝑃 pCnt 𝐵) < +∞))
39	38	biimpd 144	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (+∞ ≤ (𝑃 pCnt 𝐵) → ¬ (𝑃 pCnt 𝐵) < +∞))
40	34, 39	mt2d 626	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ¬ +∞ ≤ (𝑃 pCnt 𝐵))
41	28, 40	eqnbrtrd 4036	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ¬ (𝑃 pCnt 0) ≤ (𝑃 pCnt 𝐵))
42		pcadd.4	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝜑 → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))
43	42	ad3antrrr 492	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵))
44		oveq2 5904	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝐴 = 0 → (𝑃 pCnt 𝐴) = (𝑃 pCnt 0))
45	44	breq1d 4028	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝐴 = 0 → ((𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵) ↔ (𝑃 pCnt 0) ≤ (𝑃 pCnt 𝐵)))
46	43, 45	syl5ibcom 155	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝐴 = 0 → (𝑃 pCnt 0) ≤ (𝑃 pCnt 𝐵)))
47	46	necon3bd 2403	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (¬ (𝑃 pCnt 0) ≤ (𝑃 pCnt 𝐵) → 𝐴 ≠ 0))
48	41, 47	mpd 13	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐴 ≠ 0)
49	26, 48	eqnetrrd 2386	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑥 / 𝑦) ≠ 0)
50		simprll 537	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑦 ∈ ℕ)
51	50	nncnd 8963	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑦 ∈ ℂ)
52	50	nnap0d 8995	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑦 # 0)
53	51, 52	div0apd 8774	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (0 / 𝑦) = 0)
54		oveq1 5903	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑥 = 0 → (𝑥 / 𝑦) = (0 / 𝑦))
55	54	eqeq1d 2198	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑥 = 0 → ((𝑥 / 𝑦) = 0 ↔ (0 / 𝑦) = 0))
56	53, 55	syl5ibrcom 157	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑥 = 0 → (𝑥 / 𝑦) = 0))
57	56	necon3d 2404	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑥 / 𝑦) ≠ 0 → 𝑥 ≠ 0))
58	49, 57	mpd 13	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑥 ≠ 0)
59		pczcl 12330	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑃 ∈ ℙ ∧ (𝑥 ∈ ℤ ∧ 𝑥 ≠ 0)) → (𝑃 pCnt 𝑥) ∈ ℕ₀)
60	22, 25, 58, 59	syl12anc 1247	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝑥) ∈ ℕ₀)
61	24, 60	nnexpcld 10707	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑥)) ∈ ℕ)
62	61	nncnd 8963	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑥)) ∈ ℂ)
63	62, 51	mulcomd 8009	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑥)) · 𝑦) = (𝑦 · (𝑃↑(𝑃 pCnt 𝑥))))
64	63	oveq2d 5912	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑥 · (𝑃↑(𝑃 pCnt 𝑦))) / ((𝑃↑(𝑃 pCnt 𝑥)) · 𝑦)) = ((𝑥 · (𝑃↑(𝑃 pCnt 𝑦))) / (𝑦 · (𝑃↑(𝑃 pCnt 𝑥)))))
65	25	zcnd 9406	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑥 ∈ ℂ)
66	61	nnap0d 8995	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑥)) # 0)
67	62, 66	jca 306	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑥)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑥)) # 0))
68	51, 52	jca 306	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑦 ∈ ℂ ∧ 𝑦 # 0))
69	22, 50	pccld 12332	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝑦) ∈ ℕ₀)
70	24, 69	nnexpcld 10707	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑦)) ∈ ℕ)
71	70	nncnd 8963	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑦)) ∈ ℂ)
72	70	nnap0d 8995	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑦)) # 0)
73	71, 72	jca 306	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑦)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑦)) # 0))
74		divdivdivap 8700	. . . . . . . . . . . . 13 ⊢ (((𝑥 ∈ ℂ ∧ ((𝑃↑(𝑃 pCnt 𝑥)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑥)) # 0)) ∧ ((𝑦 ∈ ℂ ∧ 𝑦 # 0) ∧ ((𝑃↑(𝑃 pCnt 𝑦)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑦)) # 0))) → ((𝑥 / (𝑃↑(𝑃 pCnt 𝑥))) / (𝑦 / (𝑃↑(𝑃 pCnt 𝑦)))) = ((𝑥 · (𝑃↑(𝑃 pCnt 𝑦))) / ((𝑃↑(𝑃 pCnt 𝑥)) · 𝑦)))
75	65, 67, 68, 73, 74	syl22anc 1250	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑥 / (𝑃↑(𝑃 pCnt 𝑥))) / (𝑦 / (𝑃↑(𝑃 pCnt 𝑦)))) = ((𝑥 · (𝑃↑(𝑃 pCnt 𝑦))) / ((𝑃↑(𝑃 pCnt 𝑥)) · 𝑦)))
76	26	oveq2d 5912	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐴) = (𝑃 pCnt (𝑥 / 𝑦)))
77		pcdiv 12334	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑃 ∈ ℙ ∧ (𝑥 ∈ ℤ ∧ 𝑥 ≠ 0) ∧ 𝑦 ∈ ℕ) → (𝑃 pCnt (𝑥 / 𝑦)) = ((𝑃 pCnt 𝑥) − (𝑃 pCnt 𝑦)))
78	22, 25, 58, 50, 77	syl121anc 1254	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt (𝑥 / 𝑦)) = ((𝑃 pCnt 𝑥) − (𝑃 pCnt 𝑦)))
79	76, 78	eqtrd 2222	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐴) = ((𝑃 pCnt 𝑥) − (𝑃 pCnt 𝑦)))
80	79	oveq2d 5912	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝐴)) = (𝑃↑((𝑃 pCnt 𝑥) − (𝑃 pCnt 𝑦))))
81	24	nncnd 8963	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑃 ∈ ℂ)
82	24	nnap0d 8995	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑃 # 0)
83	69	nn0zd 9403	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝑦) ∈ ℤ)
84	60	nn0zd 9403	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝑥) ∈ ℤ)
85	81, 82, 83, 84	expsubapd 10696	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑((𝑃 pCnt 𝑥) − (𝑃 pCnt 𝑦))) = ((𝑃↑(𝑃 pCnt 𝑥)) / (𝑃↑(𝑃 pCnt 𝑦))))
86	80, 85	eqtrd 2222	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝐴)) = ((𝑃↑(𝑃 pCnt 𝑥)) / (𝑃↑(𝑃 pCnt 𝑦))))
87	86	oveq2d 5912	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) = (𝐴 / ((𝑃↑(𝑃 pCnt 𝑥)) / (𝑃↑(𝑃 pCnt 𝑦)))))
88	26	oveq1d 5911	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝐴 / ((𝑃↑(𝑃 pCnt 𝑥)) / (𝑃↑(𝑃 pCnt 𝑦)))) = ((𝑥 / 𝑦) / ((𝑃↑(𝑃 pCnt 𝑥)) / (𝑃↑(𝑃 pCnt 𝑦)))))
89		divdivdivap 8700	. . . . . . . . . . . . . 14 ⊢ (((𝑥 ∈ ℂ ∧ (𝑦 ∈ ℂ ∧ 𝑦 # 0)) ∧ (((𝑃↑(𝑃 pCnt 𝑥)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑥)) # 0) ∧ ((𝑃↑(𝑃 pCnt 𝑦)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑦)) # 0))) → ((𝑥 / 𝑦) / ((𝑃↑(𝑃 pCnt 𝑥)) / (𝑃↑(𝑃 pCnt 𝑦)))) = ((𝑥 · (𝑃↑(𝑃 pCnt 𝑦))) / (𝑦 · (𝑃↑(𝑃 pCnt 𝑥)))))
90	65, 68, 67, 73, 89	syl22anc 1250	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑥 / 𝑦) / ((𝑃↑(𝑃 pCnt 𝑥)) / (𝑃↑(𝑃 pCnt 𝑦)))) = ((𝑥 · (𝑃↑(𝑃 pCnt 𝑦))) / (𝑦 · (𝑃↑(𝑃 pCnt 𝑥)))))
91	87, 88, 90	3eqtrd 2226	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))) = ((𝑥 · (𝑃↑(𝑃 pCnt 𝑦))) / (𝑦 · (𝑃↑(𝑃 pCnt 𝑥)))))
92	64, 75, 91	3eqtr4d 2232	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑥 / (𝑃↑(𝑃 pCnt 𝑥))) / (𝑦 / (𝑃↑(𝑃 pCnt 𝑦)))) = (𝐴 / (𝑃↑(𝑃 pCnt 𝐴))))
93	92	oveq2d 5912	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝐴)) · ((𝑥 / (𝑃↑(𝑃 pCnt 𝑥))) / (𝑦 / (𝑃↑(𝑃 pCnt 𝑦))))) = ((𝑃↑(𝑃 pCnt 𝐴)) · (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))))
94	1	ad3antrrr 492	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐴 ∈ ℚ)
95	94, 13	syl 14	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐴 ∈ ℂ)
96		pcqcl 12338	. . . . . . . . . . . . 13 ⊢ ((𝑃 ∈ ℙ ∧ (𝐴 ∈ ℚ ∧ 𝐴 ≠ 0)) → (𝑃 pCnt 𝐴) ∈ ℤ)
97	22, 94, 48, 96	syl12anc 1247	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐴) ∈ ℤ)
98	81, 82, 97	expclzapd 10690	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝐴)) ∈ ℂ)
99	81, 82, 97	expap0d 10691	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝐴)) # 0)
100	95, 98, 99	divcanap2d 8779	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝐴)) · (𝐴 / (𝑃↑(𝑃 pCnt 𝐴)))) = 𝐴)
101	93, 100	eqtr2d 2223	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐴 = ((𝑃↑(𝑃 pCnt 𝐴)) · ((𝑥 / (𝑃↑(𝑃 pCnt 𝑥))) / (𝑦 / (𝑃↑(𝑃 pCnt 𝑦))))))
102		simplrr 536	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑧 ∈ ℤ)
103		simprrr 540	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐵 = (𝑧 / 𝑤))
104	103, 30	eqnetrrd 2386	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑧 / 𝑤) ≠ 0)
105		simprlr 538	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑤 ∈ ℕ)
106	105	nncnd 8963	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑤 ∈ ℂ)
107	105	nnap0d 8995	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑤 # 0)
108	106, 107	div0apd 8774	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (0 / 𝑤) = 0)
109		oveq1 5903	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑧 = 0 → (𝑧 / 𝑤) = (0 / 𝑤))
110	109	eqeq1d 2198	. . . . . . . . . . . . . . . . . . . 20 ⊢ (𝑧 = 0 → ((𝑧 / 𝑤) = 0 ↔ (0 / 𝑤) = 0))
111	108, 110	syl5ibrcom 157	. . . . . . . . . . . . . . . . . . 19 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑧 = 0 → (𝑧 / 𝑤) = 0))
112	111	necon3d 2404	. . . . . . . . . . . . . . . . . 18 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑧 / 𝑤) ≠ 0 → 𝑧 ≠ 0))
113	104, 112	mpd 13	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑧 ≠ 0)
114		pczcl 12330	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑃 ∈ ℙ ∧ (𝑧 ∈ ℤ ∧ 𝑧 ≠ 0)) → (𝑃 pCnt 𝑧) ∈ ℕ₀)
115	22, 102, 113, 114	syl12anc 1247	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝑧) ∈ ℕ₀)
116	24, 115	nnexpcld 10707	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑧)) ∈ ℕ)
117	116	nncnd 8963	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑧)) ∈ ℂ)
118	117, 106	mulcomd 8009	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑧)) · 𝑤) = (𝑤 · (𝑃↑(𝑃 pCnt 𝑧))))
119	118	oveq2d 5912	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑧 · (𝑃↑(𝑃 pCnt 𝑤))) / ((𝑃↑(𝑃 pCnt 𝑧)) · 𝑤)) = ((𝑧 · (𝑃↑(𝑃 pCnt 𝑤))) / (𝑤 · (𝑃↑(𝑃 pCnt 𝑧)))))
120	102	zcnd 9406	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑧 ∈ ℂ)
121	116	nnap0d 8995	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑧)) # 0)
122	117, 121	jca 306	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑧)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑧)) # 0))
123	106, 107	jca 306	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑤 ∈ ℂ ∧ 𝑤 # 0))
124	22, 105	pccld 12332	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝑤) ∈ ℕ₀)
125	24, 124	nnexpcld 10707	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑤)) ∈ ℕ)
126	125	nncnd 8963	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑤)) ∈ ℂ)
127	125	nnap0d 8995	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑤)) # 0)
128	126, 127	jca 306	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑤)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑤)) # 0))
129		divdivdivap 8700	. . . . . . . . . . . . 13 ⊢ (((𝑧 ∈ ℂ ∧ ((𝑃↑(𝑃 pCnt 𝑧)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑧)) # 0)) ∧ ((𝑤 ∈ ℂ ∧ 𝑤 # 0) ∧ ((𝑃↑(𝑃 pCnt 𝑤)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑤)) # 0))) → ((𝑧 / (𝑃↑(𝑃 pCnt 𝑧))) / (𝑤 / (𝑃↑(𝑃 pCnt 𝑤)))) = ((𝑧 · (𝑃↑(𝑃 pCnt 𝑤))) / ((𝑃↑(𝑃 pCnt 𝑧)) · 𝑤)))
130	120, 122, 123, 128, 129	syl22anc 1250	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑧 / (𝑃↑(𝑃 pCnt 𝑧))) / (𝑤 / (𝑃↑(𝑃 pCnt 𝑤)))) = ((𝑧 · (𝑃↑(𝑃 pCnt 𝑤))) / ((𝑃↑(𝑃 pCnt 𝑧)) · 𝑤)))
131	103	oveq2d 5912	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐵) = (𝑃 pCnt (𝑧 / 𝑤)))
132		pcdiv 12334	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑃 ∈ ℙ ∧ (𝑧 ∈ ℤ ∧ 𝑧 ≠ 0) ∧ 𝑤 ∈ ℕ) → (𝑃 pCnt (𝑧 / 𝑤)) = ((𝑃 pCnt 𝑧) − (𝑃 pCnt 𝑤)))
133	22, 102, 113, 105, 132	syl121anc 1254	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt (𝑧 / 𝑤)) = ((𝑃 pCnt 𝑧) − (𝑃 pCnt 𝑤)))
134	131, 133	eqtrd 2222	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐵) = ((𝑃 pCnt 𝑧) − (𝑃 pCnt 𝑤)))
135	134	oveq2d 5912	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝐵)) = (𝑃↑((𝑃 pCnt 𝑧) − (𝑃 pCnt 𝑤))))
136	124	nn0zd 9403	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝑤) ∈ ℤ)
137	115	nn0zd 9403	. . . . . . . . . . . . . . . 16 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝑧) ∈ ℤ)
138	81, 82, 136, 137	expsubapd 10696	. . . . . . . . . . . . . . 15 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑((𝑃 pCnt 𝑧) − (𝑃 pCnt 𝑤))) = ((𝑃↑(𝑃 pCnt 𝑧)) / (𝑃↑(𝑃 pCnt 𝑤))))
139	135, 138	eqtrd 2222	. . . . . . . . . . . . . 14 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝐵)) = ((𝑃↑(𝑃 pCnt 𝑧)) / (𝑃↑(𝑃 pCnt 𝑤))))
140	139	oveq2d 5912	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝐵 / (𝑃↑(𝑃 pCnt 𝐵))) = (𝐵 / ((𝑃↑(𝑃 pCnt 𝑧)) / (𝑃↑(𝑃 pCnt 𝑤)))))
141	103	oveq1d 5911	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝐵 / ((𝑃↑(𝑃 pCnt 𝑧)) / (𝑃↑(𝑃 pCnt 𝑤)))) = ((𝑧 / 𝑤) / ((𝑃↑(𝑃 pCnt 𝑧)) / (𝑃↑(𝑃 pCnt 𝑤)))))
142		divdivdivap 8700	. . . . . . . . . . . . . 14 ⊢ (((𝑧 ∈ ℂ ∧ (𝑤 ∈ ℂ ∧ 𝑤 # 0)) ∧ (((𝑃↑(𝑃 pCnt 𝑧)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑧)) # 0) ∧ ((𝑃↑(𝑃 pCnt 𝑤)) ∈ ℂ ∧ (𝑃↑(𝑃 pCnt 𝑤)) # 0))) → ((𝑧 / 𝑤) / ((𝑃↑(𝑃 pCnt 𝑧)) / (𝑃↑(𝑃 pCnt 𝑤)))) = ((𝑧 · (𝑃↑(𝑃 pCnt 𝑤))) / (𝑤 · (𝑃↑(𝑃 pCnt 𝑧)))))
143	120, 123, 122, 128, 142	syl22anc 1250	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑧 / 𝑤) / ((𝑃↑(𝑃 pCnt 𝑧)) / (𝑃↑(𝑃 pCnt 𝑤)))) = ((𝑧 · (𝑃↑(𝑃 pCnt 𝑤))) / (𝑤 · (𝑃↑(𝑃 pCnt 𝑧)))))
144	140, 141, 143	3eqtrd 2226	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝐵 / (𝑃↑(𝑃 pCnt 𝐵))) = ((𝑧 · (𝑃↑(𝑃 pCnt 𝑤))) / (𝑤 · (𝑃↑(𝑃 pCnt 𝑧)))))
145	119, 130, 144	3eqtr4d 2232	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑧 / (𝑃↑(𝑃 pCnt 𝑧))) / (𝑤 / (𝑃↑(𝑃 pCnt 𝑤)))) = (𝐵 / (𝑃↑(𝑃 pCnt 𝐵))))
146	145	oveq2d 5912	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝐵)) · ((𝑧 / (𝑃↑(𝑃 pCnt 𝑧))) / (𝑤 / (𝑃↑(𝑃 pCnt 𝑤))))) = ((𝑃↑(𝑃 pCnt 𝐵)) · (𝐵 / (𝑃↑(𝑃 pCnt 𝐵)))))
147		qcn 9664	. . . . . . . . . . . 12 ⊢ (𝐵 ∈ ℚ → 𝐵 ∈ ℂ)
148	29, 147	syl 14	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐵 ∈ ℂ)
149	81, 82, 32	expclzapd 10690	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝐵)) ∈ ℂ)
150	81, 82, 32	expap0d 10691	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝐵)) # 0)
151	148, 149, 150	divcanap2d 8779	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝐵)) · (𝐵 / (𝑃↑(𝑃 pCnt 𝐵)))) = 𝐵)
152	146, 151	eqtr2d 2223	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝐵 = ((𝑃↑(𝑃 pCnt 𝐵)) · ((𝑧 / (𝑃↑(𝑃 pCnt 𝑧))) / (𝑤 / (𝑃↑(𝑃 pCnt 𝑤))))))
153		eluz 9571	. . . . . . . . . . 11 ⊢ (((𝑃 pCnt 𝐴) ∈ ℤ ∧ (𝑃 pCnt 𝐵) ∈ ℤ) → ((𝑃 pCnt 𝐵) ∈ (ℤ_≥‘(𝑃 pCnt 𝐴)) ↔ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)))
154	97, 32, 153	syl2anc 411	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃 pCnt 𝐵) ∈ (ℤ_≥‘(𝑃 pCnt 𝐴)) ↔ (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt 𝐵)))
155	43, 154	mpbird 167	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐵) ∈ (ℤ_≥‘(𝑃 pCnt 𝐴)))
156		pczdvds 12346	. . . . . . . . . . . 12 ⊢ ((𝑃 ∈ ℙ ∧ (𝑥 ∈ ℤ ∧ 𝑥 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝑥)) ∥ 𝑥)
157	22, 25, 58, 156	syl12anc 1247	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑥)) ∥ 𝑥)
158	61	nnzd 9404	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑥)) ∈ ℤ)
159	61	nnne0d 8994	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑥)) ≠ 0)
160		dvdsval2 11829	. . . . . . . . . . . 12 ⊢ (((𝑃↑(𝑃 pCnt 𝑥)) ∈ ℤ ∧ (𝑃↑(𝑃 pCnt 𝑥)) ≠ 0 ∧ 𝑥 ∈ ℤ) → ((𝑃↑(𝑃 pCnt 𝑥)) ∥ 𝑥 ↔ (𝑥 / (𝑃↑(𝑃 pCnt 𝑥))) ∈ ℤ))
161	158, 159, 25, 160	syl3anc 1249	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑥)) ∥ 𝑥 ↔ (𝑥 / (𝑃↑(𝑃 pCnt 𝑥))) ∈ ℤ))
162	157, 161	mpbid 147	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑥 / (𝑃↑(𝑃 pCnt 𝑥))) ∈ ℤ)
163		pczndvds2 12350	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ (𝑥 ∈ ℤ ∧ 𝑥 ≠ 0)) → ¬ 𝑃 ∥ (𝑥 / (𝑃↑(𝑃 pCnt 𝑥))))
164	22, 25, 58, 163	syl12anc 1247	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ¬ 𝑃 ∥ (𝑥 / (𝑃↑(𝑃 pCnt 𝑥))))
165	162, 164	jca 306	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑥 / (𝑃↑(𝑃 pCnt 𝑥))) ∈ ℤ ∧ ¬ 𝑃 ∥ (𝑥 / (𝑃↑(𝑃 pCnt 𝑥)))))
166		pcdvds 12347	. . . . . . . . . . . . 13 ⊢ ((𝑃 ∈ ℙ ∧ 𝑦 ∈ ℕ) → (𝑃↑(𝑃 pCnt 𝑦)) ∥ 𝑦)
167	22, 50, 166	syl2anc 411	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑦)) ∥ 𝑦)
168	70	nnzd 9404	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑦)) ∈ ℤ)
169	70	nnne0d 8994	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑦)) ≠ 0)
170	50	nnzd 9404	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑦 ∈ ℤ)
171		dvdsval2 11829	. . . . . . . . . . . . 13 ⊢ (((𝑃↑(𝑃 pCnt 𝑦)) ∈ ℤ ∧ (𝑃↑(𝑃 pCnt 𝑦)) ≠ 0 ∧ 𝑦 ∈ ℤ) → ((𝑃↑(𝑃 pCnt 𝑦)) ∥ 𝑦 ↔ (𝑦 / (𝑃↑(𝑃 pCnt 𝑦))) ∈ ℤ))
172	168, 169, 170, 171	syl3anc 1249	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑦)) ∥ 𝑦 ↔ (𝑦 / (𝑃↑(𝑃 pCnt 𝑦))) ∈ ℤ))
173	167, 172	mpbid 147	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑦 / (𝑃↑(𝑃 pCnt 𝑦))) ∈ ℤ)
174	50	nnred 8962	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑦 ∈ ℝ)
175	70	nnred 8962	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑦)) ∈ ℝ)
176	50	nngt0d 8993	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 0 < 𝑦)
177	70	nngt0d 8993	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 0 < (𝑃↑(𝑃 pCnt 𝑦)))
178	174, 175, 176, 177	divgt0d 8922	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 0 < (𝑦 / (𝑃↑(𝑃 pCnt 𝑦))))
179		elnnz 9293	. . . . . . . . . . 11 ⊢ ((𝑦 / (𝑃↑(𝑃 pCnt 𝑦))) ∈ ℕ ↔ ((𝑦 / (𝑃↑(𝑃 pCnt 𝑦))) ∈ ℤ ∧ 0 < (𝑦 / (𝑃↑(𝑃 pCnt 𝑦)))))
180	173, 178, 179	sylanbrc 417	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑦 / (𝑃↑(𝑃 pCnt 𝑦))) ∈ ℕ)
181		pcndvds2 12351	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ 𝑦 ∈ ℕ) → ¬ 𝑃 ∥ (𝑦 / (𝑃↑(𝑃 pCnt 𝑦))))
182	22, 50, 181	syl2anc 411	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ¬ 𝑃 ∥ (𝑦 / (𝑃↑(𝑃 pCnt 𝑦))))
183	180, 182	jca 306	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑦 / (𝑃↑(𝑃 pCnt 𝑦))) ∈ ℕ ∧ ¬ 𝑃 ∥ (𝑦 / (𝑃↑(𝑃 pCnt 𝑦)))))
184		pczdvds 12346	. . . . . . . . . . . 12 ⊢ ((𝑃 ∈ ℙ ∧ (𝑧 ∈ ℤ ∧ 𝑧 ≠ 0)) → (𝑃↑(𝑃 pCnt 𝑧)) ∥ 𝑧)
185	22, 102, 113, 184	syl12anc 1247	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑧)) ∥ 𝑧)
186	116	nnzd 9404	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑧)) ∈ ℤ)
187	116	nnne0d 8994	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑧)) ≠ 0)
188		dvdsval2 11829	. . . . . . . . . . . 12 ⊢ (((𝑃↑(𝑃 pCnt 𝑧)) ∈ ℤ ∧ (𝑃↑(𝑃 pCnt 𝑧)) ≠ 0 ∧ 𝑧 ∈ ℤ) → ((𝑃↑(𝑃 pCnt 𝑧)) ∥ 𝑧 ↔ (𝑧 / (𝑃↑(𝑃 pCnt 𝑧))) ∈ ℤ))
189	186, 187, 102, 188	syl3anc 1249	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑧)) ∥ 𝑧 ↔ (𝑧 / (𝑃↑(𝑃 pCnt 𝑧))) ∈ ℤ))
190	185, 189	mpbid 147	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑧 / (𝑃↑(𝑃 pCnt 𝑧))) ∈ ℤ)
191		pczndvds2 12350	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ (𝑧 ∈ ℤ ∧ 𝑧 ≠ 0)) → ¬ 𝑃 ∥ (𝑧 / (𝑃↑(𝑃 pCnt 𝑧))))
192	22, 102, 113, 191	syl12anc 1247	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ¬ 𝑃 ∥ (𝑧 / (𝑃↑(𝑃 pCnt 𝑧))))
193	190, 192	jca 306	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑧 / (𝑃↑(𝑃 pCnt 𝑧))) ∈ ℤ ∧ ¬ 𝑃 ∥ (𝑧 / (𝑃↑(𝑃 pCnt 𝑧)))))
194		pcdvds 12347	. . . . . . . . . . . . 13 ⊢ ((𝑃 ∈ ℙ ∧ 𝑤 ∈ ℕ) → (𝑃↑(𝑃 pCnt 𝑤)) ∥ 𝑤)
195	22, 105, 194	syl2anc 411	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑤)) ∥ 𝑤)
196	125	nnzd 9404	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑤)) ∈ ℤ)
197	125	nnne0d 8994	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑤)) ≠ 0)
198	105	nnzd 9404	. . . . . . . . . . . . 13 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑤 ∈ ℤ)
199		dvdsval2 11829	. . . . . . . . . . . . 13 ⊢ (((𝑃↑(𝑃 pCnt 𝑤)) ∈ ℤ ∧ (𝑃↑(𝑃 pCnt 𝑤)) ≠ 0 ∧ 𝑤 ∈ ℤ) → ((𝑃↑(𝑃 pCnt 𝑤)) ∥ 𝑤 ↔ (𝑤 / (𝑃↑(𝑃 pCnt 𝑤))) ∈ ℤ))
200	196, 197, 198, 199	syl3anc 1249	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑃↑(𝑃 pCnt 𝑤)) ∥ 𝑤 ↔ (𝑤 / (𝑃↑(𝑃 pCnt 𝑤))) ∈ ℤ))
201	195, 200	mpbid 147	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑤 / (𝑃↑(𝑃 pCnt 𝑤))) ∈ ℤ)
202	105	nnred 8962	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 𝑤 ∈ ℝ)
203	125	nnred 8962	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃↑(𝑃 pCnt 𝑤)) ∈ ℝ)
204	105	nngt0d 8993	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 0 < 𝑤)
205	125	nngt0d 8993	. . . . . . . . . . . 12 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 0 < (𝑃↑(𝑃 pCnt 𝑤)))
206	202, 203, 204, 205	divgt0d 8922	. . . . . . . . . . 11 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → 0 < (𝑤 / (𝑃↑(𝑃 pCnt 𝑤))))
207		elnnz 9293	. . . . . . . . . . 11 ⊢ ((𝑤 / (𝑃↑(𝑃 pCnt 𝑤))) ∈ ℕ ↔ ((𝑤 / (𝑃↑(𝑃 pCnt 𝑤))) ∈ ℤ ∧ 0 < (𝑤 / (𝑃↑(𝑃 pCnt 𝑤)))))
208	201, 206, 207	sylanbrc 417	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑤 / (𝑃↑(𝑃 pCnt 𝑤))) ∈ ℕ)
209		pcndvds2 12351	. . . . . . . . . . 11 ⊢ ((𝑃 ∈ ℙ ∧ 𝑤 ∈ ℕ) → ¬ 𝑃 ∥ (𝑤 / (𝑃↑(𝑃 pCnt 𝑤))))
210	22, 105, 209	syl2anc 411	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ¬ 𝑃 ∥ (𝑤 / (𝑃↑(𝑃 pCnt 𝑤))))
211	208, 210	jca 306	. . . . . . . . 9 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → ((𝑤 / (𝑃↑(𝑃 pCnt 𝑤))) ∈ ℕ ∧ ¬ 𝑃 ∥ (𝑤 / (𝑃↑(𝑃 pCnt 𝑤)))))
212	22, 101, 152, 155, 165, 183, 193, 211	pcaddlem 12371	. . . . . . . 8 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ ((𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ) ∧ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)))) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵)))
213	212	expr 375	. . . . . . 7 ⊢ ((((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) ∧ (𝑦 ∈ ℕ ∧ 𝑤 ∈ ℕ)) → ((𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵))))
214	213	rexlimdvva 2615	. . . . . 6 ⊢ (((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) → (∃𝑦 ∈ ℕ ∃𝑤 ∈ ℕ (𝐴 = (𝑥 / 𝑦) ∧ 𝐵 = (𝑧 / 𝑤)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵))))
215	21, 214	biimtrrid 153	. . . . 5 ⊢ (((𝜑 ∧ 𝐵 ≠ 0) ∧ (𝑥 ∈ ℤ ∧ 𝑧 ∈ ℤ)) → ((∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵))))
216	215	rexlimdvva 2615	. . . 4 ⊢ ((𝜑 ∧ 𝐵 ≠ 0) → (∃𝑥 ∈ ℤ ∃𝑧 ∈ ℤ (∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵))))
217	20, 216	biimtrrid 153	. . 3 ⊢ ((𝜑 ∧ 𝐵 ≠ 0) → ((∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵))))
218		0z 9294	. . . . . 6 ⊢ 0 ∈ ℤ
219		zq 9656	. . . . . 6 ⊢ (0 ∈ ℤ → 0 ∈ ℚ)
220	218, 219	mp1i 10	. . . . 5 ⊢ (𝜑 → 0 ∈ ℚ)
221		qdceq 10277	. . . . 5 ⊢ ((𝐵 ∈ ℚ ∧ 0 ∈ ℚ) → DECID 𝐵 = 0)
222	4, 220, 221	syl2anc 411	. . . 4 ⊢ (𝜑 → DECID 𝐵 = 0)
223		dcne 2371	. . . 4 ⊢ (DECID 𝐵 = 0 ↔ (𝐵 = 0 ∨ 𝐵 ≠ 0))
224	222, 223	sylib 122	. . 3 ⊢ (𝜑 → (𝐵 = 0 ∨ 𝐵 ≠ 0))
225	19, 217, 224	mpjaodan 799	. 2 ⊢ (𝜑 → ((∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ 𝐴 = (𝑥 / 𝑦) ∧ ∃𝑧 ∈ ℤ ∃𝑤 ∈ ℕ 𝐵 = (𝑧 / 𝑤)) → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵))))
226	3, 6, 225	mp2and 433	1 ⊢ (𝜑 → (𝑃 pCnt 𝐴) ≤ (𝑃 pCnt (𝐴 + 𝐵)))

Colors of variables: wff set class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 104 ↔ wb 105 ∨ wo 709 DECID wdc 835 = wceq 1364 ∈ wcel 2160 ≠ wne 2360 ∃wrex 2469 class class class wbr 4018 ‘cfv 5235 (class class class)co 5896 ℂcc 7839 0cc0 7841 + caddc 7844 · cmul 7846 +∞cpnf 8019 ℝ^*cxr 8021 < clt 8022 ≤ cle 8023 − cmin 8158 # cap 8568 / cdiv 8659 ℕcn 8949 ℕ₀cn0 9206 ℤcz 9283 ℤ_≥cuz 9558 ℚcq 9649 ↑cexp 10550 ∥ cdvds 11826 ℙcprime 12139 pCnt cpc 12316

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 1458 ax-7 1459 ax-gen 1460 ax-ie1 1504 ax-ie2 1505 ax-8 1515 ax-10 1516 ax-11 1517 ax-i12 1518 ax-bndl 1520 ax-4 1521 ax-17 1537 ax-i9 1541 ax-ial 1545 ax-i5r 1546 ax-13 2162 ax-14 2163 ax-ext 2171 ax-coll 4133 ax-sep 4136 ax-nul 4144 ax-pow 4192 ax-pr 4227 ax-un 4451 ax-setind 4554 ax-iinf 4605 ax-cnex 7932 ax-resscn 7933 ax-1cn 7934 ax-1re 7935 ax-icn 7936 ax-addcl 7937 ax-addrcl 7938 ax-mulcl 7939 ax-mulrcl 7940 ax-addcom 7941 ax-mulcom 7942 ax-addass 7943 ax-mulass 7944 ax-distr 7945 ax-i2m1 7946 ax-0lt1 7947 ax-1rid 7948 ax-0id 7949 ax-rnegex 7950 ax-precex 7951 ax-cnre 7952 ax-pre-ltirr 7953 ax-pre-ltwlin 7954 ax-pre-lttrn 7955 ax-pre-apti 7956 ax-pre-ltadd 7957 ax-pre-mulgt0 7958 ax-pre-mulext 7959 ax-arch 7960 ax-caucvg 7961

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 1472 df-sb 1774 df-eu 2041 df-mo 2042 df-clab 2176 df-cleq 2182 df-clel 2185 df-nfc 2321 df-ne 2361 df-nel 2456 df-ral 2473 df-rex 2474 df-reu 2475 df-rmo 2476 df-rab 2477 df-v 2754 df-sbc 2978 df-csb 3073 df-dif 3146 df-un 3148 df-in 3150 df-ss 3157 df-nul 3438 df-if 3550 df-pw 3592 df-sn 3613 df-pr 3614 df-op 3616 df-uni 3825 df-int 3860 df-iun 3903 df-br 4019 df-opab 4080 df-mpt 4081 df-tr 4117 df-id 4311 df-po 4314 df-iso 4315 df-iord 4384 df-on 4386 df-ilim 4387 df-suc 4389 df-iom 4608 df-xp 4650 df-rel 4651 df-cnv 4652 df-co 4653 df-dm 4654 df-rn 4655 df-res 4656 df-ima 4657 df-iota 5196 df-fun 5237 df-fn 5238 df-f 5239 df-f1 5240 df-fo 5241 df-f1o 5242 df-fv 5243 df-isom 5244 df-riota 5852 df-ov 5899 df-oprab 5900 df-mpo 5901 df-1st 6165 df-2nd 6166 df-recs 6330 df-frec 6416 df-1o 6441 df-2o 6442 df-er 6559 df-en 6767 df-sup 7013 df-inf 7014 df-pnf 8024 df-mnf 8025 df-xr 8026 df-ltxr 8027 df-le 8028 df-sub 8160 df-neg 8161 df-reap 8562 df-ap 8569 df-div 8660 df-inn 8950 df-2 9008 df-3 9009 df-4 9010 df-n0 9207 df-z 9284 df-uz 9559 df-q 9650 df-rp 9684 df-fz 10039 df-fzo 10173 df-fl 10301 df-mod 10354 df-seqfrec 10477 df-exp 10551 df-cj 10883 df-re 10884 df-im 10885 df-rsqrt 11039 df-abs 11040 df-dvds 11827 df-gcd 11976 df-prm 12140 df-pc 12317

This theorem is referenced by: pcadd2 12373

W3C validator