Theorem sqff1o 27355

Description: There is a bijection from the squarefree divisors of a number 𝑁 to the powerset of the prime divisors of 𝑁. Among other things, this implies that a number has 2↑𝑘 squarefree divisors where 𝑘 is the number of prime divisors, and a squarefree number has 2↑𝑘 divisors (because all divisors of a squarefree number are squarefree). The inverse function to 𝐹 takes the product of all the primes in some subset of prime divisors of 𝑁. (Contributed by Mario Carneiro, 1-Jul-2015.)

Hypotheses

Ref	Expression
sqff1o.1	⊢ 𝑆 = {𝑥 ∈ ℕ ∣ ((μ‘𝑥) ≠ 0 ∧ 𝑥 ∥ 𝑁)}
sqff1o.2	⊢ 𝐹 = (𝑛 ∈ 𝑆 ↦ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛})
sqff1o.3	⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)))

Assertion

Ref	Expression
sqff1o	⊢ (𝑁 ∈ ℕ → 𝐹:𝑆–1-1-onto→𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})

Distinct variable groups:   𝑛,𝑝,𝑥,𝐺   𝑛,𝑁,𝑝,𝑥   𝑆,𝑛,𝑝

Allowed substitution hints:   𝑆(𝑥)   𝐹(𝑥, 𝑛, 𝑝)

Proof of Theorem sqff1o

Dummy variables 𝑘 𝑞 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		sqff1o.2	. 2 ⊢ 𝐹 = (𝑛 ∈ 𝑆 ↦ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛})
2		fveq2 6881	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑛 → (μ‘𝑥) = (μ‘𝑛))
3	2	neeq1d 3017	. . . . . . . . . 10 ⊢ (𝑥 = 𝑛 → ((μ‘𝑥) ≠ 0 ↔ (μ‘𝑛) ≠ 0))
4		breq1 5112	. . . . . . . . . 10 ⊢ (𝑥 = 𝑛 → (𝑥 ∥ 𝑁 ↔ 𝑛 ∥ 𝑁))
5	3, 4	anbi12d 643	. . . . . . . . 9 ⊢ (𝑥 = 𝑛 → (((μ‘𝑥) ≠ 0 ∧ 𝑥 ∥ 𝑁) ↔ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)))
6		sqff1o.1	. . . . . . . . 9 ⊢ 𝑆 = {𝑥 ∈ ℕ ∣ ((μ‘𝑥) ≠ 0 ∧ 𝑥 ∥ 𝑁)}
7	5, 6	elrab2 3654	. . . . . . . 8 ⊢ (𝑛 ∈ 𝑆 ↔ (𝑛 ∈ ℕ ∧ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)))
8	7	simprbi 502	. . . . . . 7 ⊢ (𝑛 ∈ 𝑆 → ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁))
9	8	simprd 500	. . . . . 6 ⊢ (𝑛 ∈ 𝑆 → 𝑛 ∥ 𝑁)
10	9	ad2antlr 739	. . . . 5 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → 𝑛 ∥ 𝑁)
11		prmz 16737	. . . . . . 7 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℤ)
12	11	adantl 486	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℤ)
13		simplr 780	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → 𝑛 ∈ 𝑆)
14	13, 7	sylib 221	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → (𝑛 ∈ ℕ ∧ ((μ‘𝑛) ≠ 0 ∧ 𝑛 ∥ 𝑁)))
15	14	simpld 499	. . . . . . 7 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → 𝑛 ∈ ℕ)
16	15	nnzd 12621	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → 𝑛 ∈ ℤ)
17		nnz 12616	. . . . . . 7 ⊢ (𝑁 ∈ ℕ → 𝑁 ∈ ℤ)
18	17	ad2antrr 738	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → 𝑁 ∈ ℤ)
19		dvdstr 16356	. . . . . 6 ⊢ ((𝑝 ∈ ℤ ∧ 𝑛 ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((𝑝 ∥ 𝑛 ∧ 𝑛 ∥ 𝑁) → 𝑝 ∥ 𝑁))
20	12, 16, 18, 19	syl3anc 1398	. . . . 5 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → ((𝑝 ∥ 𝑛 ∧ 𝑛 ∥ 𝑁) → 𝑝 ∥ 𝑁))
21	10, 20	mpan2d 706	. . . 4 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → (𝑝 ∥ 𝑛 → 𝑝 ∥ 𝑁))
22	21	ss2rabdv 4029	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛} ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
23		prmex 16739	. . . . 5 ⊢ ℙ ∈ V
24	23	rabex 5309	. . . 4 ⊢ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛} ∈ V
25	24	elpw 4566	. . 3 ⊢ ({𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛} ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ↔ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛} ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
26	22, 25	sylibr 237	. 2 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛} ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
27		cnveq 5859	. . . . . . 7 ⊢ (𝑦 = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) → ◡𝑦 = ◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))
28	27	imaeq1d 6061	. . . . . 6 ⊢ (𝑦 = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) → (◡𝑦 “ ℕ) = (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ))
29	28	eleq1d 2848	. . . . 5 ⊢ (𝑦 = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) → ((◡𝑦 “ ℕ) ∈ Fin ↔ (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) ∈ Fin))
30		1nn0 12524	. . . . . . . . . 10 ⊢ 1 ∈ ℕ0
31		0nn0 12523	. . . . . . . . . 10 ⊢ 0 ∈ ℕ0
32	30, 31	ifcli 4535	. . . . . . . . 9 ⊢ if(𝑘 ∈ 𝑧, 1, 0) ∈ ℕ0
33	32	rgenw 3083	. . . . . . . 8 ⊢ ∀𝑘 ∈ ℙ if(𝑘 ∈ 𝑧, 1, 0) ∈ ℕ0
34		eqid 2763	. . . . . . . . 9 ⊢ (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))
35	34	fmpt 7105	. . . . . . . 8 ⊢ (∀𝑘 ∈ ℙ if(𝑘 ∈ 𝑧, 1, 0) ∈ ℕ0 ↔ (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)):ℙ⟶ℕ0)
36	33, 35	mpbi 233	. . . . . . 7 ⊢ (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)):ℙ⟶ℕ0
37	36	a1i 11	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)):ℙ⟶ℕ0)
38		nn0ex 12514	. . . . . . 7 ⊢ ℕ0 ∈ V
39	38, 23	elmap 8865	. . . . . 6 ⊢ ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ∈ (ℕ0 ↑m ℙ) ↔ (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)):ℙ⟶ℕ0)
40	37, 39	sylibr 237	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ∈ (ℕ0 ↑m ℙ))
41		fzfi 14013	. . . . . 6 ⊢ (1...𝑁) ∈ Fin
42		ffn 6705	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)):ℙ⟶ℕ0 → (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) Fn ℙ)
43		elpreima 7053	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) Fn ℙ → (𝑥 ∈ (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) ↔ (𝑥 ∈ ℙ ∧ ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))‘𝑥) ∈ ℕ)))
44	36, 42, 43	mp2b 10	. . . . . . . . . 10 ⊢ (𝑥 ∈ (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) ↔ (𝑥 ∈ ℙ ∧ ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))‘𝑥) ∈ ℕ))
45		elequ1 2150	. . . . . . . . . . . . . 14 ⊢ (𝑘 = 𝑥 → (𝑘 ∈ 𝑧 ↔ 𝑥 ∈ 𝑧))
46	45	ifbid 4511	. . . . . . . . . . . . 13 ⊢ (𝑘 = 𝑥 → if(𝑘 ∈ 𝑧, 1, 0) = if(𝑥 ∈ 𝑧, 1, 0))
47	30, 31	ifcli 4535	. . . . . . . . . . . . . 14 ⊢ if(𝑥 ∈ 𝑧, 1, 0) ∈ ℕ0
48	47	elexi 3477	. . . . . . . . . . . . 13 ⊢ if(𝑥 ∈ 𝑧, 1, 0) ∈ V
49	46, 34, 48	fvmpt 6989	. . . . . . . . . . . 12 ⊢ (𝑥 ∈ ℙ → ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))‘𝑥) = if(𝑥 ∈ 𝑧, 1, 0))
50	49	eleq1d 2848	. . . . . . . . . . 11 ⊢ (𝑥 ∈ ℙ → (((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))‘𝑥) ∈ ℕ ↔ if(𝑥 ∈ 𝑧, 1, 0) ∈ ℕ))
51	50	biimpa 481	. . . . . . . . . 10 ⊢ ((𝑥 ∈ ℙ ∧ ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))‘𝑥) ∈ ℕ) → if(𝑥 ∈ 𝑧, 1, 0) ∈ ℕ)
52	44, 51	sylbi 220	. . . . . . . . 9 ⊢ (𝑥 ∈ (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) → if(𝑥 ∈ 𝑧, 1, 0) ∈ ℕ)
53		0nnn 12276	. . . . . . . . . . 11 ⊢ ¬ 0 ∈ ℕ
54		iffalse 4496	. . . . . . . . . . . 12 ⊢ (¬ 𝑥 ∈ 𝑧 → if(𝑥 ∈ 𝑧, 1, 0) = 0)
55	54	eleq1d 2848	. . . . . . . . . . 11 ⊢ (¬ 𝑥 ∈ 𝑧 → (if(𝑥 ∈ 𝑧, 1, 0) ∈ ℕ ↔ 0 ∈ ℕ))
56	53, 55	mtbiri 330	. . . . . . . . . 10 ⊢ (¬ 𝑥 ∈ 𝑧 → ¬ if(𝑥 ∈ 𝑧, 1, 0) ∈ ℕ)
57	56	con4i 115	. . . . . . . . 9 ⊢ (if(𝑥 ∈ 𝑧, 1, 0) ∈ ℕ → 𝑥 ∈ 𝑧)
58	52, 57	syl 18	. . . . . . . 8 ⊢ (𝑥 ∈ (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) → 𝑥 ∈ 𝑧)
59	58	ssriv 3941	. . . . . . 7 ⊢ (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) ⊆ 𝑧
60		elpwi 4569	. . . . . . . . 9 ⊢ (𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} → 𝑧 ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
61	60	adantl 486	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → 𝑧 ⊆ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
62		prmssnn 16738	. . . . . . . . . 10 ⊢ ℙ ⊆ ℕ
63		rabss2 4031	. . . . . . . . . 10 ⊢ (ℙ ⊆ ℕ → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ⊆ {𝑝 ∈ ℕ ∣ 𝑝 ∥ 𝑁})
64	62, 63	ax-mp 5	. . . . . . . . 9 ⊢ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ⊆ {𝑝 ∈ ℕ ∣ 𝑝 ∥ 𝑁}
65		dvdsssfz1 16380	. . . . . . . . . 10 ⊢ (𝑁 ∈ ℕ → {𝑝 ∈ ℕ ∣ 𝑝 ∥ 𝑁} ⊆ (1...𝑁))
66	65	adantr 485	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → {𝑝 ∈ ℕ ∣ 𝑝 ∥ 𝑁} ⊆ (1...𝑁))
67	64, 66	sstrid 3948	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ⊆ (1...𝑁))
68	61, 67	sstrd 3947	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → 𝑧 ⊆ (1...𝑁))
69	59, 68	sstrid 3948	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) ⊆ (1...𝑁))
70		ssfi 9153	. . . . . 6 ⊢ (((1...𝑁) ∈ Fin ∧ (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) ⊆ (1...𝑁)) → (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) ∈ Fin)
71	41, 69, 70	sylancr 598	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (◡(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) “ ℕ) ∈ Fin)
72	29, 40, 71	elrabd 3652	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ∈ {𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin})
73		sqff1o.3	. . . . . . 7 ⊢ 𝐺 = (𝑛 ∈ ℕ ↦ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)))
74		eqid 2763	. . . . . . 7 ⊢ {𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin} = {𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin}
75	73, 74	1arith 16991	. . . . . 6 ⊢ 𝐺:ℕ–1-1-onto→{𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin}
76		f1ocnv 6833	. . . . . 6 ⊢ (𝐺:ℕ–1-1-onto→{𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin} → ◡𝐺:{𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin}–1-1-onto→ℕ)
77		f1of 6820	. . . . . 6 ⊢ (◡𝐺:{𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin}–1-1-onto→ℕ → ◡𝐺:{𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin}⟶ℕ)
78	75, 76, 77	mp2b 10	. . . . 5 ⊢ ◡𝐺:{𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin}⟶ℕ
79	78	ffvelcdmi 7078	. . . 4 ⊢ ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ∈ {𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin} → (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∈ ℕ)
80	72, 79	syl 18	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∈ ℕ)
81		f1ocnvfv2 7275	. . . . . . . . . . . 12 ⊢ ((𝐺:ℕ–1-1-onto→{𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin} ∧ (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ∈ {𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin}) → (𝐺‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))
82	75, 72, 81	sylancr 598	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (𝐺‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))
83	73	1arithlem1 16987	. . . . . . . . . . . 12 ⊢ ((◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∈ ℕ → (𝐺‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))))))
84	80, 83	syl 18	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (𝐺‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))))))
85	82, 84	eqtr3d 2800	. . . . . . . . . 10 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))))))
86	85	fveq1d 6883	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))‘𝑞) = ((𝑝 ∈ ℙ ↦ (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))‘𝑞))
87		elequ1 2150	. . . . . . . . . . 11 ⊢ (𝑘 = 𝑞 → (𝑘 ∈ 𝑧 ↔ 𝑞 ∈ 𝑧))
88	87	ifbid 4511	. . . . . . . . . 10 ⊢ (𝑘 = 𝑞 → if(𝑘 ∈ 𝑧, 1, 0) = if(𝑞 ∈ 𝑧, 1, 0))
89	30, 31	ifcli 4535	. . . . . . . . . . 11 ⊢ if(𝑞 ∈ 𝑧, 1, 0) ∈ ℕ0
90	89	elexi 3477	. . . . . . . . . 10 ⊢ if(𝑞 ∈ 𝑧, 1, 0) ∈ V
91	88, 34, 90	fvmpt 6989	. . . . . . . . 9 ⊢ (𝑞 ∈ ℙ → ((𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))‘𝑞) = if(𝑞 ∈ 𝑧, 1, 0))
92	86, 91	sylan9req 2819	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → ((𝑝 ∈ ℙ ↦ (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))‘𝑞) = if(𝑞 ∈ 𝑧, 1, 0))
93		oveq1 7417	. . . . . . . . . 10 ⊢ (𝑝 = 𝑞 → (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) = (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))
94		eqid 2763	. . . . . . . . . 10 ⊢ (𝑝 ∈ ℙ ↦ (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))))) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))
95		ovex 7443	. . . . . . . . . 10 ⊢ (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ∈ V
96	93, 94, 95	fvmpt 6989	. . . . . . . . 9 ⊢ (𝑞 ∈ ℙ → ((𝑝 ∈ ℙ ↦ (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))‘𝑞) = (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))
97	96	adantl 486	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → ((𝑝 ∈ ℙ ↦ (𝑝 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))‘𝑞) = (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))
98	92, 97	eqtr3d 2800	. . . . . . 7 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → if(𝑞 ∈ 𝑧, 1, 0) = (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))
99		breq1 5112	. . . . . . . 8 ⊢ (1 = if(𝑞 ∈ 𝑧, 1, 0) → (1 ≤ 1 ↔ if(𝑞 ∈ 𝑧, 1, 0) ≤ 1))
100		breq1 5112	. . . . . . . 8 ⊢ (0 = if(𝑞 ∈ 𝑧, 1, 0) → (0 ≤ 1 ↔ if(𝑞 ∈ 𝑧, 1, 0) ≤ 1))
101		1le1 11846	. . . . . . . 8 ⊢ 1 ≤ 1
102		0le1 11741	. . . . . . . 8 ⊢ 0 ≤ 1
103	99, 100, 101, 102	keephyp 4559	. . . . . . 7 ⊢ if(𝑞 ∈ 𝑧, 1, 0) ≤ 1
104	98, 103	eqbrtrrdi 5151	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≤ 1)
105	104	ralrimiva 3157	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ∀𝑞 ∈ ℙ (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≤ 1)
106		issqf 27309	. . . . . 6 ⊢ ((◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∈ ℕ → ((μ‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≠ 0 ↔ ∀𝑞 ∈ ℙ (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≤ 1))
107	80, 106	syl 18	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ((μ‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≠ 0 ↔ ∀𝑞 ∈ ℙ (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≤ 1))
108	105, 107	mpbird 260	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (μ‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≠ 0)
109		iftrue 4493	. . . . . . . . . . . 12 ⊢ (𝑞 ∈ 𝑧 → if(𝑞 ∈ 𝑧, 1, 0) = 1)
110	109	adantl 486	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → if(𝑞 ∈ 𝑧, 1, 0) = 1)
111	61	sselda 3937	. . . . . . . . . . . . . . 15 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → 𝑞 ∈ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
112		breq1 5112	. . . . . . . . . . . . . . . 16 ⊢ (𝑝 = 𝑞 → (𝑝 ∥ 𝑁 ↔ 𝑞 ∥ 𝑁))
113	112	elrab 3650	. . . . . . . . . . . . . . 15 ⊢ (𝑞 ∈ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ↔ (𝑞 ∈ ℙ ∧ 𝑞 ∥ 𝑁))
114	111, 113	sylib 221	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → (𝑞 ∈ ℙ ∧ 𝑞 ∥ 𝑁))
115	114	simprd 500	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → 𝑞 ∥ 𝑁)
116	114	simpld 499	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → 𝑞 ∈ ℙ)
117		simpll 778	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → 𝑁 ∈ ℕ)
118		pcelnn 16934	. . . . . . . . . . . . . 14 ⊢ ((𝑞 ∈ ℙ ∧ 𝑁 ∈ ℕ) → ((𝑞 pCnt 𝑁) ∈ ℕ ↔ 𝑞 ∥ 𝑁))
119	116, 117, 118	syl2anc 595	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → ((𝑞 pCnt 𝑁) ∈ ℕ ↔ 𝑞 ∥ 𝑁))
120	115, 119	mpbird 260	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → (𝑞 pCnt 𝑁) ∈ ℕ)
121	120	nnge1d 12288	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → 1 ≤ (𝑞 pCnt 𝑁))
122	110, 121	eqbrtrd 5133	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ 𝑧) → if(𝑞 ∈ 𝑧, 1, 0) ≤ (𝑞 pCnt 𝑁))
123	122	ex 417	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (𝑞 ∈ 𝑧 → if(𝑞 ∈ 𝑧, 1, 0) ≤ (𝑞 pCnt 𝑁)))
124	123	adantr 485	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → (𝑞 ∈ 𝑧 → if(𝑞 ∈ 𝑧, 1, 0) ≤ (𝑞 pCnt 𝑁)))
125		simpr 489	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → 𝑞 ∈ ℙ)
126	17	ad2antrr 738	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → 𝑁 ∈ ℤ)
127		pcge0 16926	. . . . . . . . . 10 ⊢ ((𝑞 ∈ ℙ ∧ 𝑁 ∈ ℤ) → 0 ≤ (𝑞 pCnt 𝑁))
128	125, 126, 127	syl2anc 595	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → 0 ≤ (𝑞 pCnt 𝑁))
129		iffalse 4496	. . . . . . . . . 10 ⊢ (¬ 𝑞 ∈ 𝑧 → if(𝑞 ∈ 𝑧, 1, 0) = 0)
130	129	breq1d 5119	. . . . . . . . 9 ⊢ (¬ 𝑞 ∈ 𝑧 → (if(𝑞 ∈ 𝑧, 1, 0) ≤ (𝑞 pCnt 𝑁) ↔ 0 ≤ (𝑞 pCnt 𝑁)))
131	128, 130	syl5ibrcom 250	. . . . . . . 8 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → (¬ 𝑞 ∈ 𝑧 → if(𝑞 ∈ 𝑧, 1, 0) ≤ (𝑞 pCnt 𝑁)))
132	124, 131	pm2.61d 181	. . . . . . 7 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → if(𝑞 ∈ 𝑧, 1, 0) ≤ (𝑞 pCnt 𝑁))
133	98, 132	eqbrtrrd 5135	. . . . . 6 ⊢ (((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) ∧ 𝑞 ∈ ℙ) → (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≤ (𝑞 pCnt 𝑁))
134	133	ralrimiva 3157	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ∀𝑞 ∈ ℙ (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≤ (𝑞 pCnt 𝑁))
135	80	nnzd 12621	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∈ ℤ)
136	17	adantr 485	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → 𝑁 ∈ ℤ)
137		pc2dvds 16943	. . . . . 6 ⊢ (((◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∈ ℤ ∧ 𝑁 ∈ ℤ) → ((◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∥ 𝑁 ↔ ∀𝑞 ∈ ℙ (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≤ (𝑞 pCnt 𝑁)))
138	135, 136, 137	syl2anc 595	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ((◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∥ 𝑁 ↔ ∀𝑞 ∈ ℙ (𝑞 pCnt (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≤ (𝑞 pCnt 𝑁)))
139	134, 138	mpbird 260	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∥ 𝑁)
140	108, 139	jca 520	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → ((μ‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≠ 0 ∧ (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∥ 𝑁))
141		fveq2 6881	. . . . . 6 ⊢ (𝑥 = (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) → (μ‘𝑥) = (μ‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))
142	141	neeq1d 3017	. . . . 5 ⊢ (𝑥 = (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) → ((μ‘𝑥) ≠ 0 ↔ (μ‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≠ 0))
143		breq1 5112	. . . . 5 ⊢ (𝑥 = (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) → (𝑥 ∥ 𝑁 ↔ (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∥ 𝑁))
144	142, 143	anbi12d 643	. . . 4 ⊢ (𝑥 = (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) → (((μ‘𝑥) ≠ 0 ∧ 𝑥 ∥ 𝑁) ↔ ((μ‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≠ 0 ∧ (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∥ 𝑁)))
145	144, 6	elrab2 3654	. . 3 ⊢ ((◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∈ 𝑆 ↔ ((◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∈ ℕ ∧ ((μ‘(◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))) ≠ 0 ∧ (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∥ 𝑁)))
146	80, 140, 145	sylanbrc 594	. 2 ⊢ ((𝑁 ∈ ℕ ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁}) → (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ∈ 𝑆)
147		eqcom 2770	. . 3 ⊢ (𝑛 = (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ↔ (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) = 𝑛)
148	7	simplbi 501	. . . . . . 7 ⊢ (𝑛 ∈ 𝑆 → 𝑛 ∈ ℕ)
149	148	ad2antrl 740	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → 𝑛 ∈ ℕ)
150	23	mptex 7221	. . . . . 6 ⊢ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) ∈ V
151	73	fvmpt2 7001	. . . . . 6 ⊢ ((𝑛 ∈ ℕ ∧ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) ∈ V) → (𝐺‘𝑛) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)))
152	149, 150, 151	sylancl 597	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → (𝐺‘𝑛) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)))
153	152	eqeq1d 2765	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → ((𝐺‘𝑛) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ↔ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))))
154	75	a1i 11	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → 𝐺:ℕ–1-1-onto→{𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin})
155	72	adantrl 728	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ∈ {𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin})
156		f1ocnvfvb 7277	. . . . 5 ⊢ ((𝐺:ℕ–1-1-onto→{𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin} ∧ 𝑛 ∈ ℕ ∧ (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ∈ {𝑦 ∈ (ℕ0 ↑m ℙ) ∣ (◡𝑦 “ ℕ) ∈ Fin}) → ((𝐺‘𝑛) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ↔ (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) = 𝑛))
157	154, 149, 155, 156	syl3anc 1398	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → ((𝐺‘𝑛) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ↔ (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) = 𝑛))
158	23	a1i 11	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → ℙ ∈ V)
159		0cnd 11203	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → 0 ∈ ℂ)
160		1cnd 11206	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → 1 ∈ ℂ)
161		0ne1 12316	. . . . . . . 8 ⊢ 0 ≠ 1
162	161	a1i 11	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → 0 ≠ 1)
163	158, 159, 160, 162	pw2f1olem 9065	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → ((𝑧 ∈ 𝒫 ℙ ∧ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ↔ ((𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) ∈ ({0, 1} ↑m ℙ) ∧ 𝑧 = (◡(𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) “ {1}))))
164		ssrab2 4034	. . . . . . . . 9 ⊢ {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ⊆ ℙ
165	164	sspwi 4574	. . . . . . . 8 ⊢ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁} ⊆ 𝒫 ℙ
166		simprr 784	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})
167	165, 166	sselid 3935	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → 𝑧 ∈ 𝒫 ℙ)
168	167	biantrurd 541	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → ((𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ↔ (𝑧 ∈ 𝒫 ℙ ∧ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)))))
169		id 23	. . . . . . . . . . . . . . 15 ⊢ (𝑝 ∈ ℙ → 𝑝 ∈ ℙ)
170	148	adantl 486	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) → 𝑛 ∈ ℕ)
171		pccl 16913	. . . . . . . . . . . . . . 15 ⊢ ((𝑝 ∈ ℙ ∧ 𝑛 ∈ ℕ) → (𝑝 pCnt 𝑛) ∈ ℕ0)
172	169, 170, 171	syl2anr 608	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt 𝑛) ∈ ℕ0)
173		elnn0 12510	. . . . . . . . . . . . . 14 ⊢ ((𝑝 pCnt 𝑛) ∈ ℕ0 ↔ ((𝑝 pCnt 𝑛) ∈ ℕ ∨ (𝑝 pCnt 𝑛) = 0))
174	172, 173	sylib 221	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt 𝑛) ∈ ℕ ∨ (𝑝 pCnt 𝑛) = 0))
175	174	orcomd 884	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt 𝑛) = 0 ∨ (𝑝 pCnt 𝑛) ∈ ℕ))
176	8	simpld 499	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ 𝑆 → (μ‘𝑛) ≠ 0)
177	176	adantl 486	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) → (μ‘𝑛) ≠ 0)
178		issqf 27309	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 ∈ ℕ → ((μ‘𝑛) ≠ 0 ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt 𝑛) ≤ 1))
179	170, 178	syl 18	. . . . . . . . . . . . . . . 16 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) → ((μ‘𝑛) ≠ 0 ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt 𝑛) ≤ 1))
180	177, 179	mpbid 235	. . . . . . . . . . . . . . 15 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) → ∀𝑝 ∈ ℙ (𝑝 pCnt 𝑛) ≤ 1)
181	180	r19.21bi 3257	. . . . . . . . . . . . . 14 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt 𝑛) ≤ 1)
182		nnle1eq1 12270	. . . . . . . . . . . . . 14 ⊢ ((𝑝 pCnt 𝑛) ∈ ℕ → ((𝑝 pCnt 𝑛) ≤ 1 ↔ (𝑝 pCnt 𝑛) = 1))
183	181, 182	syl5ibcom 248	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt 𝑛) ∈ ℕ → (𝑝 pCnt 𝑛) = 1))
184	183	orim2d 982	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → (((𝑝 pCnt 𝑛) = 0 ∨ (𝑝 pCnt 𝑛) ∈ ℕ) → ((𝑝 pCnt 𝑛) = 0 ∨ (𝑝 pCnt 𝑛) = 1)))
185	175, 184	mpd 16	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt 𝑛) = 0 ∨ (𝑝 pCnt 𝑛) = 1))
186		ovex 7443	. . . . . . . . . . . 12 ⊢ (𝑝 pCnt 𝑛) ∈ V
187	186	elpr 4614	. . . . . . . . . . 11 ⊢ ((𝑝 pCnt 𝑛) ∈ {0, 1} ↔ ((𝑝 pCnt 𝑛) = 0 ∨ (𝑝 pCnt 𝑛) = 1))
188	185, 187	sylibr 237	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → (𝑝 pCnt 𝑛) ∈ {0, 1})
189	188	fmpttd 7110	. . . . . . . . 9 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) → (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)):ℙ⟶{0, 1})
190	189	adantrr 729	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)):ℙ⟶{0, 1})
191		prex 5409	. . . . . . . . 9 ⊢ {0, 1} ∈ V
192	191, 23	elmap 8865	. . . . . . . 8 ⊢ ((𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) ∈ ({0, 1} ↑m ℙ) ↔ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)):ℙ⟶{0, 1})
193	190, 192	sylibr 237	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) ∈ ({0, 1} ↑m ℙ))
194	193	biantrurd 541	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → (𝑧 = (◡(𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) “ {1}) ↔ ((𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) ∈ ({0, 1} ↑m ℙ) ∧ 𝑧 = (◡(𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) “ {1}))))
195	163, 168, 194	3bitr4d 314	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → ((𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ↔ 𝑧 = (◡(𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) “ {1})))
196		eqid 2763	. . . . . . . . 9 ⊢ (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) = (𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛))
197	196	mptiniseg 6240	. . . . . . . 8 ⊢ (1 ∈ ℕ0 → (◡(𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) “ {1}) = {𝑝 ∈ ℙ ∣ (𝑝 pCnt 𝑛) = 1})
198	30, 197	ax-mp 5	. . . . . . 7 ⊢ (◡(𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) “ {1}) = {𝑝 ∈ ℙ ∣ (𝑝 pCnt 𝑛) = 1}
199		id 23	. . . . . . . . . . . 12 ⊢ ((𝑝 pCnt 𝑛) = 1 → (𝑝 pCnt 𝑛) = 1)
200		1nn 12248	. . . . . . . . . . . 12 ⊢ 1 ∈ ℕ
201	199, 200	eqeltrdi 2871	. . . . . . . . . . 11 ⊢ ((𝑝 pCnt 𝑛) = 1 → (𝑝 pCnt 𝑛) ∈ ℕ)
202	201, 183	impbid2 229	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt 𝑛) = 1 ↔ (𝑝 pCnt 𝑛) ∈ ℕ))
203		simpr 489	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → 𝑝 ∈ ℙ)
204		pcelnn 16934	. . . . . . . . . . 11 ⊢ ((𝑝 ∈ ℙ ∧ 𝑛 ∈ ℕ) → ((𝑝 pCnt 𝑛) ∈ ℕ ↔ 𝑝 ∥ 𝑛))
205	203, 15, 204	syl2anc 595	. . . . . . . . . 10 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt 𝑛) ∈ ℕ ↔ 𝑝 ∥ 𝑛))
206	202, 205	bitrd 282	. . . . . . . . 9 ⊢ (((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) ∧ 𝑝 ∈ ℙ) → ((𝑝 pCnt 𝑛) = 1 ↔ 𝑝 ∥ 𝑛))
207	206	rabbidva 3422	. . . . . . . 8 ⊢ ((𝑁 ∈ ℕ ∧ 𝑛 ∈ 𝑆) → {𝑝 ∈ ℙ ∣ (𝑝 pCnt 𝑛) = 1} = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛})
208	207	adantrr 729	. . . . . . 7 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → {𝑝 ∈ ℙ ∣ (𝑝 pCnt 𝑛) = 1} = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛})
209	198, 208	eqtrid 2810	. . . . . 6 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → (◡(𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) “ {1}) = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛})
210	209	eqeq2d 2774	. . . . 5 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → (𝑧 = (◡(𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) “ {1}) ↔ 𝑧 = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛}))
211	195, 210	bitrd 282	. . . 4 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → ((𝑝 ∈ ℙ ↦ (𝑝 pCnt 𝑛)) = (𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0)) ↔ 𝑧 = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛}))
212	153, 157, 211	3bitr3d 312	. . 3 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → ((◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) = 𝑛 ↔ 𝑧 = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛}))
213	147, 212	bitrid 286	. 2 ⊢ ((𝑁 ∈ ℕ ∧ (𝑛 ∈ 𝑆 ∧ 𝑧 ∈ 𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})) → (𝑛 = (◡𝐺‘(𝑘 ∈ ℙ ↦ if(𝑘 ∈ 𝑧, 1, 0))) ↔ 𝑧 = {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑛}))
214	1, 26, 146, 213	f1o2d 7664	1 ⊢ (𝑁 ∈ ℕ → 𝐹:𝑆–1-1-onto→𝒫 {𝑝 ∈ ℙ ∣ 𝑝 ∥ 𝑁})

This proof depends on syntax axioms:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∨ wo 860   = wceq 1570   ∈ wcel 2143   ≠ wne 2958  ∀wral 3079  {crab 3416  Vcvv 3455   ⊆ wss 3905  ifcif 4487  𝒫 cpw 4562  {csn 4589  {cpr 4591   class class class wbr 5109   ↦ cmpt 5192  ^◡ccnv 5660   “ cima 5664   Fn wfn 6531  ⟶wf 6532  –1-1-onto→wf1o 6535  ‘cfv 6536  (class class class)co 7410   ↑_m cmap 8820  Fincfn 8939  ℂcc 11102  0cc0 11104  1c1 11105   ≤ cle 11248  ℕcn 12237  ℕ₀cn0 12508  ℤcz 12595  ...cfz 13539   ∥ cdvds 16314  ℙcprime 16733   pCnt cpc 16900  μcmu 27268

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5238  ax-sep 5257  ax-nul 5269  ax-pow 5336  ax-pr 5404  ax-un 7732  ax-cnex 11160  ax-resscn 11161  ax-1cn 11162  ax-icn 11163  ax-addcl 11164  ax-addrcl 11165  ax-mulcl 11166  ax-mulrcl 11167  ax-mulcom 11168  ax-addass 11169  ax-mulass 11170  ax-distr 11171  ax-i2m1 11172  ax-1ne0 11173  ax-1rid 11174  ax-rnegex 11175  ax-rrecex 11176  ax-cnre 11177  ax-pre-lttri 11178  ax-pre-lttrn 11179  ax-pre-ltadd 11180  ax-pre-mulgt0 11181  ax-pre-sup 11182

This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3065  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3745  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4488  df-pw 4564  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4873  df-int 4913  df-iun 4958  df-br 5110  df-opab 5174  df-mpt 5193  df-tr 5219  df-id 5556  df-eprel 5561  df-po 5569  df-so 5570  df-fr 5614  df-we 5616  df-xp 5667  df-rel 5668  df-cnv 5669  df-co 5670  df-dm 5671  df-rn 5672  df-res 5673  df-ima 5674  df-pred 6302  df-ord 6363  df-on 6364  df-lim 6365  df-suc 6366  df-iota 6492  df-fun 6538  df-fn 6539  df-f 6540  df-f1 6541  df-fo 6542  df-f1o 6543  df-fv 6544  df-riota 7367  df-ov 7413  df-oprab 7414  df-mpo 7415  df-om 7859  df-1st 7982  df-2nd 7983  df-frecs 8274  df-wrecs 8305  df-recs 8354  df-rdg 8393  df-1o 8449  df-2o 8450  df-er 8690  df-map 8822  df-en 8940  df-dom 8941  df-sdom 8942  df-fin 8943  df-sup 9398  df-inf 9399  df-card 9930  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-sub 11447  df-neg 11448  df-div 11876  df-nn 12238  df-2 12307  df-3 12308  df-n0 12509  df-z 12596  df-uz 12867  df-q 12977  df-rp 13021  df-fz 13540  df-fl 13830  df-mod 13908  df-seq 14043  df-exp 14103  df-hash 14372  df-cj 15155  df-re 15156  df-im 15157  df-sqrt 15291  df-abs 15292  df-dvds 16315  df-gcd 16557  df-prm 16734  df-pc 16901  df-mu 27274

This theorem is used by:  musum  27364