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 16963

Description: Lemma for prmrec 16969. 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 4103	. . 3 ⊢ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℕ
2		breq2 5170	. . . . . . 7 ⊢ (𝑛 = 𝑁 → ((𝑟↑2) ∥ 𝑛 ↔ (𝑟↑2) ∥ 𝑁))
3	2	rabbidv 3451	. . . . . 6 ⊢ (𝑛 = 𝑁 → {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛} = {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
4	3	supeq1d 9515	. . . . 5 ⊢ (𝑛 = 𝑁 → sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛}, ℝ, < ) = sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
5		prmreclem1.1	. . . . 5 ⊢ 𝑄 = (𝑛 ∈ ℕ ↦ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑛}, ℝ, < ))
6		ltso 11370	. . . . . 6 ⊢ < Or ℝ
7	6	supex 9532	. . . . 5 ⊢ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ) ∈ V
8	4, 5, 7	fvmpt 7029	. . . 4 ⊢ (𝑁 ∈ ℕ → (𝑄‘𝑁) = sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
9		nnssz 12661	. . . . . 6 ⊢ ℕ ⊆ ℤ
10	1, 9	sstri 4018	. . . . 5 ⊢ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℤ
11		oveq1 7455	. . . . . . . . 9 ⊢ (𝑟 = 1 → (𝑟↑2) = (1↑2))
12		sq1 14244	. . . . . . . . 9 ⊢ (1↑2) = 1
13	11, 12	eqtrdi 2796	. . . . . . . 8 ⊢ (𝑟 = 1 → (𝑟↑2) = 1)
14	13	breq1d 5176	. . . . . . 7 ⊢ (𝑟 = 1 → ((𝑟↑2) ∥ 𝑁 ↔ 1 ∥ 𝑁))
15		1nn 12304	. . . . . . . 8 ⊢ 1 ∈ ℕ
16	15	a1i 11	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 1 ∈ ℕ)
17		nnz 12660	. . . . . . . 8 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
18		1dvds 16319	. . . . . . . 8 ⊢ (𝑁 ∈ ℤ → 1 ∥ 𝑁)
19	17, 18	syl 17	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 1 ∥ 𝑁)
20	14, 16, 19	elrabd 3710	. . . . . 6 ⊢ (𝑁 ∈ ℕ → 1 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
21	20	ne0d 4365	. . . . 5 ⊢ (𝑁 ∈ ℕ → {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ≠ ∅)
22		nnz 12660	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℕ → 𝑧 ∈ ℤ)
23		zsqcl 14179	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℤ → (𝑧↑2) ∈ ℤ)
24	22, 23	syl 17	. . . . . . . . . 10 ⊢ (𝑧 ∈ ℕ → (𝑧↑2) ∈ ℤ)
25		id 22	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℕ)
26		dvdsle 16358	. . . . . . . . . 10 ⊢ (((𝑧↑2) ∈ ℤ ∧ 𝑁 ∈ ℕ) → ((𝑧↑2) ∥ 𝑁 → (𝑧↑2) ≤ 𝑁))
27	24, 25, 26	syl2anr 596	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → ((𝑧↑2) ∥ 𝑁 → (𝑧↑2) ≤ 𝑁))
28		nnlesq 14254	. . . . . . . . . . 11 ⊢ (𝑧 ∈ ℕ → 𝑧 ≤ (𝑧↑2))
29	28	adantl 481	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → 𝑧 ≤ (𝑧↑2))
30		nnre 12300	. . . . . . . . . . . 12 ⊢ (𝑧 ∈ ℕ → 𝑧 ∈ ℝ)
31	30	adantl 481	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → 𝑧 ∈ ℝ)
32	31	resqcld 14175	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → (𝑧↑2) ∈ ℝ)
33		nnre 12300	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℝ)
34	33	adantr 480	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → 𝑁 ∈ ℝ)
35		letr 11384	. . . . . . . . . . 11 ⊢ ((𝑧 ∈ ℝ ∧ (𝑧↑2) ∈ ℝ ∧ 𝑁 ∈ ℝ) → ((𝑧 ≤ (𝑧↑2) ∧ (𝑧↑2) ≤ 𝑁) → 𝑧 ≤ 𝑁))
36	31, 32, 34, 35	syl3anc 1371	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → ((𝑧 ≤ (𝑧↑2) ∧ (𝑧↑2) ≤ 𝑁) → 𝑧 ≤ 𝑁))
37	29, 36	mpand 694	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → ((𝑧↑2) ≤ 𝑁 → 𝑧 ≤ 𝑁))
38	27, 37	syld 47	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ ℕ) → ((𝑧↑2) ∥ 𝑁 → 𝑧 ≤ 𝑁))
39	38	ralrimiva 3152	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → ∀𝑧 ∈ ℕ ((𝑧↑2) ∥ 𝑁 → 𝑧 ≤ 𝑁))
40		oveq1 7455	. . . . . . . . 9 ⊢ (𝑟 = 𝑧 → (𝑟↑2) = (𝑧↑2))
41	40	breq1d 5176	. . . . . . . 8 ⊢ (𝑟 = 𝑧 → ((𝑟↑2) ∥ 𝑁 ↔ (𝑧↑2) ∥ 𝑁))
42	41	ralrab 3715	. . . . . . 7 ⊢ (∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑁 ↔ ∀𝑧 ∈ ℕ ((𝑧↑2) ∥ 𝑁 → 𝑧 ≤ 𝑁))
43	39, 42	sylibr 234	. . . . . 6 ⊢ (𝑁 ∈ ℕ → ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑁)
44		brralrspcev 5226	. . . . . 6 ⊢ ((𝑁 ∈ ℤ ∧ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑁) → ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥)
45	17, 43, 44	syl2anc 583	. . . . 5 ⊢ (𝑁 ∈ ℕ → ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥)
46		suprzcl2 13003	. . . . 5 ⊢ (({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℤ ∧ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ≠ ∅ ∧ ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥) → sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
47	10, 21, 45, 46	mp3an2i 1466	. . . 4 ⊢ (𝑁 ∈ ℕ → sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
48	8, 47	eqeltrd 2844	. . 3 ⊢ (𝑁 ∈ ℕ → (𝑄‘𝑁) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
49	1, 48	sselid 4006	. 2 ⊢ (𝑁 ∈ ℕ → (𝑄‘𝑁) ∈ ℕ)
50		oveq1 7455	. . . . . 6 ⊢ (𝑧 = (𝑄‘𝑁) → (𝑧↑2) = ((𝑄‘𝑁)↑2))
51	50	breq1d 5176	. . . . 5 ⊢ (𝑧 = (𝑄‘𝑁) → ((𝑧↑2) ∥ 𝑁 ↔ ((𝑄‘𝑁)↑2) ∥ 𝑁))
52	41	cbvrabv 3454	. . . . 5 ⊢ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} = {𝑧 ∈ ℕ ∣ (𝑧↑2) ∥ 𝑁}
53	51, 52	elrab2 3711	. . . 4 ⊢ ((𝑄‘𝑁) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ↔ ((𝑄‘𝑁) ∈ ℕ ∧ ((𝑄‘𝑁)↑2) ∥ 𝑁))
54	48, 53	sylib 218	. . 3 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁) ∈ ℕ ∧ ((𝑄‘𝑁)↑2) ∥ 𝑁))
55	54	simprd 495	. 2 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ∥ 𝑁)
56	49	adantr 480	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) ∈ ℕ)
57	56	nncnd 12309	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) ∈ ℂ)
58	57	mulridd 11307	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 1) = (𝑄‘𝑁))
59		eluz2gt1 12985	. . . . . . . 8 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 1 < 𝐾)
60	59	adantl 481	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 1 < 𝐾)
61		1red 11291	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 1 ∈ ℝ)
62		eluz2nn 12949	. . . . . . . . . 10 ⊢ (𝐾 ∈ (ℤ_≥‘2) → 𝐾 ∈ ℕ)
63	62	adantl 481	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 𝐾 ∈ ℕ)
64	63	nnred 12308	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 𝐾 ∈ ℝ)
65	56	nnred 12308	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) ∈ ℝ)
66	56	nngt0d 12342	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → 0 < (𝑄‘𝑁))
67		ltmul2 12145	. . . . . . . 8 ⊢ ((1 ∈ ℝ ∧ 𝐾 ∈ ℝ ∧ ((𝑄‘𝑁) ∈ ℝ ∧ 0 < (𝑄‘𝑁))) → (1 < 𝐾 ↔ ((𝑄‘𝑁) · 1) < ((𝑄‘𝑁) · 𝐾)))
68	61, 64, 65, 66, 67	syl112anc 1374	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (1 < 𝐾 ↔ ((𝑄‘𝑁) · 1) < ((𝑄‘𝑁) · 𝐾)))
69	60, 68	mpbid 232	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 1) < ((𝑄‘𝑁) · 𝐾))
70	58, 69	eqbrtrrd 5190	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → (𝑄‘𝑁) < ((𝑄‘𝑁) · 𝐾))
71		nnmulcl 12317	. . . . . . . 8 ⊢ (((𝑄‘𝑁) ∈ ℕ ∧ 𝐾 ∈ ℕ) → ((𝑄‘𝑁) · 𝐾) ∈ ℕ)
72	49, 62, 71	syl2an 595	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 𝐾) ∈ ℕ)
73	72	nnred 12308	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) · 𝐾) ∈ ℝ)
74	65, 73	ltnled 11437	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ((𝑄‘𝑁) < ((𝑄‘𝑁) · 𝐾) ↔ ¬ ((𝑄‘𝑁) · 𝐾) ≤ (𝑄‘𝑁)))
75	70, 74	mpbid 232	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ¬ ((𝑄‘𝑁) · 𝐾) ≤ (𝑄‘𝑁))
76	45	ad2antrr 725	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥)
77		oveq1 7455	. . . . . . . 8 ⊢ (𝑟 = ((𝑄‘𝑁) · 𝐾) → (𝑟↑2) = (((𝑄‘𝑁) · 𝐾)↑2))
78	77	breq1d 5176	. . . . . . 7 ⊢ (𝑟 = ((𝑄‘𝑁) · 𝐾) → ((𝑟↑2) ∥ 𝑁 ↔ (((𝑄‘𝑁) · 𝐾)↑2) ∥ 𝑁))
79	72	adantr 480	. . . . . . 7 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁) · 𝐾) ∈ ℕ)
80		simpr 484	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)))
81	63	adantr 480	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → 𝐾 ∈ ℕ)
82	81	nnsqcld 14293	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝐾↑2) ∈ ℕ)
83		nnz 12660	. . . . . . . . . . 11 ⊢ ((𝐾↑2) ∈ ℕ → (𝐾↑2) ∈ ℤ)
84	82, 83	syl 17	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝐾↑2) ∈ ℤ)
85	49	nnsqcld 14293	. . . . . . . . . . . . . 14 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ∈ ℕ)
86	9, 85	sselid 4006	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ∈ ℤ)
87	85	nnne0d 12343	. . . . . . . . . . . . 13 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁)↑2) ≠ 0)
88		dvdsval2 16305	. . . . . . . . . . . . 13 ⊢ ((((𝑄‘𝑁)↑2) ∈ ℤ ∧ ((𝑄‘𝑁)↑2) ≠ 0 ∧ 𝑁 ∈ ℤ) → (((𝑄‘𝑁)↑2) ∥ 𝑁 ↔ (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ))
89	86, 87, 17, 88	syl3anc 1371	. . . . . . . . . . . 12 ⊢ (𝑁 ∈ ℕ → (((𝑄‘𝑁)↑2) ∥ 𝑁 ↔ (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ))
90	55, 89	mpbid 232	. . . . . . . . . . 11 ⊢ (𝑁 ∈ ℕ → (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ)
91	90	ad2antrr 725	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ)
92	86	ad2antrr 725	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ∈ ℤ)
93		dvdscmul 16331	. . . . . . . . . 10 ⊢ (((𝐾↑2) ∈ ℤ ∧ (𝑁 / ((𝑄‘𝑁)↑2)) ∈ ℤ ∧ ((𝑄‘𝑁)↑2) ∈ ℤ) → ((𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)) → (((𝑄‘𝑁)↑2) · (𝐾↑2)) ∥ (((𝑄‘𝑁)↑2) · (𝑁 / ((𝑄‘𝑁)↑2)))))
94	84, 91, 92, 93	syl3anc 1371	. . . . . . . . 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 480	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝑄‘𝑁) ∈ ℂ)
97	81	nncnd 12309	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → 𝐾 ∈ ℂ)
98	96, 97	sqmuld 14208	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁) · 𝐾)↑2) = (((𝑄‘𝑁)↑2) · (𝐾↑2)))
99	98	eqcomd 2746	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁)↑2) · (𝐾↑2)) = (((𝑄‘𝑁) · 𝐾)↑2))
100		nncn 12301	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℂ)
101	100	ad2antrr 725	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → 𝑁 ∈ ℂ)
102	85	ad2antrr 725	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ∈ ℕ)
103	102	nncnd 12309	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ∈ ℂ)
104	87	ad2antrr 725	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁)↑2) ≠ 0)
105	101, 103, 104	divcan2d 12072	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁)↑2) · (𝑁 / ((𝑄‘𝑁)↑2))) = 𝑁)
106	95, 99, 105	3brtr3d 5197	. . . . . . 7 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (((𝑄‘𝑁) · 𝐾)↑2) ∥ 𝑁)
107	78, 79, 106	elrabd 3710	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁) · 𝐾) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁})
108		suprzub 13004	. . . . . 6 ⊢ (({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁} ⊆ ℤ ∧ ∃𝑥 ∈ ℤ ∀𝑧 ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}𝑧 ≤ 𝑥 ∧ ((𝑄‘𝑁) · 𝐾) ∈ {𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}) → ((𝑄‘𝑁) · 𝐾) ≤ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
109	10, 76, 107, 108	mp3an2i 1466	. . . . 5 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁) · 𝐾) ≤ sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
110	8	ad2antrr 725	. . . . 5 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → (𝑄‘𝑁) = sup({𝑟 ∈ ℕ ∣ (𝑟↑2) ∥ 𝑁}, ℝ, < ))
111	109, 110	breqtrrd 5194	. . . 4 ⊢ (((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) ∧ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))) → ((𝑄‘𝑁) · 𝐾) ≤ (𝑄‘𝑁))
112	75, 111	mtand 815	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝐾 ∈ (ℤ_≥‘2)) → ¬ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)))
113	112	ex 412	. 2 ⊢ (𝑁 ∈ ℕ → (𝐾 ∈ (ℤ_≥‘2) → ¬ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2))))
114	49, 55, 113	3jca 1128	1 ⊢ (𝑁 ∈ ℕ → ((𝑄‘𝑁) ∈ ℕ ∧ ((𝑄‘𝑁)↑2) ∥ 𝑁 ∧ (𝐾 ∈ (ℤ_≥‘2) → ¬ (𝐾↑2) ∥ (𝑁 / ((𝑄‘𝑁)↑2)))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1537 ∈ wcel 2108 ≠ wne 2946 ∀wral 3067 ∃wrex 3076 {crab 3443 ⊆ wss 3976 ∅c0 4352 class class class wbr 5166 ↦ cmpt 5249 ‘cfv 6573 (class class class)co 7448 supcsup 9509 ℂcc 11182 ℝcr 11183 0cc0 11184 1c1 11185 · cmul 11189 < clt 11324 ≤ cle 11325 / cdiv 11947 ℕcn 12293 2c2 12348 ℤcz 12639 ℤ_≥cuz 12903 ↑cexp 14112 ∥ cdvds 16302

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1793 ax-4 1807 ax-5 1909 ax-6 1967 ax-7 2007 ax-8 2110 ax-9 2118 ax-10 2141 ax-11 2158 ax-12 2178 ax-ext 2711 ax-sep 5317 ax-nul 5324 ax-pow 5383 ax-pr 5447 ax-un 7770 ax-cnex 11240 ax-resscn 11241 ax-1cn 11242 ax-icn 11243 ax-addcl 11244 ax-addrcl 11245 ax-mulcl 11246 ax-mulrcl 11247 ax-mulcom 11248 ax-addass 11249 ax-mulass 11250 ax-distr 11251 ax-i2m1 11252 ax-1ne0 11253 ax-1rid 11254 ax-rnegex 11255 ax-rrecex 11256 ax-cnre 11257 ax-pre-lttri 11258 ax-pre-lttrn 11259 ax-pre-ltadd 11260 ax-pre-mulgt0 11261

This theorem depends on definitions: df-bi 207 df-an 396 df-or 847 df-3or 1088 df-3an 1089 df-tru 1540 df-fal 1550 df-ex 1778 df-nf 1782 df-sb 2065 df-mo 2543 df-eu 2572 df-clab 2718 df-cleq 2732 df-clel 2819 df-nfc 2895 df-ne 2947 df-nel 3053 df-ral 3068 df-rex 3077 df-rmo 3388 df-reu 3389 df-rab 3444 df-v 3490 df-sbc 3805 df-csb 3922 df-dif 3979 df-un 3981 df-in 3983 df-ss 3993 df-pss 3996 df-nul 4353 df-if 4549 df-pw 4624 df-sn 4649 df-pr 4651 df-op 4655 df-uni 4932 df-iun 5017 df-br 5167 df-opab 5229 df-mpt 5250 df-tr 5284 df-id 5593 df-eprel 5599 df-po 5607 df-so 5608 df-fr 5652 df-we 5654 df-xp 5706 df-rel 5707 df-cnv 5708 df-co 5709 df-dm 5710 df-rn 5711 df-res 5712 df-ima 5713 df-pred 6332 df-ord 6398 df-on 6399 df-lim 6400 df-suc 6401 df-iota 6525 df-fun 6575 df-fn 6576 df-f 6577 df-f1 6578 df-fo 6579 df-f1o 6580 df-fv 6581 df-riota 7404 df-ov 7451 df-oprab 7452 df-mpo 7453 df-om 7904 df-2nd 8031 df-frecs 8322 df-wrecs 8353 df-recs 8427 df-rdg 8466 df-er 8763 df-en 9004 df-dom 9005 df-sdom 9006 df-sup 9511 df-inf 9512 df-pnf 11326 df-mnf 11327 df-xr 11328 df-ltxr 11329 df-le 11330 df-sub 11522 df-neg 11523 df-div 11948 df-nn 12294 df-2 12356 df-n0 12554 df-z 12640 df-uz 12904 df-seq 14053 df-exp 14113 df-dvds 16303

This theorem is referenced by: prmreclem2 16964 prmreclem3 16965

W3C validator