prmreclem1 - Metamath Proof Explorer

	Metamath Proof Explorer		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > prmreclem1		Structured version Visualization version GIF version

Theorem prmreclem1 16246

Description: Lemma for prmrec 16252. Properties of the "square part" function, which extracts the 𝑚 of the decomposition 𝑁 = 𝑟𝑚↑2, with 𝑚 maximal and 𝑟 squarefree. (Contributed by Mario Carneiro, 5-Aug-2014.)

**Hypothesis**
Ref	Expression
prmreclem1.1	⊢ 𝑄 = (𝑛 ∈ ℕ ↦ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛}, ℝ, < ))

**Assertion**
Ref	Expression
prmreclem1	⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁) ∈ ℕ ∧ ((𝑄‘𝑁)↑2) ∥ 𝑁 ∧ (𝐾 ∈ (ℤ_≥‘2) → ¬ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)))))

Distinct variable groups: 𝐾,𝑟 𝑛,𝑟,𝑁 𝑄,𝑟 Allowed substitution hints: 𝑄(𝑛) 𝐾(𝑛)

Proof of Theorem prmreclem1 Dummy variables 𝑥 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ssrab2 4055	. . 3 ⊢ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℕ
2		breq2 5062	. . . . . . 7 ⊢ (𝑛 = 𝑁 → ((𝑟↑2) ∥ 𝑛 ↔ (𝑟↑2) ∥ 𝑁))
3	2	rabbidv 3480	. . . . . 6 ⊢ (𝑛 = 𝑁 → {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛} = {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
4	3	supeq1d 8904	. . . . 5 ⊢ (𝑛 = 𝑁 → sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛}, ℝ, < ) = sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
5		prmreclem1.1	. . . . 5 ⊢ 𝑄 = (𝑛 ∈ ℕ ↦ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛}, ℝ, < ))
6		ltso 10715	. . . . . 6 ⊢ < Or ℝ
7	6	supex 8921	. . . . 5 ⊢ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ) ∈ V
8	4, 5, 7	fvmpt 6762	. . . 4 ⊢ (𝑁 ∈ ℕ → (𝑄‘𝑁) = sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
9		nnssz 11996	. . . . . 6 ⊢ ℕ ⊆ ℤ
10	1, 9	sstri 3975	. . . . 5 ⊢ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℤ
11		oveq1 7157	. . . . . . . . 9 ⊢ (𝑟 = 1 → (𝑟↑2) = (1↑2))
12		sq1 13552	. . . . . . . . 9 ⊢ (1↑2) = 1
13	11, 12	syl6eq 2872	. . . . . . . 8 ⊢ (𝑟 = 1 → (𝑟↑2) = 1)
14	13	breq1d 5068	. . . . . . 7 ⊢ (𝑟 = 1 → ((𝑟↑2) ∥ 𝑁 ↔ 1 ∥ 𝑁))
15		1nn 11643	. . . . . . . 8 ⊢ 1 ∈ ℕ
16	15	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 1 ∈ ℕ)
17		nnz 11998	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
18		1dvds 15618	. . . . . . . 8 ⊢ (𝑁 ∈ ℤ → 1 ∥ 𝑁)
19	17, 18	syl 17	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 1 ∥ 𝑁)
20	14, 16, 19	elrabd 3681	. . . . . 6 ⊢ (𝑁 ∈ ℕ → 1 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
21	20	ne0d 4300	. . . . 5 ⊢ (𝑁 ∈ ℕ → {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ≠ ∅)
22		nnz 11998	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℕ → 𝑧 ∈ ℤ)
23		zsqcl 13488	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℤ → (𝑧↑2) ∈ ℤ)
24	22, 23	syl 17	. . . . . . . . . 10 ⊢ (𝑧 ∈ ℕ → (𝑧↑2) ∈ ℤ)
25		id 22	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℕ)
26		dvdsle 15654	. . . . . . . . . 10 ⊢ (((𝑧↑2) ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑧↑2) ∥ 𝑁 → (𝑧↑2) ≤ 𝑁))
27	24, 25, 26	syl2anr 598	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → ((𝑧↑2) ∥ 𝑁 → (𝑧↑2) ≤ 𝑁))
28		nnlesq 13562	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℕ → 𝑧 ≤ (𝑧↑2))
29	28	adantl 484	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → 𝑧 ≤ (𝑧↑2))
30		nnre 11639	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ℕ → 𝑧 ∈ ℝ)
31	30	adantl 484	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → 𝑧 ∈ ℝ)
32	31	resqcld 13605	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → (𝑧↑2) ∈ ℝ)
33		nnre 11639	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℝ)
34	33	adantr 483	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → 𝑁 ∈ ℝ)
35		letr 10728	. . . . . . . . . . 11 ⊢ ((𝑧 ∈ ℝ ∧ (𝑧↑2) ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑧 ≤ (𝑧↑2) ∧ (𝑧↑2) ≤ 𝑁) → 𝑧 ≤ 𝑁))
36	31, 32, 34, 35	syl3anc 1367	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → ((𝑧 ≤ (𝑧↑2) ∧ (𝑧↑2) ≤ 𝑁) → 𝑧 ≤ 𝑁))
37	29, 36	mpand 693	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → ((𝑧↑2) ≤ 𝑁 → 𝑧 ≤ 𝑁))
38	27, 37	syld 47	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → ((𝑧↑2) ∥ 𝑁 → 𝑧 ≤ 𝑁))
39	38	ralrimiva 3182	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → ∀𝑧 ∈ ℕ ((𝑧↑2) ∥ 𝑁 → 𝑧 ≤ 𝑁))
40		oveq1 7157	. . . . . . . . 9 ⊢ (𝑟 = 𝑧 → (𝑟↑2) = (𝑧↑2))
41	40	breq1d 5068	. . . . . . . 8 ⊢ (𝑟 = 𝑧 → ((𝑟↑2) ∥ 𝑁 ↔ (𝑧↑2) ∥ 𝑁))
42	41	ralrab 3684	. . . . . . 7 ⊢ (∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑁 ↔ ∀𝑧 ∈ ℕ ((𝑧↑2) ∥ 𝑁 → 𝑧 ≤ 𝑁))
43	39, 42	sylibr 236	. . . . . 6 ⊢ (𝑁 ∈ ℕ → ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑁)
44		brralrspcev 5118	. . . . . 6 ⊢ ((𝑁 ∈ ℤ ∧ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑁) → ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥)
45	17, 43, 44	syl2anc 586	. . . . 5 ⊢ (𝑁 ∈ ℕ → ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥)
46		suprzcl2 12332	. . . . 5 ⊢ (({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℤ ∧ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ≠ ∅ ∧ ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥) → sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
47	10, 21, 45, 46	mp3an2i 1462	. . . 4 ⊢ (𝑁 ∈ ℕ → sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
48	8, 47	eqeltrd 2913	. . 3 ⊢ (𝑁 ∈ ℕ → (𝑄‘𝑁) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
49	1, 48	sseldi 3964	. 2 ⊢ (𝑁 ∈ ℕ → (𝑄‘𝑁) ∈ ℕ)
50		oveq1 7157	. . . . . 6 ⊢ (𝑧 = (𝑄‘𝑁) → (𝑧↑2) = ((𝑄‘𝑁)↑2))
51	50	breq1d 5068	. . . . 5 ⊢ (𝑧 = (𝑄‘𝑁) → ((𝑧↑2) ∥ 𝑁 ↔ ((𝑄‘𝑁)↑2) ∥ 𝑁))
52	41	cbvrabv 3491	. . . . 5 ⊢ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} = {𝑧 ∈ ℕ ∣ (𝑧↑2) ∥ 𝑁}
53	51, 52	elrab2 3682	. . . 4 ⊢ ((𝑄‘𝑁) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ↔ ((𝑄‘𝑁) ∈ ℕ ∧ ((𝑄‘𝑁)↑2) ∥ 𝑁))
54	48, 53	sylib 220	. . 3 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁) ∈ ℕ ∧ ((𝑄‘𝑁)↑2) ∥ 𝑁))
55	54	simprd 498	. 2 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ∥ 𝑁)
56	49	adantr 483	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) ∈ ℕ)
57	56	nncnd 11648	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) ∈ ℂ)
58	57	mulid1d 10652	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 1) = (𝑄‘𝑁))
59		eluz2gt1 12314	. . . . . . . 8 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 1 < 𝐾)
60	59	adantl 484	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 1 < 𝐾)
61		1red 10636	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 1 ∈ ℝ)
62		eluz2nn 12278	. . . . . . . . . 10 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 𝐾 ∈ ℕ)
63	62	adantl 484	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 𝐾 ∈ ℕ)
64	63	nnred 11647	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 𝐾 ∈ ℝ)
65	56	nnred 11647	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) ∈ ℝ)
66	56	nngt0d 11680	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 0 < (𝑄‘𝑁))
67		ltmul2 11485	. . . . . . . 8 ⊢ ((1 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ ((𝑄‘𝑁) ∈ ℝ ∧ 0 < (𝑄‘𝑁))) → (1 < 𝐾 ↔ ((𝑄‘𝑁) · 1) < ((𝑄‘𝑁) · 𝐾)))
68	61, 64, 65, 66, 67	syl112anc 1370	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (1 < 𝐾 ↔ ((𝑄‘𝑁) · 1) < ((𝑄‘𝑁) · 𝐾)))
69	60, 68	mpbid 234	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 1) < ((𝑄‘𝑁) · 𝐾))
70	58, 69	eqbrtrrd 5082	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) < ((𝑄‘𝑁) · 𝐾))
71		nnmulcl 11655	. . . . . . . 8 ⊢ (((𝑄‘𝑁) ∈ ℕ ∧ 𝐾 ∈ ℕ) → ((𝑄‘𝑁) · 𝐾) ∈ ℕ)
72	49, 62, 71	syl2an 597	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 𝐾) ∈ ℕ)
73	72	nnred 11647	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 𝐾) ∈ ℝ)
74	65, 73	ltnled 10781	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) < ((𝑄‘𝑁) · 𝐾) ↔ ¬ ((𝑄‘𝑁) · 𝐾) ≤ (𝑄‘𝑁)))
75	70, 74	mpbid 234	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ¬ ((𝑄‘𝑁) · 𝐾) ≤ (𝑄‘𝑁))
76	45	ad2antrr 724	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥)
77		oveq1 7157	. . . . . . . 8 ⊢ (𝑟 = ((𝑄‘𝑁) · 𝐾) → (𝑟↑2) = (((𝑄‘𝑁) · 𝐾)↑2))
78	77	breq1d 5068	. . . . . . 7 ⊢ (𝑟 = ((𝑄‘𝑁) · 𝐾) → ((𝑟↑2) ∥ 𝑁 ↔ (((𝑄‘𝑁) · 𝐾)↑2) ∥ 𝑁))
79	72	adantr 483	. . . . . . 7 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁) · 𝐾) ∈ ℕ)
80		simpr 487	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)))
81	63	adantr 483	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → 𝐾 ∈ ℕ)
82	81	nnsqcld 13599	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝐾↑2) ∈ ℕ)
83		nnz 11998	. . . . . . . . . . 11 ⊢ ((𝐾↑2) ∈ ℕ → (𝐾↑2) ∈ ℤ)
84	82, 83	syl 17	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝐾↑2) ∈ ℤ)
85	49	nnsqcld 13599	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ∈ ℕ)
86	9, 85	sseldi 3964	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ∈ ℤ)
87	85	nnne0d 11681	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ≠ 0)
88		dvdsval2 15604	. . . . . . . . . . . . 13 ⊢ ((((𝑄‘𝑁)↑2) ∈ ℤ ∧ ((𝑄‘𝑁)↑2) ≠ 0 ∧ 𝑁 ∈ ℤ) → (((𝑄‘𝑁)↑2) ∥ 𝑁 ↔ (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ))
89	86, 87, 17, 88	syl3anc 1367	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (((𝑄‘𝑁)↑2) ∥ 𝑁 ↔ (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ))
90	55, 89	mpbid 234	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ)
91	90	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ)
92	86	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ∈ ℤ)
93		dvdscmul 15630	. . . . . . . . . 10 ⊢ (((𝐾↑2) ∈ ℤ ∧ (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ ∧ ((𝑄‘𝑁)↑2) ∈ ℤ) → ((𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)) → (((𝑄‘𝑁)↑2) · (𝐾↑2)) ∥ (((𝑄‘𝑁)↑2) · (𝑁 / ((𝑄‘𝑁)↑2)))))
94	84, 91, 92, 93	syl3anc 1367	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)) → (((𝑄‘𝑁)↑2) · (𝐾↑2)) ∥ (((𝑄‘𝑁)↑2) · (𝑁 / ((𝑄‘𝑁)↑2)))))
95	80, 94	mpd 15	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁)↑2) · (𝐾↑2)) ∥ (((𝑄‘𝑁)↑2) · (𝑁 / ((𝑄‘𝑁)↑2))))
96	57	adantr 483	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝑄‘𝑁) ∈ ℂ)
97	81	nncnd 11648	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → 𝐾 ∈ ℂ)
98	96, 97	sqmuld 13516	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁) · 𝐾)↑2) = (((𝑄‘𝑁)↑2) · (𝐾↑2)))
99	98	eqcomd 2827	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁)↑2) · (𝐾↑2)) = (((𝑄‘𝑁) · 𝐾)↑2))
100		nncn 11640	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℂ)
101	100	ad2antrr 724	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → 𝑁 ∈ ℂ)
102	85	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ∈ ℕ)
103	102	nncnd 11648	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ∈ ℂ)
104	87	ad2antrr 724	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ≠ 0)
105	101, 103, 104	divcan2d 11412	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁)↑2) · (𝑁 / ((𝑄‘𝑁)↑2))) = 𝑁)
106	95, 99, 105	3brtr3d 5089	. . . . . . 7 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁) · 𝐾)↑2) ∥ 𝑁)
107	78, 79, 106	elrabd 3681	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁) · 𝐾) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
108		suprzub 12333	. . . . . 6 ⊢ (({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℤ ∧ ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥 ∧ ((𝑄‘𝑁) · 𝐾) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}) → ((𝑄‘𝑁) · 𝐾) ≤ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
109	10, 76, 107, 108	mp3an2i 1462	. . . . 5 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁) · 𝐾) ≤ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
110	8	ad2antrr 724	. . . . 5 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝑄‘𝑁) = sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
111	109, 110	breqtrrd 5086	. . . 4 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁) · 𝐾) ≤ (𝑄‘𝑁))
112	75, 111	mtand 814	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ¬ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)))
113	112	ex 415	. 2 ⊢ (𝑁 ∈ ℕ → (𝐾 ∈ (ℤ_≥‘2) → ¬ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))))
114	49, 55, 113	3jca 1124	1 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁) ∈ ℕ ∧ ((𝑄‘𝑁)↑2) ∥ 𝑁 ∧ (𝐾 ∈ (ℤ_≥‘2) → ¬ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 208 ∧ wa 398 ∧ w3a 1083 = wceq 1533 ∈ wcel 2110 ≠ wne 3016 ∀wral 3138 ∃wrex 3139 {crab 3142 ⊆ wss 3935 ∅c0 4290 class class class wbr 5058 ↦ cmpt 5138 ‘cfv 6349 (class class class)co 7150 supcsup 8898 ℂcc 10529 ℝcr 10530 0cc0 10531 1c1 10532 · cmul 10536 < clt 10669 ≤ cle 10670 / cdiv 11291 ℕcn 11632 2c2 11686 ℤcz 11975 ℤ_≥cuz 12237 ↑cexp 13423 ∥ cdvds 15601

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1792 ax-4 1806 ax-5 1907 ax-6 1966 ax-7 2011 ax-8 2112 ax-9 2120 ax-10 2141 ax-11 2157 ax-12 2173 ax-ext 2793 ax-sep 5195 ax-nul 5202 ax-pow 5258 ax-pr 5321 ax-un 7455 ax-cnex 10587 ax-resscn 10588 ax-1cn 10589 ax-icn 10590 ax-addcl 10591 ax-addrcl 10592 ax-mulcl 10593 ax-mulrcl 10594 ax-mulcom 10595 ax-addass 10596 ax-mulass 10597 ax-distr 10598 ax-i2m1 10599 ax-1ne0 10600 ax-1rid 10601 ax-rnegex 10602 ax-rrecex 10603 ax-cnre 10604 ax-pre-lttri 10605 ax-pre-lttrn 10606 ax-pre-ltadd 10607 ax-pre-mulgt0 10608

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1536 df-ex 1777 df-nf 1781 df-sb 2066 df-mo 2618 df-eu 2650 df-clab 2800 df-cleq 2814 df-clel 2893 df-nfc 2963 df-ne 3017 df-nel 3124 df-ral 3143 df-rex 3144 df-reu 3145 df-rmo 3146 df-rab 3147 df-v 3496 df-sbc 3772 df-csb 3883 df-dif 3938 df-un 3940 df-in 3942 df-ss 3951 df-pss 3953 df-nul 4291 df-if 4467 df-pw 4540 df-sn 4561 df-pr 4563 df-tp 4565 df-op 4567 df-uni 4832 df-iun 4913 df-br 5059 df-opab 5121 df-mpt 5139 df-tr 5165 df-id 5454 df-eprel 5459 df-po 5468 df-so 5469 df-fr 5508 df-we 5510 df-xp 5555 df-rel 5556 df-cnv 5557 df-co 5558 df-dm 5559 df-rn 5560 df-res 5561 df-ima 5562 df-pred 6142 df-ord 6188 df-on 6189 df-lim 6190 df-suc 6191 df-iota 6308 df-fun 6351 df-fn 6352 df-f 6353 df-f1 6354 df-fo 6355 df-f1o 6356 df-fv 6357 df-riota 7108 df-ov 7153 df-oprab 7154 df-mpo 7155 df-om 7575 df-2nd 7684 df-wrecs 7941 df-recs 8002 df-rdg 8040 df-er 8283 df-en 8504 df-dom 8505 df-sdom 8506 df-sup 8900 df-inf 8901 df-pnf 10671 df-mnf 10672 df-xr 10673 df-ltxr 10674 df-le 10675 df-sub 10866 df-neg 10867 df-div 11292 df-nn 11633 df-2 11694 df-n0 11892 df-z 11976 df-uz 12238 df-seq 13364 df-exp 13424 df-dvds 15602

This theorem is referenced by: prmreclem2 16247 prmreclem3 16248

W3C validator