Theorem eulerpart 34681

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 2763	. . 3 ⊢ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} = {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}
5		oveq2 7404	. . . 4 ⊢ (𝑎 = 𝑥 → ((2↑𝑏) · 𝑎) = ((2↑𝑏) · 𝑥))
6		oveq2 7404	. . . . 5 ⊢ (𝑏 = 𝑦 → (2↑𝑏) = (2↑𝑦))
7	6	oveq1d 7411	. . . 4 ⊢ (𝑏 = 𝑦 → ((2↑𝑏) · 𝑥) = ((2↑𝑦) · 𝑥))
8	5, 7	cbvmpov 7491	. . 3 ⊢ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) = (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥))
9		oveq1 7403	. . . . . 6 ⊢ (𝑟 = 𝑚 → (𝑟 supp ∅) = (𝑚 supp ∅))
10	9	eleq1d 2848	. . . . 5 ⊢ (𝑟 = 𝑚 → ((𝑟 supp ∅) ∈ Fin ↔ (𝑚 supp ∅) ∈ Fin))
11	10	cbvrabv 3425	. . . 4 ⊢ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} = {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin}
12	11	eqcomi 2772	. . 3 ⊢ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} = {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin}
13		fveq1 6866	. . . . . . . 8 ⊢ (𝑡 = 𝑟 → (𝑡‘𝑎) = (𝑟‘𝑎))
14	13	eleq2d 2849	. . . . . . 7 ⊢ (𝑡 = 𝑟 → (𝑏 ∈ (𝑡‘𝑎) ↔ 𝑏 ∈ (𝑟‘𝑎)))
15	14	anbi2d 639	. . . . . 6 ⊢ (𝑡 = 𝑟 → ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎)) ↔ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))))
16	15	opabbidv 5167	. . . . 5 ⊢ (𝑡 = 𝑟 → {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))} = {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))})
17	16	cbvmptv 5205	. . . 4 ⊢ (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))}) = (𝑟 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))})
18		oveq1 7403	. . . . . . . 8 ⊢ (𝑚 = 𝑠 → (𝑚 supp ∅) = (𝑠 supp ∅))
19	18	eleq1d 2848	. . . . . . 7 ⊢ (𝑚 = 𝑠 → ((𝑚 supp ∅) ∈ Fin ↔ (𝑠 supp ∅) ∈ Fin))
20	19	cbvrabv 3425	. . . . . 6 ⊢ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} = {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin}
21	20	eqcomi 2772	. . . . 5 ⊢ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} = {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin}
22		simpl 486	. . . . . . . 8 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → 𝑎 = 𝑥)
23	22	eleq1d 2848	. . . . . . 7 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ↔ 𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))
24		simpr 488	. . . . . . . 8 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → 𝑏 = 𝑦)
25	22	fveq2d 6871	. . . . . . . 8 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → (𝑟‘𝑎) = (𝑟‘𝑥))
26	24, 25	eleq12d 2857	. . . . . . 7 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → (𝑏 ∈ (𝑟‘𝑎) ↔ 𝑦 ∈ (𝑟‘𝑥)))
27	23, 26	anbi12d 641	. . . . . 6 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎)) ↔ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))))
28	27	cbvopabv 5174	. . . . 5 ⊢ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))} = {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}
29	21, 28	mpteq12i 5198	. . . 4 ⊢ (𝑟 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))}) = (𝑟 ∈ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})
30	17, 29	eqtri 2786	. . 3 ⊢ (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))}) = (𝑟 ∈ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})
31		cnveq 5846	. . . . . 6 ⊢ (ℎ = 𝑓 → ◡ℎ = ◡𝑓)
32	31	imaeq1d 6048	. . . . 5 ⊢ (ℎ = 𝑓 → (◡ℎ “ ℕ) = (◡𝑓 “ ℕ))
33	32	eleq1d 2848	. . . 4 ⊢ (ℎ = 𝑓 → ((◡ℎ “ ℕ) ∈ Fin ↔ (◡𝑓 “ ℕ) ∈ Fin))
34	33	cbvabv 2833	. . 3 ⊢ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin} = {𝑓 ∣ (◡𝑓 “ ℕ) ∈ Fin}
35	32	sseq1d 3968	. . . 4 ⊢ (ℎ = 𝑓 → ((◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ↔ (◡𝑓 “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))
36	35	cbvrabv 3425	. . 3 ⊢ {ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} = {𝑓 ∈ (ℕ0 ↑m ℕ) ∣ (◡𝑓 “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}}
37		reseq1 5959	. . . . . . . . 9 ⊢ (𝑜 = 𝑞 → (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) = (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))
38	37	coeq2d 5835	. . . . . . . 8 ⊢ (𝑜 = 𝑞 → (bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})) = (bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))
39	38	fveq2d 6871	. . . . . . 7 ⊢ (𝑜 = 𝑞 → ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))) = ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))
40	39	imaeq2d 6049	. . . . . 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 6871	. . . . 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 5205	. . . 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 2772	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) = (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎))
44	43	imaeq1i 6046	. . . . . . 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 2763	. . . . . . . . . . 11 ⊢ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))} = {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}
46	11, 45	mpteq12i 5198	. . . . . . . . . 10 ⊢ (𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}) = (𝑟 ∈ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})
47		fveq1 6866	. . . . . . . . . . . . . 14 ⊢ (𝑟 = 𝑡 → (𝑟‘𝑎) = (𝑡‘𝑎))
48	47	eleq2d 2849	. . . . . . . . . . . . 13 ⊢ (𝑟 = 𝑡 → (𝑏 ∈ (𝑟‘𝑎) ↔ 𝑏 ∈ (𝑡‘𝑎)))
49	48	anbi2d 639	. . . . . . . . . . . 12 ⊢ (𝑟 = 𝑡 → ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎)) ↔ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))))
50	49	opabbidv 5167	. . . . . . . . . . 11 ⊢ (𝑟 = 𝑡 → {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))} = {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})
51	50	cbvmptv 5205	. . . . . . . . . 10 ⊢ (𝑟 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))}) = (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})
52	46, 29, 51	3eqtr2i 2792	. . . . . . . . 9 ⊢ (𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}) = (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})
53	52	fveq1i 6868	. . . . . . . 8 ⊢ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))) = ((𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))
54	53	imaeq2i 6047	. . . . . . 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 2786	. . . . . 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 6870	. . . . 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 5197	. . . 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 2786	. . 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 2763	. . 3 ⊢ (𝑓 ∈ ((ℕ0 ↑m ℕ) ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘)) = (𝑓 ∈ ((ℕ0 ↑m ℕ) ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘))
60	1, 2, 3, 4, 8, 12, 30, 34, 36, 58, 59	eulerpartlemn 34680	. 2 ⊢ ((𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ↾ 𝑂):𝑂–1-1-onto→𝐷
61		ovex 7429	. . . . . . 7 ⊢ (ℕ0 ↑m ℕ) ∈ V
62	61	rabex 5296	. . . . . 6 ⊢ {ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∈ V
63	62	inex1 5274	. . . . 5 ⊢ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ∈ V
64	63	mptex 7207	. . . 4 ⊢ (𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ∈ V
65	64	resex 6015	. . 3 ⊢ ((𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ↾ 𝑂) ∈ V
66		f1oeq1 6794	. . 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 3566	. 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 8937	. . 3 ⊢ (𝑂 ≈ 𝐷 ↔ ∃𝑔 𝑔:𝑂–1-1-onto→𝐷)
69		hasheni 14371	. . 3 ⊢ (𝑂 ≈ 𝐷 → (♯‘𝑂) = (♯‘𝐷))
70	68, 69	sylbir 237	. 2 ⊢ (∃𝑔 𝑔:𝑂–1-1-onto→𝐷 → (♯‘𝑂) = (♯‘𝐷))
71	60, 67, 70	mp2b 10	1 ⊢ (♯‘𝑂) = (♯‘𝐷)

Syntax hints:  ¬ wn 3   ∧ wa 399   = wceq 1561  ∃wex 1800   ∈ wcel 2143  {cab 2741  ∀wral 3077  {crab 3415   ∩ cin 3904   ⊆ wss 3905  ∅c0 4286  𝒫 cpw 4556   class class class wbr 5101  {copab 5163   ↦ cmpt 5182  ^◡ccnv 5647   ↾ cres 5650   “ cima 5651   ∘ ccom 5652  –1-1-onto→wf1o 6520  ‘cfv 6521  (class class class)co 7396   ∈ cmpo 7398   supp csupp 8140   ↑_m cmap 8808   ≈ cen 8924  Fincfn 8927  1c1 11085   · cmul 11089   ≤ cle 11228  𝟭cind 12205  ℕcn 12220  2c2 12282  ℕ₀cn0 12491  ↑cexp 14084  ♯chash 14353  Σcsu 15723   ∥ cdvds 16296  bitscbits 16463

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1816  ax-4 1830  ax-5 1931  ax-6 1988  ax-7 2029  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5228  ax-sep 5247  ax-nul 5257  ax-pow 5323  ax-pr 5391  ax-un 7718  ax-inf2 9594  ax-ac2 10431  ax-cnex 11140  ax-resscn 11141  ax-1cn 11142  ax-icn 11143  ax-addcl 11144  ax-addrcl 11145  ax-mulcl 11146  ax-mulrcl 11147  ax-mulcom 11148  ax-addass 11149  ax-mulass 11150  ax-distr 11151  ax-i2m1 11152  ax-1ne0 11153  ax-1rid 11154  ax-rnegex 11155  ax-rrecex 11156  ax-cnre 11157  ax-pre-lttri 11158  ax-pre-lttrn 11159  ax-pre-ltadd 11160  ax-pre-mulgt0 11161  ax-pre-sup 11162

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-3or 1100  df-3an 1101  df-tru 1564  df-fal 1574  df-ex 1801  df-nf 1805  df-sb 2092  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-nel 3063  df-ral 3078  df-rex 3088  df-rmo 3368  df-reu 3369  df-rab 3416  df-v 3457  df-sbc 3746  df-csb 3854  df-dif 3908  df-un 3910  df-in 3912  df-ss 3922  df-pss 3925  df-nul 4287  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-disj 5069  df-br 5102  df-opab 5164  df-mpt 5183  df-tr 5209  df-id 5543  df-eprel 5548  df-po 5556  df-so 5557  df-fr 5601  df-se 5602  df-we 5603  df-xp 5654  df-rel 5655  df-cnv 5656  df-co 5657  df-dm 5658  df-rn 5659  df-res 5660  df-ima 5661  df-pred 6288  df-ord 6349  df-on 6350  df-lim 6351  df-suc 6352  df-iota 6477  df-fun 6523  df-fn 6524  df-f 6525  df-f1 6526  df-fo 6527  df-f1o 6528  df-fv 6529  df-isom 6530  df-riota 7353  df-ov 7399  df-oprab 7400  df-mpo 7401  df-om 7847  df-1st 7970  df-2nd 7971  df-supp 8141  df-frecs 8262  df-wrecs 8293  df-recs 8342  df-rdg 8381  df-1o 8437  df-2o 8438  df-oadd 8441  df-er 8678  df-map 8810  df-pm 8811  df-en 8928  df-dom 8929  df-sdom 8930  df-fin 8931  df-fsupp 9306  df-sup 9386  df-inf 9387  df-oi 9456  df-dju 9871  df-card 9909  df-acn 9912  df-ac 10084  df-pnf 11229  df-mnf 11230  df-xr 11231  df-ltxr 11232  df-le 11233  df-sub 11427  df-neg 11428  df-div 11856  df-ind 12206  df-nn 12221  df-2 12290  df-3 12291  df-n0 12492  df-xnn0 12565  df-z 12579  df-uz 12850  df-rp 13004  df-fz 13523  df-fzo 13670  df-fl 13812  df-mod 13890  df-seq 14025  df-exp 14085  df-hash 14354  df-cj 15136  df-re 15137  df-im 15138  df-sqrt 15272  df-abs 15273  df-clim 15525  df-sum 15724  df-dvds 16297  df-bits 16466

This theorem is referenced by: (None)