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 16254

Description: Lemma for prmrec 16260. 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 4058	. . 3 ⊢ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℕ
2		breq2 5072	. . . . . . 7 ⊢ (𝑛 = 𝑁 → ((𝑟↑2) ∥ 𝑛 ↔ (𝑟↑2) ∥ 𝑁))
3	2	rabbidv 3482	. . . . . 6 ⊢ (𝑛 = 𝑁 → {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛} = {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
4	3	supeq1d 8912	. . . . 5 ⊢ (𝑛 = 𝑁 → sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛}, ℝ, < ) = sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
5		prmreclem1.1	. . . . 5 ⊢ 𝑄 = (𝑛 ∈ ℕ ↦ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛}, ℝ, < ))
6		ltso 10723	. . . . . 6 ⊢ < Or ℝ
7	6	supex 8929	. . . . 5 ⊢ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ) ∈ V
8	4, 5, 7	fvmpt 6770	. . . 4 ⊢ (𝑁 ∈ ℕ → (𝑄‘𝑁) = sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
9		nnssz 12005	. . . . . 6 ⊢ ℕ ⊆ ℤ
10	1, 9	sstri 3978	. . . . 5 ⊢ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℤ
11		oveq1 7165	. . . . . . . . 9 ⊢ (𝑟 = 1 → (𝑟↑2) = (1↑2))
12		sq1 13561	. . . . . . . . 9 ⊢ (1↑2) = 1
13	11, 12	syl6eq 2874	. . . . . . . 8 ⊢ (𝑟 = 1 → (𝑟↑2) = 1)
14	13	breq1d 5078	. . . . . . 7 ⊢ (𝑟 = 1 → ((𝑟↑2) ∥ 𝑁 ↔ 1 ∥ 𝑁))
15		1nn 11651	. . . . . . . 8 ⊢ 1 ∈ ℕ
16	15	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 1 ∈ ℕ)
17		nnz 12007	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
18		1dvds 15626	. . . . . . . 8 ⊢ (𝑁 ∈ ℤ → 1 ∥ 𝑁)
19	17, 18	syl 17	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 1 ∥ 𝑁)
20	14, 16, 19	elrabd 3684	. . . . . 6 ⊢ (𝑁 ∈ ℕ → 1 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
21	20	ne0d 4303	. . . . 5 ⊢ (𝑁 ∈ ℕ → {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ≠ ∅)
22		nnz 12007	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℕ → 𝑧 ∈ ℤ)
23		zsqcl 13497	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℤ → (𝑧↑2) ∈ ℤ)
24	22, 23	syl 17	. . . . . . . . . 10 ⊢ (𝑧 ∈ ℕ → (𝑧↑2) ∈ ℤ)
25		id 22	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℕ)
26		dvdsle 15662	. . . . . . . . . 10 ⊢ (((𝑧↑2) ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑧↑2) ∥ 𝑁 → (𝑧↑2) ≤ 𝑁))
27	24, 25, 26	syl2anr 598	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → ((𝑧↑2) ∥ 𝑁 → (𝑧↑2) ≤ 𝑁))
28		nnlesq 13571	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℕ → 𝑧 ≤ (𝑧↑2))
29	28	adantl 484	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → 𝑧 ≤ (𝑧↑2))
30		nnre 11647	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ℕ → 𝑧 ∈ ℝ)
31	30	adantl 484	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → 𝑧 ∈ ℝ)
32	31	resqcld 13614	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → (𝑧↑2) ∈ ℝ)
33		nnre 11647	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℝ)
34	33	adantr 483	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → 𝑁 ∈ ℝ)
35		letr 10736	. . . . . . . . . . 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 3184	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → ∀𝑧 ∈ ℕ ((𝑧↑2) ∥ 𝑁 → 𝑧 ≤ 𝑁))
40		oveq1 7165	. . . . . . . . 9 ⊢ (𝑟 = 𝑧 → (𝑟↑2) = (𝑧↑2))
41	40	breq1d 5078	. . . . . . . 8 ⊢ (𝑟 = 𝑧 → ((𝑟↑2) ∥ 𝑁 ↔ (𝑧↑2) ∥ 𝑁))
42	41	ralrab 3687	. . . . . . 7 ⊢ (∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑁 ↔ ∀𝑧 ∈ ℕ ((𝑧↑2) ∥ 𝑁 → 𝑧 ≤ 𝑁))
43	39, 42	sylibr 236	. . . . . 6 ⊢ (𝑁 ∈ ℕ → ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑁)
44		brralrspcev 5128	. . . . . 6 ⊢ ((𝑁 ∈ ℤ ∧ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑁) → ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥)
45	17, 43, 44	syl2anc 586	. . . . 5 ⊢ (𝑁 ∈ ℕ → ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥)
46		suprzcl2 12341	. . . . 5 ⊢ (({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℤ ∧ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ≠ ∅ ∧ ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥) → sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
47	10, 21, 45, 46	mp3an2i 1462	. . . 4 ⊢ (𝑁 ∈ ℕ → sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
48	8, 47	eqeltrd 2915	. . 3 ⊢ (𝑁 ∈ ℕ → (𝑄‘𝑁) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
49	1, 48	sseldi 3967	. 2 ⊢ (𝑁 ∈ ℕ → (𝑄‘𝑁) ∈ ℕ)
50		oveq1 7165	. . . . . 6 ⊢ (𝑧 = (𝑄‘𝑁) → (𝑧↑2) = ((𝑄‘𝑁)↑2))
51	50	breq1d 5078	. . . . 5 ⊢ (𝑧 = (𝑄‘𝑁) → ((𝑧↑2) ∥ 𝑁 ↔ ((𝑄‘𝑁)↑2) ∥ 𝑁))
52	41	cbvrabv 3493	. . . . 5 ⊢ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} = {𝑧 ∈ ℕ ∣ (𝑧↑2) ∥ 𝑁}
53	51, 52	elrab2 3685	. . . 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 11656	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) ∈ ℂ)
58	57	mulid1d 10660	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 1) = (𝑄‘𝑁))
59		eluz2gt1 12323	. . . . . . . 8 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 1 < 𝐾)
60	59	adantl 484	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 1 < 𝐾)
61		1red 10644	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 1 ∈ ℝ)
62		eluz2nn 12287	. . . . . . . . . 10 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 𝐾 ∈ ℕ)
63	62	adantl 484	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 𝐾 ∈ ℕ)
64	63	nnred 11655	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 𝐾 ∈ ℝ)
65	56	nnred 11655	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) ∈ ℝ)
66	56	nngt0d 11689	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 0 < (𝑄‘𝑁))
67		ltmul2 11493	. . . . . . . 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 5092	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) < ((𝑄‘𝑁) · 𝐾))
71		nnmulcl 11664	. . . . . . . 8 ⊢ (((𝑄‘𝑁) ∈ ℕ ∧ 𝐾 ∈ ℕ) → ((𝑄‘𝑁) · 𝐾) ∈ ℕ)
72	49, 62, 71	syl2an 597	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 𝐾) ∈ ℕ)
73	72	nnred 11655	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 𝐾) ∈ ℝ)
74	65, 73	ltnled 10789	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) < ((𝑄‘𝑁) · 𝐾) ↔ ¬ ((𝑄‘𝑁) · 𝐾) ≤ (𝑄‘𝑁)))
75	70, 74	mpbid 234	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ¬ ((𝑄‘𝑁) · 𝐾) ≤ (𝑄‘𝑁))
76	45	ad2antrr 724	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥)
77		oveq1 7165	. . . . . . . 8 ⊢ (𝑟 = ((𝑄‘𝑁) · 𝐾) → (𝑟↑2) = (((𝑄‘𝑁) · 𝐾)↑2))
78	77	breq1d 5078	. . . . . . 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 13608	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝐾↑2) ∈ ℕ)
83		nnz 12007	. . . . . . . . . . 11 ⊢ ((𝐾↑2) ∈ ℕ → (𝐾↑2) ∈ ℤ)
84	82, 83	syl 17	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝐾↑2) ∈ ℤ)
85	49	nnsqcld 13608	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ∈ ℕ)
86	9, 85	sseldi 3967	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ∈ ℤ)
87	85	nnne0d 11690	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ≠ 0)
88		dvdsval2 15612	. . . . . . . . . . . . 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 15638	. . . . . . . . . 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 11656	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → 𝐾 ∈ ℂ)
98	96, 97	sqmuld 13525	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁) · 𝐾)↑2) = (((𝑄‘𝑁)↑2) · (𝐾↑2)))
99	98	eqcomd 2829	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁)↑2) · (𝐾↑2)) = (((𝑄‘𝑁) · 𝐾)↑2))
100		nncn 11648	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℂ)
101	100	ad2antrr 724	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → 𝑁 ∈ ℂ)
102	85	ad2antrr 724	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ∈ ℕ)
103	102	nncnd 11656	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ∈ ℂ)
104	87	ad2antrr 724	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ≠ 0)
105	101, 103, 104	divcan2d 11420	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁)↑2) · (𝑁 / ((𝑄‘𝑁)↑2))) = 𝑁)
106	95, 99, 105	3brtr3d 5099	. . . . . . 7 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁) · 𝐾)↑2) ∥ 𝑁)
107	78, 79, 106	elrabd 3684	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁) · 𝐾) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
108		suprzub 12342	. . . . . 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 5096	. . . 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 1537 ∈ wcel 2114 ≠ wne 3018 ∀wral 3140 ∃wrex 3141 {crab 3144 ⊆ wss 3938 ∅c0 4293 class class class wbr 5068 ↦ cmpt 5148 ‘cfv 6357 (class class class)co 7158 supcsup 8906 ℂcc 10537 ℝcr 10538 0cc0 10539 1c1 10540 · cmul 10544 < clt 10677 ≤ cle 10678 / cdiv 11299 ℕcn 11640 2c2 11695 ℤcz 11984 ℤ_≥cuz 12246 ↑cexp 13432 ∥ cdvds 15609

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2795 ax-sep 5205 ax-nul 5212 ax-pow 5268 ax-pr 5332 ax-un 7463 ax-cnex 10595 ax-resscn 10596 ax-1cn 10597 ax-icn 10598 ax-addcl 10599 ax-addrcl 10600 ax-mulcl 10601 ax-mulrcl 10602 ax-mulcom 10603 ax-addass 10604 ax-mulass 10605 ax-distr 10606 ax-i2m1 10607 ax-1ne0 10608 ax-1rid 10609 ax-rnegex 10610 ax-rrecex 10611 ax-cnre 10612 ax-pre-lttri 10613 ax-pre-lttrn 10614 ax-pre-ltadd 10615 ax-pre-mulgt0 10616

This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2654 df-clab 2802 df-cleq 2816 df-clel 2895 df-nfc 2965 df-ne 3019 df-nel 3126 df-ral 3145 df-rex 3146 df-reu 3147 df-rmo 3148 df-rab 3149 df-v 3498 df-sbc 3775 df-csb 3886 df-dif 3941 df-un 3943 df-in 3945 df-ss 3954 df-pss 3956 df-nul 4294 df-if 4470 df-pw 4543 df-sn 4570 df-pr 4572 df-tp 4574 df-op 4576 df-uni 4841 df-iun 4923 df-br 5069 df-opab 5131 df-mpt 5149 df-tr 5175 df-id 5462 df-eprel 5467 df-po 5476 df-so 5477 df-fr 5516 df-we 5518 df-xp 5563 df-rel 5564 df-cnv 5565 df-co 5566 df-dm 5567 df-rn 5568 df-res 5569 df-ima 5570 df-pred 6150 df-ord 6196 df-on 6197 df-lim 6198 df-suc 6199 df-iota 6316 df-fun 6359 df-fn 6360 df-f 6361 df-f1 6362 df-fo 6363 df-f1o 6364 df-fv 6365 df-riota 7116 df-ov 7161 df-oprab 7162 df-mpo 7163 df-om 7583 df-2nd 7692 df-wrecs 7949 df-recs 8010 df-rdg 8048 df-er 8291 df-en 8512 df-dom 8513 df-sdom 8514 df-sup 8908 df-inf 8909 df-pnf 10679 df-mnf 10680 df-xr 10681 df-ltxr 10682 df-le 10683 df-sub 10874 df-neg 10875 df-div 11300 df-nn 11641 df-2 11703 df-n0 11901 df-z 11985 df-uz 12247 df-seq 13373 df-exp 13433 df-dvds 15610

This theorem is referenced by: prmreclem2 16255 prmreclem3 16256

W3C validator