Theorem eulerpart 34349

Description: Euler's theorem on partitions, also known as a special case of Glaisher's theorem. Let 𝑃 be the set of all partitions of 𝑁, represented as multisets of positive integers, which is to say functions from ℕ to ℕ₀ where the value of the function represents the number of repetitions of an individual element, and the sum of all the elements with repetition equals 𝑁. Then the set 𝑂 of all partitions that only consist of odd numbers and the set 𝐷 of all partitions which have no repeated elements have the same cardinality. This is Metamath 100 proof #45. (Contributed by Thierry Arnoux, 14-Aug-2018.) (Revised by Thierry Arnoux, 1-Sep-2019.)

Hypotheses

Ref	Expression
eulerpart.p	⊢ 𝑃 = {𝑓 ∈ (ℕ0 ↑m ℕ) ∣ ((◡𝑓 “ ℕ) ∈ Fin ∧ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘) = 𝑁)}
eulerpart.o	⊢ 𝑂 = {𝑔 ∈ 𝑃 ∣ ∀𝑛 ∈ (◡𝑔 “ ℕ) ¬ 2 ∥ 𝑛}
eulerpart.d	⊢ 𝐷 = {𝑔 ∈ 𝑃 ∣ ∀𝑛 ∈ ℕ (𝑔‘𝑛) ≤ 1}

Assertion

Ref	Expression
eulerpart	⊢ (♯‘𝑂) = (♯‘𝐷)

Distinct variable groups:   𝑓,𝑔,𝑘,𝑛   𝐷,𝑔   𝑓,𝑁,𝑔,𝑘,𝑛   𝑔,𝑂,𝑛   𝑃,𝑔,𝑘,𝑛

Allowed substitution hints:   𝐷(𝑓,𝑘,𝑛)   𝑃(𝑓)   𝑂(𝑓,𝑘)

Proof of Theorem eulerpart

Dummy variables 𝑎 𝑏 ℎ 𝑚 𝑜 𝑞 𝑟 𝑠 𝑡 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		eulerpart.p	. . 3 ⊢ 𝑃 = {𝑓 ∈ (ℕ0 ↑m ℕ) ∣ ((◡𝑓 “ ℕ) ∈ Fin ∧ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘) = 𝑁)}
2		eulerpart.o	. . 3 ⊢ 𝑂 = {𝑔 ∈ 𝑃 ∣ ∀𝑛 ∈ (◡𝑔 “ ℕ) ¬ 2 ∥ 𝑛}
3		eulerpart.d	. . 3 ⊢ 𝐷 = {𝑔 ∈ 𝑃 ∣ ∀𝑛 ∈ ℕ (𝑔‘𝑛) ≤ 1}
4		eqid 2729	. . 3 ⊢ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} = {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}
5		oveq2 7361	. . . 4 ⊢ (𝑎 = 𝑥 → ((2↑𝑏) · 𝑎) = ((2↑𝑏) · 𝑥))
6		oveq2 7361	. . . . 5 ⊢ (𝑏 = 𝑦 → (2↑𝑏) = (2↑𝑦))
7	6	oveq1d 7368	. . . 4 ⊢ (𝑏 = 𝑦 → ((2↑𝑏) · 𝑥) = ((2↑𝑦) · 𝑥))
8	5, 7	cbvmpov 7448	. . 3 ⊢ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) = (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥))
9		oveq1 7360	. . . . . 6 ⊢ (𝑟 = 𝑚 → (𝑟 supp ∅) = (𝑚 supp ∅))
10	9	eleq1d 2813	. . . . 5 ⊢ (𝑟 = 𝑚 → ((𝑟 supp ∅) ∈ Fin ↔ (𝑚 supp ∅) ∈ Fin))
11	10	cbvrabv 3407	. . . 4 ⊢ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} = {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin}
12	11	eqcomi 2738	. . 3 ⊢ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} = {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin}
13		fveq1 6825	. . . . . . . 8 ⊢ (𝑡 = 𝑟 → (𝑡‘𝑎) = (𝑟‘𝑎))
14	13	eleq2d 2814	. . . . . . 7 ⊢ (𝑡 = 𝑟 → (𝑏 ∈ (𝑡‘𝑎) ↔ 𝑏 ∈ (𝑟‘𝑎)))
15	14	anbi2d 630	. . . . . 6 ⊢ (𝑡 = 𝑟 → ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎)) ↔ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))))
16	15	opabbidv 5161	. . . . 5 ⊢ (𝑡 = 𝑟 → {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))} = {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))})
17	16	cbvmptv 5199	. . . 4 ⊢ (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))}) = (𝑟 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))})
18		oveq1 7360	. . . . . . . 8 ⊢ (𝑚 = 𝑠 → (𝑚 supp ∅) = (𝑠 supp ∅))
19	18	eleq1d 2813	. . . . . . 7 ⊢ (𝑚 = 𝑠 → ((𝑚 supp ∅) ∈ Fin ↔ (𝑠 supp ∅) ∈ Fin))
20	19	cbvrabv 3407	. . . . . 6 ⊢ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} = {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin}
21	20	eqcomi 2738	. . . . 5 ⊢ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} = {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin}
22		simpl 482	. . . . . . . 8 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → 𝑎 = 𝑥)
23	22	eleq1d 2813	. . . . . . 7 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ↔ 𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))
24		simpr 484	. . . . . . . 8 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → 𝑏 = 𝑦)
25	22	fveq2d 6830	. . . . . . . 8 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → (𝑟‘𝑎) = (𝑟‘𝑥))
26	24, 25	eleq12d 2822	. . . . . . 7 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → (𝑏 ∈ (𝑟‘𝑎) ↔ 𝑦 ∈ (𝑟‘𝑥)))
27	23, 26	anbi12d 632	. . . . . 6 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎)) ↔ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))))
28	27	cbvopabv 5168	. . . . 5 ⊢ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))} = {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}
29	21, 28	mpteq12i 5192	. . . 4 ⊢ (𝑟 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))}) = (𝑟 ∈ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})
30	17, 29	eqtri 2752	. . 3 ⊢ (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))}) = (𝑟 ∈ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})
31		cnveq 5820	. . . . . 6 ⊢ (ℎ = 𝑓 → ◡ℎ = ◡𝑓)
32	31	imaeq1d 6014	. . . . 5 ⊢ (ℎ = 𝑓 → (◡ℎ “ ℕ) = (◡𝑓 “ ℕ))
33	32	eleq1d 2813	. . . 4 ⊢ (ℎ = 𝑓 → ((◡ℎ “ ℕ) ∈ Fin ↔ (◡𝑓 “ ℕ) ∈ Fin))
34	33	cbvabv 2799	. . 3 ⊢ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin} = {𝑓 ∣ (◡𝑓 “ ℕ) ∈ Fin}
35	32	sseq1d 3969	. . . 4 ⊢ (ℎ = 𝑓 → ((◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ↔ (◡𝑓 “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))
36	35	cbvrabv 3407	. . 3 ⊢ {ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} = {𝑓 ∈ (ℕ0 ↑m ℕ) ∣ (◡𝑓 “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}}
37		reseq1 5928	. . . . . . . . 9 ⊢ (𝑜 = 𝑞 → (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) = (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))
38	37	coeq2d 5809	. . . . . . . 8 ⊢ (𝑜 = 𝑞 → (bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})) = (bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))
39	38	fveq2d 6830	. . . . . . 7 ⊢ (𝑜 = 𝑞 → ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))) = ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))
40	39	imaeq2d 6015	. . . . . 6 ⊢ (𝑜 = 𝑞 → ((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))) = ((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))
41	40	fveq2d 6830	. . . . 5 ⊢ (𝑜 = 𝑞 → ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))) = ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))))
42	41	cbvmptv 5199	. . . 4 ⊢ (𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) = (𝑞 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))))
43	8	eqcomi 2738	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) = (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎))
44	43	imaeq1i 6012	. . . . . . 7 ⊢ ((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))) = ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))
45		eqid 2729	. . . . . . . . . . 11 ⊢ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))} = {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}
46	11, 45	mpteq12i 5192	. . . . . . . . . 10 ⊢ (𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}) = (𝑟 ∈ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})
47		fveq1 6825	. . . . . . . . . . . . . 14 ⊢ (𝑟 = 𝑡 → (𝑟‘𝑎) = (𝑡‘𝑎))
48	47	eleq2d 2814	. . . . . . . . . . . . 13 ⊢ (𝑟 = 𝑡 → (𝑏 ∈ (𝑟‘𝑎) ↔ 𝑏 ∈ (𝑡‘𝑎)))
49	48	anbi2d 630	. . . . . . . . . . . 12 ⊢ (𝑟 = 𝑡 → ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎)) ↔ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))))
50	49	opabbidv 5161	. . . . . . . . . . 11 ⊢ (𝑟 = 𝑡 → {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))} = {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})
51	50	cbvmptv 5199	. . . . . . . . . 10 ⊢ (𝑟 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))}) = (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})
52	46, 29, 51	3eqtr2i 2758	. . . . . . . . 9 ⊢ (𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}) = (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})
53	52	fveq1i 6827	. . . . . . . 8 ⊢ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))) = ((𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))
54	53	imaeq2i 6013	. . . . . . 7 ⊢ ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))) = ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) “ ((𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))
55	44, 54	eqtri 2752	. . . . . 6 ⊢ ((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))) = ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) “ ((𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))
56	55	fveq2i 6829	. . . . 5 ⊢ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))) = ((𝟭‘ℕ)‘((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) “ ((𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))
57	56	mpteq2i 5191	. . . 4 ⊢ (𝑞 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) = (𝑞 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) “ ((𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))))
58	42, 57	eqtri 2752	. . 3 ⊢ (𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) = (𝑞 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) “ ((𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))))
59		eqid 2729	. . 3 ⊢ (𝑓 ∈ ((ℕ0 ↑m ℕ) ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘)) = (𝑓 ∈ ((ℕ0 ↑m ℕ) ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘))
60	1, 2, 3, 4, 8, 12, 30, 34, 36, 58, 59	eulerpartlemn 34348	. 2 ⊢ ((𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ↾ 𝑂):𝑂–1-1-onto→𝐷
61		ovex 7386	. . . . . . 7 ⊢ (ℕ0 ↑m ℕ) ∈ V
62	61	rabex 5281	. . . . . 6 ⊢ {ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∈ V
63	62	inex1 5259	. . . . 5 ⊢ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ∈ V
64	63	mptex 7163	. . . 4 ⊢ (𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ∈ V
65	64	resex 5984	. . 3 ⊢ ((𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ↾ 𝑂) ∈ V
66		f1oeq1 6756	. . 3 ⊢ (𝑔 = ((𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ↾ 𝑂) → (𝑔:𝑂–1-1-onto→𝐷 ↔ ((𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ↾ 𝑂):𝑂–1-1-onto→𝐷))
67	65, 66	spcev 3563	. 2 ⊢ (((𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ↾ 𝑂):𝑂–1-1-onto→𝐷 → ∃𝑔 𝑔:𝑂–1-1-onto→𝐷)
68		bren 8889	. . 3 ⊢ (𝑂 ≈ 𝐷 ↔ ∃𝑔 𝑔:𝑂–1-1-onto→𝐷)
69		hasheni 14273	. . 3 ⊢ (𝑂 ≈ 𝐷 → (♯‘𝑂) = (♯‘𝐷))
70	68, 69	sylbir 235	. 2 ⊢ (∃𝑔 𝑔:𝑂–1-1-onto→𝐷 → (♯‘𝑂) = (♯‘𝐷))
71	60, 67, 70	mp2b 10	1 ⊢ (♯‘𝑂) = (♯‘𝐷)

Syntax hints:  ¬ wn 3   ∧ wa 395   = wceq 1540  ∃wex 1779   ∈ wcel 2109  {cab 2707  ∀wral 3044  {crab 3396   ∩ cin 3904   ⊆ wss 3905  ∅c0 4286  𝒫 cpw 4553   class class class wbr 5095  {copab 5157   ↦ cmpt 5176  ^◡ccnv 5622   ↾ cres 5625   “ cima 5626   ∘ ccom 5627  –1-1-onto→wf1o 6485  ‘cfv 6486  (class class class)co 7353   ∈ cmpo 7355   supp csupp 8100   ↑_m cmap 8760   ≈ cen 8876  Fincfn 8879  1c1 11029   · cmul 11033   ≤ cle 11169  ℕcn 12146  2c2 12201  ℕ₀cn0 12402  ↑cexp 13986  ♯chash 14255  Σcsu 15611   ∥ cdvds 16181  bitscbits 16348  𝟭cind 32806

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5221  ax-sep 5238  ax-nul 5248  ax-pow 5307  ax-pr 5374  ax-un 7675  ax-inf2 9556  ax-ac2 10376  ax-cnex 11084  ax-resscn 11085  ax-1cn 11086  ax-icn 11087  ax-addcl 11088  ax-addrcl 11089  ax-mulcl 11090  ax-mulrcl 11091  ax-mulcom 11092  ax-addass 11093  ax-mulass 11094  ax-distr 11095  ax-i2m1 11096  ax-1ne0 11097  ax-1rid 11098  ax-rnegex 11099  ax-rrecex 11100  ax-cnre 11101  ax-pre-lttri 11102  ax-pre-lttrn 11103  ax-pre-ltadd 11104  ax-pre-mulgt0 11105  ax-pre-sup 11106

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3345  df-reu 3346  df-rab 3397  df-v 3440  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 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4862  df-int 4900  df-iun 4946  df-disj 5063  df-br 5096  df-opab 5158  df-mpt 5177  df-tr 5203  df-id 5518  df-eprel 5523  df-po 5531  df-so 5532  df-fr 5576  df-se 5577  df-we 5578  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-pred 6253  df-ord 6314  df-on 6315  df-lim 6316  df-suc 6317  df-iota 6442  df-fun 6488  df-fn 6489  df-f 6490  df-f1 6491  df-fo 6492  df-f1o 6493  df-fv 6494  df-isom 6495  df-riota 7310  df-ov 7356  df-oprab 7357  df-mpo 7358  df-om 7807  df-1st 7931  df-2nd 7932  df-supp 8101  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-2o 8396  df-oadd 8399  df-er 8632  df-map 8762  df-pm 8763  df-en 8880  df-dom 8881  df-sdom 8882  df-fin 8883  df-fsupp 9271  df-sup 9351  df-inf 9352  df-oi 9421  df-dju 9816  df-card 9854  df-acn 9857  df-ac 10029  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-sub 11367  df-neg 11368  df-div 11796  df-nn 12147  df-2 12209  df-3 12210  df-n0 12403  df-xnn0 12476  df-z 12490  df-uz 12754  df-rp 12912  df-fz 13429  df-fzo 13576  df-fl 13714  df-mod 13792  df-seq 13927  df-exp 13987  df-hash 14256  df-cj 15024  df-re 15025  df-im 15026  df-sqrt 15160  df-abs 15161  df-clim 15413  df-sum 15612  df-dvds 16182  df-bits 16351  df-ind 32807

This theorem is referenced by: (None)