eulerpartlemgs2 - Mathbox for Thierry Arnoux

	Mathbox for Thierry Arnoux		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > eulerpartlemgs2		Structured version Visualization version GIF version

Theorem eulerpartlemgs2 33368

Description: Lemma for eulerpart 33370: The 𝐺 function also preserves partition sums. (Contributed by Thierry Arnoux, 10-Sep-2017.)

**Hypotheses**
Ref	Expression
eulerpart.p	⊢ 𝑃 = {𝑓 ∈ (ℕ₀ ↑_m ℕ) ∣ ((^◡𝑓 “ ℕ) ∈ Fin ∧ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘) = 𝑁)}
eulerpart.o	⊢ 𝑂 = {𝑔 ∈ 𝑃 ∣ ∀𝑛 ∈ (^◡𝑔 “ ℕ) ¬ 2 ∥ 𝑛}
eulerpart.d	⊢ 𝐷 = {𝑔 ∈ 𝑃 ∣ ∀𝑛 ∈ ℕ (𝑔‘𝑛) ≤ 1}
eulerpart.j	⊢ 𝐽 = {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}
eulerpart.f	⊢ 𝐹 = (𝑥 ∈ 𝐽, 𝑦 ∈ ℕ₀ ↦ ((2↑𝑦) · 𝑥))
eulerpart.h	⊢ 𝐻 = {𝑟 ∈ ((𝒫 ℕ₀ ∩ Fin) ↑_m 𝐽) ∣ (𝑟 supp ∅) ∈ Fin}
eulerpart.m	⊢ 𝑀 = (𝑟 ∈ 𝐻 ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ 𝐽 ∧ 𝑦 ∈ (𝑟‘𝑥))})
eulerpart.r	⊢ 𝑅 = {𝑓 ∣ (^◡𝑓 “ ℕ) ∈ Fin}
eulerpart.t	⊢ 𝑇 = {𝑓 ∈ (ℕ₀ ↑_m ℕ) ∣ (^◡𝑓 “ ℕ) ⊆ 𝐽}
eulerpart.g	⊢ 𝐺 = (𝑜 ∈ (𝑇 ∩ 𝑅) ↦ ((𝟭‘ℕ)‘(𝐹 “ (𝑀‘(bits ∘ (𝑜 ↾ 𝐽))))))
eulerpart.s	⊢ 𝑆 = (𝑓 ∈ ((ℕ₀ ↑_m ℕ) ∩ 𝑅) ↦ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘))

**Assertion**
Ref	Expression
eulerpartlemgs2	⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝑆‘(𝐺‘𝐴)) = (𝑆‘𝐴))

Distinct variable groups: 𝑓,𝑔,𝑘,𝑛,𝑜,𝑥,𝑦,𝑧 𝑓,𝑟,𝐴,𝑔,𝑘,𝑛,𝑜,𝑥,𝑦 𝑓,𝐺,𝑘 𝑛,𝐹,𝑜,𝑥,𝑦 𝑜,𝐻,𝑟 𝑓,𝐽,𝑛,𝑜,𝑟,𝑥,𝑦 𝑛,𝑀,𝑜,𝑟,𝑥,𝑦 𝑓,𝑁,𝑔,𝑘,𝑛,𝑥 𝑛,𝑂,𝑟,𝑥,𝑦 𝑃,𝑔,𝑘,𝑛 𝑅,𝑓,𝑘,𝑛,𝑜,𝑟,𝑥,𝑦 𝑇,𝑓,𝑘,𝑛,𝑜,𝑟,𝑥,𝑦 Allowed substitution hints: 𝐴(𝑧) 𝐷(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑛,𝑜,𝑟) 𝑃(𝑥,𝑦,𝑧,𝑓,𝑜,𝑟) 𝑅(𝑧,𝑔) 𝑆(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑛,𝑜,𝑟) 𝑇(𝑧,𝑔) 𝐹(𝑧,𝑓,𝑔,𝑘,𝑟) 𝐺(𝑥,𝑦,𝑧,𝑔,𝑛,𝑜,𝑟) 𝐻(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑛) 𝐽(𝑧,𝑔,𝑘) 𝑀(𝑧,𝑓,𝑔,𝑘) 𝑁(𝑦,𝑧,𝑜,𝑟) 𝑂(𝑧,𝑓,𝑔,𝑘,𝑜)

Proof of Theorem eulerpartlemgs2 Dummy variables 𝑡 𝑚 𝑤 are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		cnvimass 6078	. . . . . . . 8 ⊢ (^◡(𝐺‘𝐴) “ ℕ) ⊆ dom (𝐺‘𝐴)
2		eulerpart.p	. . . . . . . . . . . . . 14 ⊢ 𝑃 = {𝑓 ∈ (ℕ₀ ↑_m ℕ) ∣ ((^◡𝑓 “ ℕ) ∈ Fin ∧ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘) = 𝑁)}
3		eulerpart.o	. . . . . . . . . . . . . 14 ⊢ 𝑂 = {𝑔 ∈ 𝑃 ∣ ∀𝑛 ∈ (^◡𝑔 “ ℕ) ¬ 2 ∥ 𝑛}
4		eulerpart.d	. . . . . . . . . . . . . 14 ⊢ 𝐷 = {𝑔 ∈ 𝑃 ∣ ∀𝑛 ∈ ℕ (𝑔‘𝑛) ≤ 1}
5		eulerpart.j	. . . . . . . . . . . . . 14 ⊢ 𝐽 = {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}
6		eulerpart.f	. . . . . . . . . . . . . 14 ⊢ 𝐹 = (𝑥 ∈ 𝐽, 𝑦 ∈ ℕ₀ ↦ ((2↑𝑦) · 𝑥))
7		eulerpart.h	. . . . . . . . . . . . . 14 ⊢ 𝐻 = {𝑟 ∈ ((𝒫 ℕ₀ ∩ Fin) ↑_m 𝐽) ∣ (𝑟 supp ∅) ∈ Fin}
8		eulerpart.m	. . . . . . . . . . . . . 14 ⊢ 𝑀 = (𝑟 ∈ 𝐻 ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥 ∈ 𝐽 ∧ 𝑦 ∈ (𝑟‘𝑥))})
9		eulerpart.r	. . . . . . . . . . . . . 14 ⊢ 𝑅 = {𝑓 ∣ (^◡𝑓 “ ℕ) ∈ Fin}
10		eulerpart.t	. . . . . . . . . . . . . 14 ⊢ 𝑇 = {𝑓 ∈ (ℕ₀ ↑_m ℕ) ∣ (^◡𝑓 “ ℕ) ⊆ 𝐽}
11		eulerpart.g	. . . . . . . . . . . . . 14 ⊢ 𝐺 = (𝑜 ∈ (𝑇 ∩ 𝑅) ↦ ((𝟭‘ℕ)‘(𝐹 “ (𝑀‘(bits ∘ (𝑜 ↾ 𝐽))))))
12	2, 3, 4, 5, 6, 7, 8, 9, 10, 11	eulerpartgbij 33360	. . . . . . . . . . . . 13 ⊢ 𝐺:(𝑇 ∩ 𝑅)–1-1-onto→(({0, 1} ↑_m ℕ) ∩ 𝑅)
13		f1of 6831	. . . . . . . . . . . . 13 ⊢ (𝐺:(𝑇 ∩ 𝑅)–1-1-onto→(({0, 1} ↑_m ℕ) ∩ 𝑅) → 𝐺:(𝑇 ∩ 𝑅)⟶(({0, 1} ↑_m ℕ) ∩ 𝑅))
14	12, 13	ax-mp 5	. . . . . . . . . . . 12 ⊢ 𝐺:(𝑇 ∩ 𝑅)⟶(({0, 1} ↑_m ℕ) ∩ 𝑅)
15	14	ffvelcdmi 7083	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝐺‘𝐴) ∈ (({0, 1} ↑_m ℕ) ∩ 𝑅))
16		elin 3964	. . . . . . . . . . 11 ⊢ ((𝐺‘𝐴) ∈ (({0, 1} ↑_m ℕ) ∩ 𝑅) ↔ ((𝐺‘𝐴) ∈ ({0, 1} ↑_m ℕ) ∧ (𝐺‘𝐴) ∈ 𝑅))
17	15, 16	sylib 217	. . . . . . . . . 10 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ((𝐺‘𝐴) ∈ ({0, 1} ↑_m ℕ) ∧ (𝐺‘𝐴) ∈ 𝑅))
18	17	simpld 496	. . . . . . . . 9 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝐺‘𝐴) ∈ ({0, 1} ↑_m ℕ))
19		elmapi 8840	. . . . . . . . 9 ⊢ ((𝐺‘𝐴) ∈ ({0, 1} ↑_m ℕ) → (𝐺‘𝐴):ℕ⟶{0, 1})
20		fdm 6724	. . . . . . . . 9 ⊢ ((𝐺‘𝐴):ℕ⟶{0, 1} → dom (𝐺‘𝐴) = ℕ)
21	18, 19, 20	3syl 18	. . . . . . . 8 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → dom (𝐺‘𝐴) = ℕ)
22	1, 21	sseqtrid 4034	. . . . . . 7 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (^◡(𝐺‘𝐴) “ ℕ) ⊆ ℕ)
23	22	sselda 3982	. . . . . 6 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)) → 𝑘 ∈ ℕ)
24	2, 3, 4, 5, 6, 7, 8, 9, 10, 11	eulerpartlemgvv 33364	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ℕ) → ((𝐺‘𝐴)‘𝑘) = if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0))
25	24	oveq1d 7421	. . . . . 6 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ℕ) → (((𝐺‘𝐴)‘𝑘) · 𝑘) = (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘))
26	23, 25	syldan 592	. . . . 5 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)) → (((𝐺‘𝐴)‘𝑘) · 𝑘) = (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘))
27	26	sumeq2dv 15646	. . . 4 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)(((𝐺‘𝐴)‘𝑘) · 𝑘) = Σ𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)(if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘))
28		eqeq2 2745	. . . . . . . . . . . . 13 ⊢ (𝑚 = 𝑘 → (((2↑𝑛) · 𝑡) = 𝑚 ↔ ((2↑𝑛) · 𝑡) = 𝑘))
29	28	2rexbidv 3220	. . . . . . . . . . . 12 ⊢ (𝑚 = 𝑘 → (∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚 ↔ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘))
30	29	elrab 3683	. . . . . . . . . . 11 ⊢ (𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} ↔ (𝑘 ∈ ℕ ∧ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘))
31	30	simprbi 498	. . . . . . . . . 10 ⊢ (𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} → ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘)
32	31	iftrued 4536	. . . . . . . . 9 ⊢ (𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} → if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) = 1)
33	32	oveq1d 7421	. . . . . . . 8 ⊢ (𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} → (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘) = (1 · 𝑘))
34		elrabi 3677	. . . . . . . . . 10 ⊢ (𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} → 𝑘 ∈ ℕ)
35	34	nncnd 12225	. . . . . . . . 9 ⊢ (𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} → 𝑘 ∈ ℂ)
36	35	mullidd 11229	. . . . . . . 8 ⊢ (𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} → (1 · 𝑘) = 𝑘)
37	33, 36	eqtrd 2773	. . . . . . 7 ⊢ (𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} → (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘) = 𝑘)
38	37	sumeq2i 15642	. . . . . 6 ⊢ Σ𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘) = Σ𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}𝑘
39		id 22	. . . . . . 7 ⊢ (𝑘 = ((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)) → 𝑘 = ((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)))
40	2, 3, 4, 5, 6, 7, 8, 9, 10, 11	eulerpartlemgf 33367	. . . . . . . . 9 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (^◡(𝐺‘𝐴) “ ℕ) ∈ Fin)
41	34	adantl 483	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → 𝑘 ∈ ℕ)
42	41, 24	syldan 592	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → ((𝐺‘𝐴)‘𝑘) = if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0))
43	31	adantl 483	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘)
44	43	iftrued 4536	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) = 1)
45	42, 44	eqtrd 2773	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → ((𝐺‘𝐴)‘𝑘) = 1)
46		1nn 12220	. . . . . . . . . . . . 13 ⊢ 1 ∈ ℕ
47	45, 46	eqeltrdi 2842	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → ((𝐺‘𝐴)‘𝑘) ∈ ℕ)
48	18, 19	syl 17	. . . . . . . . . . . . . 14 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝐺‘𝐴):ℕ⟶{0, 1})
49		ffn 6715	. . . . . . . . . . . . . 14 ⊢ ((𝐺‘𝐴):ℕ⟶{0, 1} → (𝐺‘𝐴) Fn ℕ)
50		elpreima 7057	. . . . . . . . . . . . . 14 ⊢ ((𝐺‘𝐴) Fn ℕ → (𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ) ↔ (𝑘 ∈ ℕ ∧ ((𝐺‘𝐴)‘𝑘) ∈ ℕ)))
51	48, 49, 50	3syl 18	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ) ↔ (𝑘 ∈ ℕ ∧ ((𝐺‘𝐴)‘𝑘) ∈ ℕ)))
52	51	adantr 482	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → (𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ) ↔ (𝑘 ∈ ℕ ∧ ((𝐺‘𝐴)‘𝑘) ∈ ℕ)))
53	41, 47, 52	mpbir2and 712	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → 𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ))
54	53	ex 414	. . . . . . . . . 10 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} → 𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)))
55	54	ssrdv 3988	. . . . . . . . 9 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} ⊆ (^◡(𝐺‘𝐴) “ ℕ))
56		ssfi 9170	. . . . . . . . 9 ⊢ (((^◡(𝐺‘𝐴) “ ℕ) ∈ Fin ∧ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} ⊆ (^◡(𝐺‘𝐴) “ ℕ)) → {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} ∈ Fin)
57	40, 55, 56	syl2anc 585	. . . . . . . 8 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} ∈ Fin)
58		cnvexg 7912	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ^◡𝐴 ∈ V)
59		imaexg 7903	. . . . . . . . . . 11 ⊢ (^◡𝐴 ∈ V → (^◡𝐴 “ ℕ) ∈ V)
60		inex1g 5319	. . . . . . . . . . 11 ⊢ ((^◡𝐴 “ ℕ) ∈ V → ((^◡𝐴 “ ℕ) ∩ 𝐽) ∈ V)
61	58, 59, 60	3syl 18	. . . . . . . . . 10 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ((^◡𝐴 “ ℕ) ∩ 𝐽) ∈ V)
62		vsnex 5429	. . . . . . . . . . . 12 ⊢ {𝑡} ∈ V
63		fvex 6902	. . . . . . . . . . . 12 ⊢ (bits‘(𝐴‘𝑡)) ∈ V
64	62, 63	xpex 7737	. . . . . . . . . . 11 ⊢ ({𝑡} × (bits‘(𝐴‘𝑡))) ∈ V
65	64	rgenw 3066	. . . . . . . . . 10 ⊢ ∀𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ∈ V
66		iunexg 7947	. . . . . . . . . 10 ⊢ ((((^◡𝐴 “ ℕ) ∩ 𝐽) ∈ V ∧ ∀𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ∈ V) → ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ∈ V)
67	61, 65, 66	sylancl 587	. . . . . . . . 9 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ∈ V)
68		eqid 2733	. . . . . . . . . 10 ⊢ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) = ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))
69	2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 68	eulerpartlemgh 33366	. . . . . . . . 9 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝐹 ↾ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))):∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))–1-1-onto→{𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})
70		f1oeng 8964	. . . . . . . . 9 ⊢ ((∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ∈ V ∧ (𝐹 ↾ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))):∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))–1-1-onto→{𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ≈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})
71	67, 69, 70	syl2anc 585	. . . . . . . 8 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ≈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})
72		enfii 9186	. . . . . . . 8 ⊢ (({𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} ∈ Fin ∧ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ≈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ∈ Fin)
73	57, 71, 72	syl2anc 585	. . . . . . 7 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ∈ Fin)
74		fvres 6908	. . . . . . . . 9 ⊢ (𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) → ((𝐹 ↾ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))))‘𝑤) = (𝐹‘𝑤))
75	74	adantl 483	. . . . . . . 8 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))) → ((𝐹 ↾ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))))‘𝑤) = (𝐹‘𝑤))
76		inss2 4229	. . . . . . . . . . . . . . 15 ⊢ ((^◡𝐴 “ ℕ) ∩ 𝐽) ⊆ 𝐽
77		simpr 486	. . . . . . . . . . . . . . 15 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽))
78	76, 77	sselid 3980	. . . . . . . . . . . . . 14 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → 𝑡 ∈ 𝐽)
79	78	snssd 4812	. . . . . . . . . . . . 13 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → {𝑡} ⊆ 𝐽)
80		bitsss 16364	. . . . . . . . . . . . 13 ⊢ (bits‘(𝐴‘𝑡)) ⊆ ℕ₀
81		xpss12 5691	. . . . . . . . . . . . 13 ⊢ (({𝑡} ⊆ 𝐽 ∧ (bits‘(𝐴‘𝑡)) ⊆ ℕ₀) → ({𝑡} × (bits‘(𝐴‘𝑡))) ⊆ (𝐽 × ℕ₀))
82	79, 80, 81	sylancl 587	. . . . . . . . . . . 12 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → ({𝑡} × (bits‘(𝐴‘𝑡))) ⊆ (𝐽 × ℕ₀))
83	82	ralrimiva 3147	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ∀𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ⊆ (𝐽 × ℕ₀))
84		iunss 5048	. . . . . . . . . . 11 ⊢ (∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ⊆ (𝐽 × ℕ₀) ↔ ∀𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ⊆ (𝐽 × ℕ₀))
85	83, 84	sylibr 233	. . . . . . . . . 10 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))) ⊆ (𝐽 × ℕ₀))
86	85	sselda 3982	. . . . . . . . 9 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))) → 𝑤 ∈ (𝐽 × ℕ₀))
87	5, 6	oddpwdcv 33343	. . . . . . . . 9 ⊢ (𝑤 ∈ (𝐽 × ℕ₀) → (𝐹‘𝑤) = ((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)))
88	86, 87	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))) → (𝐹‘𝑤) = ((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)))
89	75, 88	eqtrd 2773	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))) → ((𝐹 ↾ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡))))‘𝑤) = ((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)))
90	41	nncnd 12225	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → 𝑘 ∈ ℂ)
91	39, 73, 69, 89, 90	fsumf1o 15666	. . . . . 6 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}𝑘 = Σ𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)))
92	38, 91	eqtrid 2785	. . . . 5 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘) = Σ𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)))
93		ax-1cn 11165	. . . . . . . . 9 ⊢ 1 ∈ ℂ
94		0cn 11203	. . . . . . . . 9 ⊢ 0 ∈ ℂ
95	93, 94	ifcli 4575	. . . . . . . 8 ⊢ if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) ∈ ℂ
96	95	a1i 11	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) ∈ ℂ)
97		ssrab2 4077	. . . . . . . . 9 ⊢ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} ⊆ ℕ
98		simpr 486	. . . . . . . . 9 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})
99	97, 98	sselid 3980	. . . . . . . 8 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → 𝑘 ∈ ℕ)
100	99	nncnd 12225	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → 𝑘 ∈ ℂ)
101	96, 100	mulcld 11231	. . . . . 6 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) → (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘) ∈ ℂ)
102		simpr 486	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})) → 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}))
103	102	eldifbd 3961	. . . . . . . . . 10 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})) → ¬ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})
104	22	ssdifssd 4142	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) ⊆ ℕ)
105	104	sselda 3982	. . . . . . . . . 10 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})) → 𝑘 ∈ ℕ)
106	30	notbii 320	. . . . . . . . . . 11 ⊢ (¬ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} ↔ ¬ (𝑘 ∈ ℕ ∧ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘))
107		imnan 401	. . . . . . . . . . 11 ⊢ ((𝑘 ∈ ℕ → ¬ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘) ↔ ¬ (𝑘 ∈ ℕ ∧ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘))
108	106, 107	sylbb2 237	. . . . . . . . . 10 ⊢ (¬ 𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} → (𝑘 ∈ ℕ → ¬ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘))
109	103, 105, 108	sylc 65	. . . . . . . . 9 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})) → ¬ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘)
110	109	iffalsed 4539	. . . . . . . 8 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})) → if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) = 0)
111	110	oveq1d 7421	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})) → (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘) = (0 · 𝑘))
112		nnsscn 12214	. . . . . . . . . 10 ⊢ ℕ ⊆ ℂ
113	104, 112	sstrdi 3994	. . . . . . . . 9 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚}) ⊆ ℂ)
114	113	sselda 3982	. . . . . . . 8 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})) → 𝑘 ∈ ℂ)
115	114	mul02d 11409	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})) → (0 · 𝑘) = 0)
116	111, 115	eqtrd 2773	. . . . . 6 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑘 ∈ ((^◡(𝐺‘𝐴) “ ℕ) ∖ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚})) → (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘) = 0)
117	55, 101, 116, 40	fsumss 15668	. . . . 5 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑘 ∈ {𝑚 ∈ ℕ ∣ ∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑚} (if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘) = Σ𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)(if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘))
118	92, 117	eqtr3d 2775	. . . 4 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)) = Σ𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)(if(∃𝑡 ∈ ℕ ∃𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = 𝑘, 1, 0) · 𝑘))
119	2, 3, 4, 5, 6, 7, 8, 9, 10	eulerpartlemt0 33357	. . . . . . . . . . . . 13 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) ↔ (𝐴 ∈ (ℕ₀ ↑_m ℕ) ∧ (^◡𝐴 “ ℕ) ∈ Fin ∧ (^◡𝐴 “ ℕ) ⊆ 𝐽))
120	119	simp1bi 1146	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → 𝐴 ∈ (ℕ₀ ↑_m ℕ))
121		elmapi 8840	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ (ℕ₀ ↑_m ℕ) → 𝐴:ℕ⟶ℕ₀)
122	120, 121	syl 17	. . . . . . . . . . 11 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → 𝐴:ℕ⟶ℕ₀)
123	122	adantr 482	. . . . . . . . . 10 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → 𝐴:ℕ⟶ℕ₀)
124		cnvimass 6078	. . . . . . . . . . . . 13 ⊢ (^◡𝐴 “ ℕ) ⊆ dom 𝐴
125	124, 122	fssdm 6735	. . . . . . . . . . . 12 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (^◡𝐴 “ ℕ) ⊆ ℕ)
126	125	adantr 482	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → (^◡𝐴 “ ℕ) ⊆ ℕ)
127		inss1 4228	. . . . . . . . . . . 12 ⊢ ((^◡𝐴 “ ℕ) ∩ 𝐽) ⊆ (^◡𝐴 “ ℕ)
128	127, 77	sselid 3980	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → 𝑡 ∈ (^◡𝐴 “ ℕ))
129	126, 128	sseldd 3983	. . . . . . . . . 10 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → 𝑡 ∈ ℕ)
130	123, 129	ffvelcdmd 7085	. . . . . . . . 9 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → (𝐴‘𝑡) ∈ ℕ₀)
131		bitsfi 16375	. . . . . . . . 9 ⊢ ((𝐴‘𝑡) ∈ ℕ₀ → (bits‘(𝐴‘𝑡)) ∈ Fin)
132	130, 131	syl 17	. . . . . . . 8 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → (bits‘(𝐴‘𝑡)) ∈ Fin)
133	129	nncnd 12225	. . . . . . . 8 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → 𝑡 ∈ ℂ)
134		2cnd 12287	. . . . . . . . . 10 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ (𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽) ∧ 𝑛 ∈ (bits‘(𝐴‘𝑡)))) → 2 ∈ ℂ)
135		simprr 772	. . . . . . . . . . 11 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ (𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽) ∧ 𝑛 ∈ (bits‘(𝐴‘𝑡)))) → 𝑛 ∈ (bits‘(𝐴‘𝑡)))
136	80, 135	sselid 3980	. . . . . . . . . 10 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ (𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽) ∧ 𝑛 ∈ (bits‘(𝐴‘𝑡)))) → 𝑛 ∈ ℕ₀)
137	134, 136	expcld 14108	. . . . . . . . 9 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ (𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽) ∧ 𝑛 ∈ (bits‘(𝐴‘𝑡)))) → (2↑𝑛) ∈ ℂ)
138	137	anassrs 469	. . . . . . . 8 ⊢ (((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) ∧ 𝑛 ∈ (bits‘(𝐴‘𝑡))) → (2↑𝑛) ∈ ℂ)
139	132, 133, 138	fsummulc1 15728	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → (Σ𝑛 ∈ (bits‘(𝐴‘𝑡))(2↑𝑛) · 𝑡) = Σ𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡))
140	139	sumeq2dv 15646	. . . . . 6 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)(Σ𝑛 ∈ (bits‘(𝐴‘𝑡))(2↑𝑛) · 𝑡) = Σ𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)Σ𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡))
141		bitsinv1 16380	. . . . . . . . 9 ⊢ ((𝐴‘𝑡) ∈ ℕ₀ → Σ𝑛 ∈ (bits‘(𝐴‘𝑡))(2↑𝑛) = (𝐴‘𝑡))
142	141	oveq1d 7421	. . . . . . . 8 ⊢ ((𝐴‘𝑡) ∈ ℕ₀ → (Σ𝑛 ∈ (bits‘(𝐴‘𝑡))(2↑𝑛) · 𝑡) = ((𝐴‘𝑡) · 𝑡))
143	130, 142	syl 17	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)) → (Σ𝑛 ∈ (bits‘(𝐴‘𝑡))(2↑𝑛) · 𝑡) = ((𝐴‘𝑡) · 𝑡))
144	143	sumeq2dv 15646	. . . . . 6 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)(Σ𝑛 ∈ (bits‘(𝐴‘𝑡))(2↑𝑛) · 𝑡) = Σ𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)((𝐴‘𝑡) · 𝑡))
145		vex 3479	. . . . . . . . . 10 ⊢ 𝑡 ∈ V
146		vex 3479	. . . . . . . . . 10 ⊢ 𝑛 ∈ V
147	145, 146	op2ndd 7983	. . . . . . . . 9 ⊢ (𝑤 = ⟨𝑡, 𝑛⟩ → (2^nd ‘𝑤) = 𝑛)
148	147	oveq2d 7422	. . . . . . . 8 ⊢ (𝑤 = ⟨𝑡, 𝑛⟩ → (2↑(2^nd ‘𝑤)) = (2↑𝑛))
149	145, 146	op1std 7982	. . . . . . . 8 ⊢ (𝑤 = ⟨𝑡, 𝑛⟩ → (1^st ‘𝑤) = 𝑡)
150	148, 149	oveq12d 7424	. . . . . . 7 ⊢ (𝑤 = ⟨𝑡, 𝑛⟩ → ((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)) = ((2↑𝑛) · 𝑡))
151		inss2 4229	. . . . . . . . . 10 ⊢ (𝑇 ∩ 𝑅) ⊆ 𝑅
152	151	sseli 3978	. . . . . . . . 9 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → 𝐴 ∈ 𝑅)
153		cnveq 5872	. . . . . . . . . . . 12 ⊢ (𝑓 = 𝐴 → ^◡𝑓 = ^◡𝐴)
154	153	imaeq1d 6057	. . . . . . . . . . 11 ⊢ (𝑓 = 𝐴 → (^◡𝑓 “ ℕ) = (^◡𝐴 “ ℕ))
155	154	eleq1d 2819	. . . . . . . . . 10 ⊢ (𝑓 = 𝐴 → ((^◡𝑓 “ ℕ) ∈ Fin ↔ (^◡𝐴 “ ℕ) ∈ Fin))
156	155, 9	elab2g 3670	. . . . . . . . 9 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝐴 ∈ 𝑅 ↔ (^◡𝐴 “ ℕ) ∈ Fin))
157	152, 156	mpbid 231	. . . . . . . 8 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (^◡𝐴 “ ℕ) ∈ Fin)
158		ssfi 9170	. . . . . . . 8 ⊢ (((^◡𝐴 “ ℕ) ∈ Fin ∧ ((^◡𝐴 “ ℕ) ∩ 𝐽) ⊆ (^◡𝐴 “ ℕ)) → ((^◡𝐴 “ ℕ) ∩ 𝐽) ∈ Fin)
159	157, 127, 158	sylancl 587	. . . . . . 7 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ((^◡𝐴 “ ℕ) ∩ 𝐽) ∈ Fin)
160	133	adantrr 716	. . . . . . . 8 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ (𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽) ∧ 𝑛 ∈ (bits‘(𝐴‘𝑡)))) → 𝑡 ∈ ℂ)
161	137, 160	mulcld 11231	. . . . . . 7 ⊢ ((𝐴 ∈ (𝑇 ∩ 𝑅) ∧ (𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽) ∧ 𝑛 ∈ (bits‘(𝐴‘𝑡)))) → ((2↑𝑛) · 𝑡) ∈ ℂ)
162	150, 159, 132, 161	fsum2d 15714	. . . . . 6 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)Σ𝑛 ∈ (bits‘(𝐴‘𝑡))((2↑𝑛) · 𝑡) = Σ𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)))
163	140, 144, 162	3eqtr3d 2781	. . . . 5 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)((𝐴‘𝑡) · 𝑡) = Σ𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)))
164		inss1 4228	. . . . . . . . 9 ⊢ (𝑇 ∩ 𝑅) ⊆ 𝑇
165	164	sseli 3978	. . . . . . . 8 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → 𝐴 ∈ 𝑇)
166	154	sseq1d 4013	. . . . . . . . . 10 ⊢ (𝑓 = 𝐴 → ((^◡𝑓 “ ℕ) ⊆ 𝐽 ↔ (^◡𝐴 “ ℕ) ⊆ 𝐽))
167	166, 10	elrab2 3686	. . . . . . . . 9 ⊢ (𝐴 ∈ 𝑇 ↔ (𝐴 ∈ (ℕ₀ ↑_m ℕ) ∧ (^◡𝐴 “ ℕ) ⊆ 𝐽))
168	167	simprbi 498	. . . . . . . 8 ⊢ (𝐴 ∈ 𝑇 → (^◡𝐴 “ ℕ) ⊆ 𝐽)
169	165, 168	syl 17	. . . . . . 7 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (^◡𝐴 “ ℕ) ⊆ 𝐽)
170		df-ss 3965	. . . . . . 7 ⊢ ((^◡𝐴 “ ℕ) ⊆ 𝐽 ↔ ((^◡𝐴 “ ℕ) ∩ 𝐽) = (^◡𝐴 “ ℕ))
171	169, 170	sylib 217	. . . . . 6 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → ((^◡𝐴 “ ℕ) ∩ 𝐽) = (^◡𝐴 “ ℕ))
172	171	sumeq1d 15644	. . . . 5 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)((𝐴‘𝑡) · 𝑡) = Σ𝑡 ∈ (^◡𝐴 “ ℕ)((𝐴‘𝑡) · 𝑡))
173	163, 172	eqtr3d 2775	. . . 4 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑤 ∈ ∪ 𝑡 ∈ ((^◡𝐴 “ ℕ) ∩ 𝐽)({𝑡} × (bits‘(𝐴‘𝑡)))((2↑(2^nd ‘𝑤)) · (1^st ‘𝑤)) = Σ𝑡 ∈ (^◡𝐴 “ ℕ)((𝐴‘𝑡) · 𝑡))
174	27, 118, 173	3eqtr2d 2779	. . 3 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)(((𝐺‘𝐴)‘𝑘) · 𝑘) = Σ𝑡 ∈ (^◡𝐴 “ ℕ)((𝐴‘𝑡) · 𝑡))
175		fveq2 6889	. . . . 5 ⊢ (𝑘 = 𝑡 → (𝐴‘𝑘) = (𝐴‘𝑡))
176		id 22	. . . . 5 ⊢ (𝑘 = 𝑡 → 𝑘 = 𝑡)
177	175, 176	oveq12d 7424	. . . 4 ⊢ (𝑘 = 𝑡 → ((𝐴‘𝑘) · 𝑘) = ((𝐴‘𝑡) · 𝑡))
178	177	cbvsumv 15639	. . 3 ⊢ Σ𝑘 ∈ (^◡𝐴 “ ℕ)((𝐴‘𝑘) · 𝑘) = Σ𝑡 ∈ (^◡𝐴 “ ℕ)((𝐴‘𝑡) · 𝑡)
179	174, 178	eqtr4di 2791	. 2 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → Σ𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)(((𝐺‘𝐴)‘𝑘) · 𝑘) = Σ𝑘 ∈ (^◡𝐴 “ ℕ)((𝐴‘𝑘) · 𝑘))
180		0nn0 12484	. . . . . . . 8 ⊢ 0 ∈ ℕ₀
181		1nn0 12485	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
182		prssi 4824	. . . . . . . 8 ⊢ ((0 ∈ ℕ₀ ∧ 1 ∈ ℕ₀) → {0, 1} ⊆ ℕ₀)
183	180, 181, 182	mp2an 691	. . . . . . 7 ⊢ {0, 1} ⊆ ℕ₀
184		fss 6732	. . . . . . 7 ⊢ (((𝐺‘𝐴):ℕ⟶{0, 1} ∧ {0, 1} ⊆ ℕ₀) → (𝐺‘𝐴):ℕ⟶ℕ₀)
185	183, 184	mpan2 690	. . . . . 6 ⊢ ((𝐺‘𝐴):ℕ⟶{0, 1} → (𝐺‘𝐴):ℕ⟶ℕ₀)
186		nn0ex 12475	. . . . . . . 8 ⊢ ℕ₀ ∈ V
187		nnex 12215	. . . . . . . 8 ⊢ ℕ ∈ V
188	186, 187	elmap 8862	. . . . . . 7 ⊢ ((𝐺‘𝐴) ∈ (ℕ₀ ↑_m ℕ) ↔ (𝐺‘𝐴):ℕ⟶ℕ₀)
189	188	biimpri 227	. . . . . 6 ⊢ ((𝐺‘𝐴):ℕ⟶ℕ₀ → (𝐺‘𝐴) ∈ (ℕ₀ ↑_m ℕ))
190	19, 185, 189	3syl 18	. . . . 5 ⊢ ((𝐺‘𝐴) ∈ ({0, 1} ↑_m ℕ) → (𝐺‘𝐴) ∈ (ℕ₀ ↑_m ℕ))
191	190	anim1i 616	. . . 4 ⊢ (((𝐺‘𝐴) ∈ ({0, 1} ↑_m ℕ) ∧ (𝐺‘𝐴) ∈ 𝑅) → ((𝐺‘𝐴) ∈ (ℕ₀ ↑_m ℕ) ∧ (𝐺‘𝐴) ∈ 𝑅))
192		elin 3964	. . . 4 ⊢ ((𝐺‘𝐴) ∈ ((ℕ₀ ↑_m ℕ) ∩ 𝑅) ↔ ((𝐺‘𝐴) ∈ (ℕ₀ ↑_m ℕ) ∧ (𝐺‘𝐴) ∈ 𝑅))
193	191, 16, 192	3imtr4i 292	. . 3 ⊢ ((𝐺‘𝐴) ∈ (({0, 1} ↑_m ℕ) ∩ 𝑅) → (𝐺‘𝐴) ∈ ((ℕ₀ ↑_m ℕ) ∩ 𝑅))
194		eulerpart.s	. . . 4 ⊢ 𝑆 = (𝑓 ∈ ((ℕ₀ ↑_m ℕ) ∩ 𝑅) ↦ Σ𝑘 ∈ ℕ ((𝑓‘𝑘) · 𝑘))
195	9, 194	eulerpartlemsv2 33346	. . 3 ⊢ ((𝐺‘𝐴) ∈ ((ℕ₀ ↑_m ℕ) ∩ 𝑅) → (𝑆‘(𝐺‘𝐴)) = Σ𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)(((𝐺‘𝐴)‘𝑘) · 𝑘))
196	15, 193, 195	3syl 18	. 2 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝑆‘(𝐺‘𝐴)) = Σ𝑘 ∈ (^◡(𝐺‘𝐴) “ ℕ)(((𝐺‘𝐴)‘𝑘) · 𝑘))
197	120, 152	elind 4194	. . 3 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → 𝐴 ∈ ((ℕ₀ ↑_m ℕ) ∩ 𝑅))
198	9, 194	eulerpartlemsv2 33346	. . 3 ⊢ (𝐴 ∈ ((ℕ₀ ↑_m ℕ) ∩ 𝑅) → (𝑆‘𝐴) = Σ𝑘 ∈ (^◡𝐴 “ ℕ)((𝐴‘𝑘) · 𝑘))
199	197, 198	syl 17	. 2 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝑆‘𝐴) = Σ𝑘 ∈ (^◡𝐴 “ ℕ)((𝐴‘𝑘) · 𝑘))
200	179, 196, 199	3eqtr4d 2783	1 ⊢ (𝐴 ∈ (𝑇 ∩ 𝑅) → (𝑆‘(𝐺‘𝐴)) = (𝑆‘𝐴))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 397 = wceq 1542 ∈ wcel 2107 {cab 2710 ∀wral 3062 ∃wrex 3071 {crab 3433 Vcvv 3475 ∖ cdif 3945 ∩ cin 3947 ⊆ wss 3948 ∅c0 4322 ifcif 4528 𝒫 cpw 4602 {csn 4628 {cpr 4630 ⟨cop 4634 ∪ ciun 4997 class class class wbr 5148 {copab 5210 ↦ cmpt 5231 × cxp 5674 ^◡ccnv 5675 dom cdm 5676 ↾ cres 5678 “ cima 5679 ∘ ccom 5680 Fn wfn 6536 ⟶wf 6537 –1-1-onto→wf1o 6540 ‘cfv 6541 (class class class)co 7406 ∈ cmpo 7408 1^st c1st 7970 2^nd c2nd 7971 supp csupp 8143 ↑_m cmap 8817 ≈ cen 8933 Fincfn 8936 ℂcc 11105 0cc0 11107 1c1 11108 · cmul 11112 ≤ cle 11246 ℕcn 12209 2c2 12264 ℕ₀cn0 12469 ↑cexp 14024 Σcsu 15629 ∥ cdvds 16194 bitscbits 16357 𝟭cind 32997

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5285 ax-sep 5299 ax-nul 5306 ax-pow 5363 ax-pr 5427 ax-un 7722 ax-inf2 9633 ax-ac2 10455 ax-cnex 11163 ax-resscn 11164 ax-1cn 11165 ax-icn 11166 ax-addcl 11167 ax-addrcl 11168 ax-mulcl 11169 ax-mulrcl 11170 ax-mulcom 11171 ax-addass 11172 ax-mulass 11173 ax-distr 11174 ax-i2m1 11175 ax-1ne0 11176 ax-1rid 11177 ax-rnegex 11178 ax-rrecex 11179 ax-cnre 11180 ax-pre-lttri 11181 ax-pre-lttrn 11182 ax-pre-ltadd 11183 ax-pre-mulgt0 11184 ax-pre-sup 11185

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-nel 3048 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3778 df-csb 3894 df-dif 3951 df-un 3953 df-in 3955 df-ss 3965 df-pss 3967 df-nul 4323 df-if 4529 df-pw 4604 df-sn 4629 df-pr 4631 df-op 4635 df-uni 4909 df-int 4951 df-iun 4999 df-disj 5114 df-br 5149 df-opab 5211 df-mpt 5232 df-tr 5266 df-id 5574 df-eprel 5580 df-po 5588 df-so 5589 df-fr 5631 df-se 5632 df-we 5633 df-xp 5682 df-rel 5683 df-cnv 5684 df-co 5685 df-dm 5686 df-rn 5687 df-res 5688 df-ima 5689 df-pred 6298 df-ord 6365 df-on 6366 df-lim 6367 df-suc 6368 df-iota 6493 df-fun 6543 df-fn 6544 df-f 6545 df-f1 6546 df-fo 6547 df-f1o 6548 df-fv 6549 df-isom 6550 df-riota 7362 df-ov 7409 df-oprab 7410 df-mpo 7411 df-om 7853 df-1st 7972 df-2nd 7973 df-supp 8144 df-frecs 8263 df-wrecs 8294 df-recs 8368 df-rdg 8407 df-1o 8463 df-2o 8464 df-oadd 8467 df-er 8700 df-map 8819 df-pm 8820 df-en 8937 df-dom 8938 df-sdom 8939 df-fin 8940 df-fsupp 9359 df-sup 9434 df-inf 9435 df-oi 9502 df-dju 9893 df-card 9931 df-acn 9934 df-ac 10108 df-pnf 11247 df-mnf 11248 df-xr 11249 df-ltxr 11250 df-le 11251 df-sub 11443 df-neg 11444 df-div 11869 df-nn 12210 df-2 12272 df-3 12273 df-n0 12470 df-xnn0 12542 df-z 12556 df-uz 12820 df-rp 12972 df-fz 13482 df-fzo 13625 df-fl 13754 df-mod 13832 df-seq 13964 df-exp 14025 df-hash 14288 df-cj 15043 df-re 15044 df-im 15045 df-sqrt 15179 df-abs 15180 df-clim 15429 df-sum 15630 df-dvds 16195 df-bits 16360 df-ind 32998

This theorem is referenced by: eulerpartlemn 33369

W3C validator