Theorem eulerpart 34380

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 2730	. . 3 ⊢ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} = {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}
5		oveq2 7398	. . . 4 ⊢ (𝑎 = 𝑥 → ((2↑𝑏) · 𝑎) = ((2↑𝑏) · 𝑥))
6		oveq2 7398	. . . . 5 ⊢ (𝑏 = 𝑦 → (2↑𝑏) = (2↑𝑦))
7	6	oveq1d 7405	. . . 4 ⊢ (𝑏 = 𝑦 → ((2↑𝑏) · 𝑥) = ((2↑𝑦) · 𝑥))
8	5, 7	cbvmpov 7487	. . 3 ⊢ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎)) = (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥))
9		oveq1 7397	. . . . . 6 ⊢ (𝑟 = 𝑚 → (𝑟 supp ∅) = (𝑚 supp ∅))
10	9	eleq1d 2814	. . . . 5 ⊢ (𝑟 = 𝑚 → ((𝑟 supp ∅) ∈ Fin ↔ (𝑚 supp ∅) ∈ Fin))
11	10	cbvrabv 3419	. . . 4 ⊢ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} = {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin}
12	11	eqcomi 2739	. . 3 ⊢ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} = {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin}
13		fveq1 6860	. . . . . . . 8 ⊢ (𝑡 = 𝑟 → (𝑡‘𝑎) = (𝑟‘𝑎))
14	13	eleq2d 2815	. . . . . . 7 ⊢ (𝑡 = 𝑟 → (𝑏 ∈ (𝑡‘𝑎) ↔ 𝑏 ∈ (𝑟‘𝑎)))
15	14	anbi2d 630	. . . . . 6 ⊢ (𝑡 = 𝑟 → ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎)) ↔ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))))
16	15	opabbidv 5176	. . . . 5 ⊢ (𝑡 = 𝑟 → {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))} = {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))})
17	16	cbvmptv 5214	. . . 4 ⊢ (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))}) = (𝑟 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))})
18		oveq1 7397	. . . . . . . 8 ⊢ (𝑚 = 𝑠 → (𝑚 supp ∅) = (𝑠 supp ∅))
19	18	eleq1d 2814	. . . . . . 7 ⊢ (𝑚 = 𝑠 → ((𝑚 supp ∅) ∈ Fin ↔ (𝑠 supp ∅) ∈ Fin))
20	19	cbvrabv 3419	. . . . . 6 ⊢ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} = {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin}
21	20	eqcomi 2739	. . . . 5 ⊢ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} = {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin}
22		simpl 482	. . . . . . . 8 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → 𝑎 = 𝑥)
23	22	eleq1d 2814	. . . . . . 7 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ↔ 𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))
24		simpr 484	. . . . . . . 8 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → 𝑏 = 𝑦)
25	22	fveq2d 6865	. . . . . . . 8 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → (𝑟‘𝑎) = (𝑟‘𝑥))
26	24, 25	eleq12d 2823	. . . . . . 7 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → (𝑏 ∈ (𝑟‘𝑎) ↔ 𝑦 ∈ (𝑟‘𝑥)))
27	23, 26	anbi12d 632	. . . . . 6 ⊢ ((𝑎 = 𝑥 ∧ 𝑏 = 𝑦) → ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎)) ↔ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))))
28	27	cbvopabv 5183	. . . . 5 ⊢ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))} = {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}
29	21, 28	mpteq12i 5207	. . . 4 ⊢ (𝑟 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))}) = (𝑟 ∈ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})
30	17, 29	eqtri 2753	. . 3 ⊢ (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))}) = (𝑟 ∈ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})
31		cnveq 5840	. . . . . 6 ⊢ (ℎ = 𝑓 → ◡ℎ = ◡𝑓)
32	31	imaeq1d 6033	. . . . 5 ⊢ (ℎ = 𝑓 → (◡ℎ “ ℕ) = (◡𝑓 “ ℕ))
33	32	eleq1d 2814	. . . 4 ⊢ (ℎ = 𝑓 → ((◡ℎ “ ℕ) ∈ Fin ↔ (◡𝑓 “ ℕ) ∈ Fin))
34	33	cbvabv 2800	. . 3 ⊢ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin} = {𝑓 ∣ (◡𝑓 “ ℕ) ∈ Fin}
35	32	sseq1d 3981	. . . 4 ⊢ (ℎ = 𝑓 → ((◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ↔ (◡𝑓 “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))
36	35	cbvrabv 3419	. . 3 ⊢ {ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} = {𝑓 ∈ (ℕ0 ↑m ℕ) ∣ (◡𝑓 “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}}
37		reseq1 5947	. . . . . . . . 9 ⊢ (𝑜 = 𝑞 → (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) = (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))
38	37	coeq2d 5829	. . . . . . . 8 ⊢ (𝑜 = 𝑞 → (bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})) = (bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))
39	38	fveq2d 6865	. . . . . . 7 ⊢ (𝑜 = 𝑞 → ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))) = ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))))
40	39	imaeq2d 6034	. . . . . 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 6865	. . . . 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 5214	. . . 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 2739	. . . . . . . 8 ⊢ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) = (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑏 ∈ ℕ0 ↦ ((2↑𝑏) · 𝑎))
44	43	imaeq1i 6031	. . . . . . 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 2730	. . . . . . . . . . 11 ⊢ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))} = {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}
46	11, 45	mpteq12i 5207	. . . . . . . . . 10 ⊢ (𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}) = (𝑟 ∈ {𝑚 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑚 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})
47		fveq1 6860	. . . . . . . . . . . . . 14 ⊢ (𝑟 = 𝑡 → (𝑟‘𝑎) = (𝑡‘𝑎))
48	47	eleq2d 2815	. . . . . . . . . . . . 13 ⊢ (𝑟 = 𝑡 → (𝑏 ∈ (𝑟‘𝑎) ↔ 𝑏 ∈ (𝑡‘𝑎)))
49	48	anbi2d 630	. . . . . . . . . . . 12 ⊢ (𝑟 = 𝑡 → ((𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎)) ↔ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))))
50	49	opabbidv 5176	. . . . . . . . . . 11 ⊢ (𝑟 = 𝑡 → {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))} = {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})
51	50	cbvmptv 5214	. . . . . . . . . 10 ⊢ (𝑟 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑟‘𝑎))}) = (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})
52	46, 29, 51	3eqtr2i 2759	. . . . . . . . 9 ⊢ (𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))}) = (𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})
53	52	fveq1i 6862	. . . . . . . 8 ⊢ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}))) = ((𝑡 ∈ {𝑠 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑠 supp ∅) ∈ Fin} ↦ {⟨𝑎, 𝑏⟩ ∣ (𝑎 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑏 ∈ (𝑡‘𝑎))})‘(bits ∘ (𝑞 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))
54	53	imaeq2i 6032	. . . . . . 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 2753	. . . . . 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 6864	. . . . 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 5206	. . . 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 2753	. . 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 2730	. . 3 ⊢ (𝑓 ∈ ((ℕ0 ↑m ℕ) ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘)) = (𝑓 ∈ ((ℕ0 ↑m ℕ) ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘))
60	1, 2, 3, 4, 8, 12, 30, 34, 36, 58, 59	eulerpartlemn 34379	. 2 ⊢ ((𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ↾ 𝑂):𝑂–1-1-onto→𝐷
61		ovex 7423	. . . . . . 7 ⊢ (ℕ0 ↑m ℕ) ∈ V
62	61	rabex 5297	. . . . . 6 ⊢ {ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∈ V
63	62	inex1 5275	. . . . 5 ⊢ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ∈ V
64	63	mptex 7200	. . . 4 ⊢ (𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ∈ V
65	64	resex 6003	. . 3 ⊢ ((𝑜 ∈ ({ℎ ∈ (ℕ0 ↑m ℕ) ∣ (◡ℎ “ ℕ) ⊆ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}} ∩ {ℎ ∣ (◡ℎ “ ℕ) ∈ Fin}) ↦ ((𝟭‘ℕ)‘((𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥)) “ ((𝑟 ∈ {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}) ∣ (𝑟 supp ∅) ∈ Fin} ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ∧ 𝑦 ∈ (𝑟‘𝑥))})‘(bits ∘ (𝑜 ↾ {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧})))))) ↾ 𝑂) ∈ V
66		f1oeq1 6791	. . 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 3575	. 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 8931	. . 3 ⊢ (𝑂 ≈ 𝐷 ↔ ∃𝑔 𝑔:𝑂–1-1-onto→𝐷)
69		hasheni 14320	. . 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 2708  ∀wral 3045  {crab 3408   ∩ cin 3916   ⊆ wss 3917  ∅c0 4299  𝒫 cpw 4566   class class class wbr 5110  {copab 5172   ↦ cmpt 5191  ^◡ccnv 5640   ↾ cres 5643   “ cima 5644   ∘ ccom 5645  –1-1-onto→wf1o 6513  ‘cfv 6514  (class class class)co 7390   ∈ cmpo 7392   supp csupp 8142   ↑_m cmap 8802   ≈ cen 8918  Fincfn 8921  1c1 11076   · cmul 11080   ≤ cle 11216  ℕcn 12193  2c2 12248  ℕ₀cn0 12449  ↑cexp 14033  ♯chash 14302  Σcsu 15659   ∥ cdvds 16229  bitscbits 16396  𝟭cind 32780

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 2702  ax-rep 5237  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714  ax-inf2 9601  ax-ac2 10423  ax-cnex 11131  ax-resscn 11132  ax-1cn 11133  ax-icn 11134  ax-addcl 11135  ax-addrcl 11136  ax-mulcl 11137  ax-mulrcl 11138  ax-mulcom 11139  ax-addass 11140  ax-mulass 11141  ax-distr 11142  ax-i2m1 11143  ax-1ne0 11144  ax-1rid 11145  ax-rnegex 11146  ax-rrecex 11147  ax-cnre 11148  ax-pre-lttri 11149  ax-pre-lttrn 11150  ax-pre-ltadd 11151  ax-pre-mulgt0 11152  ax-pre-sup 11153

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 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-nel 3031  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-pss 3937  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4875  df-int 4914  df-iun 4960  df-disj 5078  df-br 5111  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5536  df-eprel 5541  df-po 5549  df-so 5550  df-fr 5594  df-se 5595  df-we 5596  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-pred 6277  df-ord 6338  df-on 6339  df-lim 6340  df-suc 6341  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-isom 6523  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-om 7846  df-1st 7971  df-2nd 7972  df-supp 8143  df-frecs 8263  df-wrecs 8294  df-recs 8343  df-rdg 8381  df-1o 8437  df-2o 8438  df-oadd 8441  df-er 8674  df-map 8804  df-pm 8805  df-en 8922  df-dom 8923  df-sdom 8924  df-fin 8925  df-fsupp 9320  df-sup 9400  df-inf 9401  df-oi 9470  df-dju 9861  df-card 9899  df-acn 9902  df-ac 10076  df-pnf 11217  df-mnf 11218  df-xr 11219  df-ltxr 11220  df-le 11221  df-sub 11414  df-neg 11415  df-div 11843  df-nn 12194  df-2 12256  df-3 12257  df-n0 12450  df-xnn0 12523  df-z 12537  df-uz 12801  df-rp 12959  df-fz 13476  df-fzo 13623  df-fl 13761  df-mod 13839  df-seq 13974  df-exp 14034  df-hash 14303  df-cj 15072  df-re 15073  df-im 15074  df-sqrt 15208  df-abs 15209  df-clim 15461  df-sum 15660  df-dvds 16230  df-bits 16399  df-ind 32781

This theorem is referenced by: (None)