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

Theorem eulerpartlemt 33991
Description: Lemma for eulerpart 34002. (Contributed by Thierry Arnoux, 19-Sep-2017.)
Hypotheses
Ref Expression
eulerpart.p 𝑃 = {𝑓 ∈ (ℕ0m ℕ) ∣ ((𝑓 “ ℕ) ∈ Fin ∧ Σ𝑘 ∈ ℕ ((𝑓𝑘) · 𝑘) = 𝑁)}
eulerpart.o 𝑂 = {𝑔𝑃 ∣ ∀𝑛 ∈ (𝑔 “ ℕ) ¬ 2 ∥ 𝑛}
eulerpart.d 𝐷 = {𝑔𝑃 ∣ ∀𝑛 ∈ ℕ (𝑔𝑛) ≤ 1}
eulerpart.j 𝐽 = {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}
eulerpart.f 𝐹 = (𝑥𝐽, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥))
eulerpart.h 𝐻 = {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m 𝐽) ∣ (𝑟 supp ∅) ∈ Fin}
eulerpart.m 𝑀 = (𝑟𝐻 ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥𝐽𝑦 ∈ (𝑟𝑥))})
eulerpart.r 𝑅 = {𝑓 ∣ (𝑓 “ ℕ) ∈ Fin}
eulerpart.t 𝑇 = {𝑓 ∈ (ℕ0m ℕ) ∣ (𝑓 “ ℕ) ⊆ 𝐽}
Assertion
Ref Expression
eulerpartlemt ((ℕ0m 𝐽) ∩ 𝑅) = ran (𝑚 ∈ (𝑇𝑅) ↦ (𝑚𝐽))
Distinct variable groups:   𝑓,𝑚,𝐽   𝑅,𝑚   𝑇,𝑚
Allowed substitution hints:   𝐷(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑚,𝑛,𝑟)   𝑃(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑚,𝑛,𝑟)   𝑅(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑛,𝑟)   𝑇(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑛,𝑟)   𝐹(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑚,𝑛,𝑟)   𝐻(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑚,𝑛,𝑟)   𝐽(𝑥,𝑦,𝑧,𝑔,𝑘,𝑛,𝑟)   𝑀(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑚,𝑛,𝑟)   𝑁(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑚,𝑛,𝑟)   𝑂(𝑥,𝑦,𝑧,𝑓,𝑔,𝑘,𝑚,𝑛,𝑟)

Proof of Theorem eulerpartlemt
Dummy variable 𝑜 is distinct from all other variables.
StepHypRef Expression
1 elmapi 8867 . . . . . . . . . 10 (𝑜 ∈ (ℕ0m 𝐽) → 𝑜:𝐽⟶ℕ0)
21adantr 480 . . . . . . . . 9 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → 𝑜:𝐽⟶ℕ0)
3 c0ex 11238 . . . . . . . . . . 11 0 ∈ V
43fconst 6783 . . . . . . . . . 10 ((ℕ ∖ 𝐽) × {0}):(ℕ ∖ 𝐽)⟶{0}
54a1i 11 . . . . . . . . 9 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → ((ℕ ∖ 𝐽) × {0}):(ℕ ∖ 𝐽)⟶{0})
6 disjdif 4472 . . . . . . . . . 10 (𝐽 ∩ (ℕ ∖ 𝐽)) = ∅
76a1i 11 . . . . . . . . 9 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → (𝐽 ∩ (ℕ ∖ 𝐽)) = ∅)
8 fun 6759 . . . . . . . . 9 (((𝑜:𝐽⟶ℕ0 ∧ ((ℕ ∖ 𝐽) × {0}):(ℕ ∖ 𝐽)⟶{0}) ∧ (𝐽 ∩ (ℕ ∖ 𝐽)) = ∅) → (𝑜 ∪ ((ℕ ∖ 𝐽) × {0})):(𝐽 ∪ (ℕ ∖ 𝐽))⟶(ℕ0 ∪ {0}))
92, 5, 7, 8syl21anc 837 . . . . . . . 8 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → (𝑜 ∪ ((ℕ ∖ 𝐽) × {0})):(𝐽 ∪ (ℕ ∖ 𝐽))⟶(ℕ0 ∪ {0}))
10 eulerpart.j . . . . . . . . . . 11 𝐽 = {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧}
11 ssrab2 4075 . . . . . . . . . . 11 {𝑧 ∈ ℕ ∣ ¬ 2 ∥ 𝑧} ⊆ ℕ
1210, 11eqsstri 4014 . . . . . . . . . 10 𝐽 ⊆ ℕ
13 undif 4482 . . . . . . . . . 10 (𝐽 ⊆ ℕ ↔ (𝐽 ∪ (ℕ ∖ 𝐽)) = ℕ)
1412, 13mpbi 229 . . . . . . . . 9 (𝐽 ∪ (ℕ ∖ 𝐽)) = ℕ
15 0nn0 12517 . . . . . . . . . . 11 0 ∈ ℕ0
16 snssi 4812 . . . . . . . . . . 11 (0 ∈ ℕ0 → {0} ⊆ ℕ0)
1715, 16ax-mp 5 . . . . . . . . . 10 {0} ⊆ ℕ0
18 ssequn2 4183 . . . . . . . . . 10 ({0} ⊆ ℕ0 ↔ (ℕ0 ∪ {0}) = ℕ0)
1917, 18mpbi 229 . . . . . . . . 9 (ℕ0 ∪ {0}) = ℕ0
2014, 19feq23i 6716 . . . . . . . 8 ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})):(𝐽 ∪ (ℕ ∖ 𝐽))⟶(ℕ0 ∪ {0}) ↔ (𝑜 ∪ ((ℕ ∖ 𝐽) × {0})):ℕ⟶ℕ0)
219, 20sylib 217 . . . . . . 7 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → (𝑜 ∪ ((ℕ ∖ 𝐽) × {0})):ℕ⟶ℕ0)
22 nn0ex 12508 . . . . . . . 8 0 ∈ V
23 nnex 12248 . . . . . . . 8 ℕ ∈ V
2422, 23elmap 8889 . . . . . . 7 ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ∈ (ℕ0m ℕ) ↔ (𝑜 ∪ ((ℕ ∖ 𝐽) × {0})):ℕ⟶ℕ0)
2521, 24sylibr 233 . . . . . 6 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → (𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ∈ (ℕ0m ℕ))
26 cnvun 6147 . . . . . . . . 9 (𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) = (𝑜((ℕ ∖ 𝐽) × {0}))
2726imaeq1i 6060 . . . . . . . 8 ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) “ ℕ) = ((𝑜((ℕ ∖ 𝐽) × {0})) “ ℕ)
28 imaundir 6155 . . . . . . . 8 ((𝑜((ℕ ∖ 𝐽) × {0})) “ ℕ) = ((𝑜 “ ℕ) ∪ (((ℕ ∖ 𝐽) × {0}) “ ℕ))
2927, 28eqtri 2756 . . . . . . 7 ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) “ ℕ) = ((𝑜 “ ℕ) ∪ (((ℕ ∖ 𝐽) × {0}) “ ℕ))
30 vex 3475 . . . . . . . . . . 11 𝑜 ∈ V
31 cnveq 5876 . . . . . . . . . . . . 13 (𝑓 = 𝑜𝑓 = 𝑜)
3231imaeq1d 6062 . . . . . . . . . . . 12 (𝑓 = 𝑜 → (𝑓 “ ℕ) = (𝑜 “ ℕ))
3332eleq1d 2814 . . . . . . . . . . 11 (𝑓 = 𝑜 → ((𝑓 “ ℕ) ∈ Fin ↔ (𝑜 “ ℕ) ∈ Fin))
34 eulerpart.r . . . . . . . . . . 11 𝑅 = {𝑓 ∣ (𝑓 “ ℕ) ∈ Fin}
3530, 33, 34elab2 3671 . . . . . . . . . 10 (𝑜𝑅 ↔ (𝑜 “ ℕ) ∈ Fin)
3635biimpi 215 . . . . . . . . 9 (𝑜𝑅 → (𝑜 “ ℕ) ∈ Fin)
3736adantl 481 . . . . . . . 8 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → (𝑜 “ ℕ) ∈ Fin)
38 cnvxp 6161 . . . . . . . . . . . . . 14 ((ℕ ∖ 𝐽) × {0}) = ({0} × (ℕ ∖ 𝐽))
3938dmeqi 5907 . . . . . . . . . . . . 13 dom ((ℕ ∖ 𝐽) × {0}) = dom ({0} × (ℕ ∖ 𝐽))
40 2nn 12315 . . . . . . . . . . . . . . 15 2 ∈ ℕ
41 2z 12624 . . . . . . . . . . . . . . . . 17 2 ∈ ℤ
42 iddvds 16246 . . . . . . . . . . . . . . . . 17 (2 ∈ ℤ → 2 ∥ 2)
4341, 42ax-mp 5 . . . . . . . . . . . . . . . 16 2 ∥ 2
44 breq2 5152 . . . . . . . . . . . . . . . . . . 19 (𝑧 = 2 → (2 ∥ 𝑧 ↔ 2 ∥ 2))
4544notbid 318 . . . . . . . . . . . . . . . . . 18 (𝑧 = 2 → (¬ 2 ∥ 𝑧 ↔ ¬ 2 ∥ 2))
4645, 10elrab2 3685 . . . . . . . . . . . . . . . . 17 (2 ∈ 𝐽 ↔ (2 ∈ ℕ ∧ ¬ 2 ∥ 2))
4746simprbi 496 . . . . . . . . . . . . . . . 16 (2 ∈ 𝐽 → ¬ 2 ∥ 2)
4843, 47mt2 199 . . . . . . . . . . . . . . 15 ¬ 2 ∈ 𝐽
49 eldif 3957 . . . . . . . . . . . . . . 15 (2 ∈ (ℕ ∖ 𝐽) ↔ (2 ∈ ℕ ∧ ¬ 2 ∈ 𝐽))
5040, 48, 49mpbir2an 710 . . . . . . . . . . . . . 14 2 ∈ (ℕ ∖ 𝐽)
51 ne0i 4335 . . . . . . . . . . . . . 14 (2 ∈ (ℕ ∖ 𝐽) → (ℕ ∖ 𝐽) ≠ ∅)
52 dmxp 5931 . . . . . . . . . . . . . 14 ((ℕ ∖ 𝐽) ≠ ∅ → dom ({0} × (ℕ ∖ 𝐽)) = {0})
5350, 51, 52mp2b 10 . . . . . . . . . . . . 13 dom ({0} × (ℕ ∖ 𝐽)) = {0}
5439, 53eqtri 2756 . . . . . . . . . . . 12 dom ((ℕ ∖ 𝐽) × {0}) = {0}
5554ineq1i 4208 . . . . . . . . . . 11 (dom ((ℕ ∖ 𝐽) × {0}) ∩ ℕ) = ({0} ∩ ℕ)
56 incom 4201 . . . . . . . . . . 11 (ℕ ∩ {0}) = ({0} ∩ ℕ)
57 0nnn 12278 . . . . . . . . . . . 12 ¬ 0 ∈ ℕ
58 disjsn 4716 . . . . . . . . . . . 12 ((ℕ ∩ {0}) = ∅ ↔ ¬ 0 ∈ ℕ)
5957, 58mpbir 230 . . . . . . . . . . 11 (ℕ ∩ {0}) = ∅
6055, 56, 593eqtr2i 2762 . . . . . . . . . 10 (dom ((ℕ ∖ 𝐽) × {0}) ∩ ℕ) = ∅
61 imadisj 6083 . . . . . . . . . 10 ((((ℕ ∖ 𝐽) × {0}) “ ℕ) = ∅ ↔ (dom ((ℕ ∖ 𝐽) × {0}) ∩ ℕ) = ∅)
6260, 61mpbir 230 . . . . . . . . 9 (((ℕ ∖ 𝐽) × {0}) “ ℕ) = ∅
63 0fin 9195 . . . . . . . . 9 ∅ ∈ Fin
6462, 63eqeltri 2825 . . . . . . . 8 (((ℕ ∖ 𝐽) × {0}) “ ℕ) ∈ Fin
65 unfi 9196 . . . . . . . 8 (((𝑜 “ ℕ) ∈ Fin ∧ (((ℕ ∖ 𝐽) × {0}) “ ℕ) ∈ Fin) → ((𝑜 “ ℕ) ∪ (((ℕ ∖ 𝐽) × {0}) “ ℕ)) ∈ Fin)
6637, 64, 65sylancl 585 . . . . . . 7 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → ((𝑜 “ ℕ) ∪ (((ℕ ∖ 𝐽) × {0}) “ ℕ)) ∈ Fin)
6729, 66eqeltrid 2833 . . . . . 6 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) “ ℕ) ∈ Fin)
68 cnvimass 6085 . . . . . . . . 9 (𝑜 “ ℕ) ⊆ dom 𝑜
6968, 2fssdm 6742 . . . . . . . 8 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → (𝑜 “ ℕ) ⊆ 𝐽)
70 0ss 4397 . . . . . . . . . 10 ∅ ⊆ 𝐽
7162, 70eqsstri 4014 . . . . . . . . 9 (((ℕ ∖ 𝐽) × {0}) “ ℕ) ⊆ 𝐽
7271a1i 11 . . . . . . . 8 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → (((ℕ ∖ 𝐽) × {0}) “ ℕ) ⊆ 𝐽)
7369, 72unssd 4186 . . . . . . 7 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → ((𝑜 “ ℕ) ∪ (((ℕ ∖ 𝐽) × {0}) “ ℕ)) ⊆ 𝐽)
7429, 73eqsstrid 4028 . . . . . 6 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) “ ℕ) ⊆ 𝐽)
75 eulerpart.p . . . . . . 7 𝑃 = {𝑓 ∈ (ℕ0m ℕ) ∣ ((𝑓 “ ℕ) ∈ Fin ∧ Σ𝑘 ∈ ℕ ((𝑓𝑘) · 𝑘) = 𝑁)}
76 eulerpart.o . . . . . . 7 𝑂 = {𝑔𝑃 ∣ ∀𝑛 ∈ (𝑔 “ ℕ) ¬ 2 ∥ 𝑛}
77 eulerpart.d . . . . . . 7 𝐷 = {𝑔𝑃 ∣ ∀𝑛 ∈ ℕ (𝑔𝑛) ≤ 1}
78 eulerpart.f . . . . . . 7 𝐹 = (𝑥𝐽, 𝑦 ∈ ℕ0 ↦ ((2↑𝑦) · 𝑥))
79 eulerpart.h . . . . . . 7 𝐻 = {𝑟 ∈ ((𝒫 ℕ0 ∩ Fin) ↑m 𝐽) ∣ (𝑟 supp ∅) ∈ Fin}
80 eulerpart.m . . . . . . 7 𝑀 = (𝑟𝐻 ↦ {⟨𝑥, 𝑦⟩ ∣ (𝑥𝐽𝑦 ∈ (𝑟𝑥))})
81 eulerpart.t . . . . . . 7 𝑇 = {𝑓 ∈ (ℕ0m ℕ) ∣ (𝑓 “ ℕ) ⊆ 𝐽}
8275, 76, 77, 10, 78, 79, 80, 34, 81eulerpartlemt0 33989 . . . . . 6 ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ∈ (𝑇𝑅) ↔ ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ∈ (ℕ0m ℕ) ∧ ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) “ ℕ) ∈ Fin ∧ ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) “ ℕ) ⊆ 𝐽))
8325, 67, 74, 82syl3anbrc 1341 . . . . 5 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → (𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ∈ (𝑇𝑅))
84 resundir 6000 . . . . . 6 ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ↾ 𝐽) = ((𝑜𝐽) ∪ (((ℕ ∖ 𝐽) × {0}) ↾ 𝐽))
85 ffn 6722 . . . . . . . 8 (𝑜:𝐽⟶ℕ0𝑜 Fn 𝐽)
86 fnresdm 6674 . . . . . . . . 9 (𝑜 Fn 𝐽 → (𝑜𝐽) = 𝑜)
87 disjdifr 4473 . . . . . . . . . . 11 ((ℕ ∖ 𝐽) ∩ 𝐽) = ∅
88 fnconstg 6785 . . . . . . . . . . . 12 (0 ∈ ℕ0 → ((ℕ ∖ 𝐽) × {0}) Fn (ℕ ∖ 𝐽))
89 fnresdisj 6675 . . . . . . . . . . . 12 (((ℕ ∖ 𝐽) × {0}) Fn (ℕ ∖ 𝐽) → (((ℕ ∖ 𝐽) ∩ 𝐽) = ∅ ↔ (((ℕ ∖ 𝐽) × {0}) ↾ 𝐽) = ∅))
9015, 88, 89mp2b 10 . . . . . . . . . . 11 (((ℕ ∖ 𝐽) ∩ 𝐽) = ∅ ↔ (((ℕ ∖ 𝐽) × {0}) ↾ 𝐽) = ∅)
9187, 90mpbi 229 . . . . . . . . . 10 (((ℕ ∖ 𝐽) × {0}) ↾ 𝐽) = ∅
9291a1i 11 . . . . . . . . 9 (𝑜 Fn 𝐽 → (((ℕ ∖ 𝐽) × {0}) ↾ 𝐽) = ∅)
9386, 92uneq12d 4163 . . . . . . . 8 (𝑜 Fn 𝐽 → ((𝑜𝐽) ∪ (((ℕ ∖ 𝐽) × {0}) ↾ 𝐽)) = (𝑜 ∪ ∅))
942, 85, 933syl 18 . . . . . . 7 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → ((𝑜𝐽) ∪ (((ℕ ∖ 𝐽) × {0}) ↾ 𝐽)) = (𝑜 ∪ ∅))
95 un0 4391 . . . . . . 7 (𝑜 ∪ ∅) = 𝑜
9694, 95eqtrdi 2784 . . . . . 6 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → ((𝑜𝐽) ∪ (((ℕ ∖ 𝐽) × {0}) ↾ 𝐽)) = 𝑜)
9784, 96eqtr2id 2781 . . . . 5 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → 𝑜 = ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ↾ 𝐽))
98 reseq1 5979 . . . . . 6 (𝑚 = (𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) → (𝑚𝐽) = ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ↾ 𝐽))
9998rspceeqv 3631 . . . . 5 (((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ∈ (𝑇𝑅) ∧ 𝑜 = ((𝑜 ∪ ((ℕ ∖ 𝐽) × {0})) ↾ 𝐽)) → ∃𝑚 ∈ (𝑇𝑅)𝑜 = (𝑚𝐽))
10083, 97, 99syl2anc 583 . . . 4 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) → ∃𝑚 ∈ (𝑇𝑅)𝑜 = (𝑚𝐽))
101 simpr 484 . . . . . . 7 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → 𝑜 = (𝑚𝐽))
102 simpl 482 . . . . . . . . . . . 12 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → 𝑚 ∈ (𝑇𝑅))
10375, 76, 77, 10, 78, 79, 80, 34, 81eulerpartlemt0 33989 . . . . . . . . . . . 12 (𝑚 ∈ (𝑇𝑅) ↔ (𝑚 ∈ (ℕ0m ℕ) ∧ (𝑚 “ ℕ) ∈ Fin ∧ (𝑚 “ ℕ) ⊆ 𝐽))
104102, 103sylib 217 . . . . . . . . . . 11 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → (𝑚 ∈ (ℕ0m ℕ) ∧ (𝑚 “ ℕ) ∈ Fin ∧ (𝑚 “ ℕ) ⊆ 𝐽))
105104simp1d 1140 . . . . . . . . . 10 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → 𝑚 ∈ (ℕ0m ℕ))
10622, 23elmap 8889 . . . . . . . . . 10 (𝑚 ∈ (ℕ0m ℕ) ↔ 𝑚:ℕ⟶ℕ0)
107105, 106sylib 217 . . . . . . . . 9 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → 𝑚:ℕ⟶ℕ0)
108 fssres 6763 . . . . . . . . 9 ((𝑚:ℕ⟶ℕ0𝐽 ⊆ ℕ) → (𝑚𝐽):𝐽⟶ℕ0)
109107, 12, 108sylancl 585 . . . . . . . 8 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → (𝑚𝐽):𝐽⟶ℕ0)
11010, 23rabex2 5336 . . . . . . . . 9 𝐽 ∈ V
11122, 110elmap 8889 . . . . . . . 8 ((𝑚𝐽) ∈ (ℕ0m 𝐽) ↔ (𝑚𝐽):𝐽⟶ℕ0)
112109, 111sylibr 233 . . . . . . 7 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → (𝑚𝐽) ∈ (ℕ0m 𝐽))
113101, 112eqeltrd 2829 . . . . . 6 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → 𝑜 ∈ (ℕ0m 𝐽))
114 ffun 6725 . . . . . . . . . 10 (𝑚:ℕ⟶ℕ0 → Fun 𝑚)
115 respreima 7075 . . . . . . . . . 10 (Fun 𝑚 → ((𝑚𝐽) “ ℕ) = ((𝑚 “ ℕ) ∩ 𝐽))
116107, 114, 1153syl 18 . . . . . . . . 9 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → ((𝑚𝐽) “ ℕ) = ((𝑚 “ ℕ) ∩ 𝐽))
117104simp2d 1141 . . . . . . . . . 10 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → (𝑚 “ ℕ) ∈ Fin)
118 infi 9292 . . . . . . . . . 10 ((𝑚 “ ℕ) ∈ Fin → ((𝑚 “ ℕ) ∩ 𝐽) ∈ Fin)
119117, 118syl 17 . . . . . . . . 9 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → ((𝑚 “ ℕ) ∩ 𝐽) ∈ Fin)
120116, 119eqeltrd 2829 . . . . . . . 8 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → ((𝑚𝐽) “ ℕ) ∈ Fin)
121 vex 3475 . . . . . . . . . 10 𝑚 ∈ V
122121resex 6033 . . . . . . . . 9 (𝑚𝐽) ∈ V
123 cnveq 5876 . . . . . . . . . . 11 (𝑓 = (𝑚𝐽) → 𝑓 = (𝑚𝐽))
124123imaeq1d 6062 . . . . . . . . . 10 (𝑓 = (𝑚𝐽) → (𝑓 “ ℕ) = ((𝑚𝐽) “ ℕ))
125124eleq1d 2814 . . . . . . . . 9 (𝑓 = (𝑚𝐽) → ((𝑓 “ ℕ) ∈ Fin ↔ ((𝑚𝐽) “ ℕ) ∈ Fin))
126122, 125, 34elab2 3671 . . . . . . . 8 ((𝑚𝐽) ∈ 𝑅 ↔ ((𝑚𝐽) “ ℕ) ∈ Fin)
127120, 126sylibr 233 . . . . . . 7 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → (𝑚𝐽) ∈ 𝑅)
128101, 127eqeltrd 2829 . . . . . 6 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → 𝑜𝑅)
129113, 128jca 511 . . . . 5 ((𝑚 ∈ (𝑇𝑅) ∧ 𝑜 = (𝑚𝐽)) → (𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅))
130129rexlimiva 3144 . . . 4 (∃𝑚 ∈ (𝑇𝑅)𝑜 = (𝑚𝐽) → (𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅))
131100, 130impbii 208 . . 3 ((𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅) ↔ ∃𝑚 ∈ (𝑇𝑅)𝑜 = (𝑚𝐽))
132131abbii 2798 . 2 {𝑜 ∣ (𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅)} = {𝑜 ∣ ∃𝑚 ∈ (𝑇𝑅)𝑜 = (𝑚𝐽)}
133 df-in 3954 . 2 ((ℕ0m 𝐽) ∩ 𝑅) = {𝑜 ∣ (𝑜 ∈ (ℕ0m 𝐽) ∧ 𝑜𝑅)}
134 eqid 2728 . . 3 (𝑚 ∈ (𝑇𝑅) ↦ (𝑚𝐽)) = (𝑚 ∈ (𝑇𝑅) ↦ (𝑚𝐽))
135134rnmpt 5957 . 2 ran (𝑚 ∈ (𝑇𝑅) ↦ (𝑚𝐽)) = {𝑜 ∣ ∃𝑚 ∈ (𝑇𝑅)𝑜 = (𝑚𝐽)}
136132, 133, 1353eqtr4i 2766 1 ((ℕ0m 𝐽) ∩ 𝑅) = ran (𝑚 ∈ (𝑇𝑅) ↦ (𝑚𝐽))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wb 205  wa 395  w3a 1085   = wceq 1534  wcel 2099  {cab 2705  wne 2937  wral 3058  wrex 3067  {crab 3429  cdif 3944  cun 3945  cin 3946  wss 3947  c0 4323  𝒫 cpw 4603  {csn 4629   class class class wbr 5148  {copab 5210  cmpt 5231   × cxp 5676  ccnv 5677  dom cdm 5678  ran crn 5679  cres 5680  cima 5681  Fun wfun 6542   Fn wfn 6543  wf 6544  cfv 6548  (class class class)co 7420  cmpo 7422   supp csupp 8165  m cmap 8844  Fincfn 8963  0cc0 11138  1c1 11139   · cmul 11143  cle 11279  cn 12242  2c2 12297  0cn0 12502  cz 12588  cexp 14058  Σcsu 15664  cdvds 16230
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1790  ax-4 1804  ax-5 1906  ax-6 1964  ax-7 2004  ax-8 2101  ax-9 2109  ax-10 2130  ax-11 2147  ax-12 2167  ax-ext 2699  ax-sep 5299  ax-nul 5306  ax-pow 5365  ax-pr 5429  ax-un 7740  ax-cnex 11194  ax-resscn 11195  ax-1cn 11196  ax-icn 11197  ax-addcl 11198  ax-addrcl 11199  ax-mulcl 11200  ax-mulrcl 11201  ax-mulcom 11202  ax-addass 11203  ax-mulass 11204  ax-distr 11205  ax-i2m1 11206  ax-1ne0 11207  ax-1rid 11208  ax-rnegex 11209  ax-rrecex 11210  ax-cnre 11211  ax-pre-lttri 11212  ax-pre-lttrn 11213  ax-pre-ltadd 11214
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 847  df-3or 1086  df-3an 1087  df-tru 1537  df-fal 1547  df-ex 1775  df-nf 1779  df-sb 2061  df-mo 2530  df-eu 2559  df-clab 2706  df-cleq 2720  df-clel 2806  df-nfc 2881  df-ne 2938  df-nel 3044  df-ral 3059  df-rex 3068  df-reu 3374  df-rab 3430  df-v 3473  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4324  df-if 4530  df-pw 4605  df-sn 4630  df-pr 4632  df-op 4636  df-uni 4909  df-iun 4998  df-br 5149  df-opab 5211  df-mpt 5232  df-tr 5266  df-id 5576  df-eprel 5582  df-po 5590  df-so 5591  df-fr 5633  df-we 5635  df-xp 5684  df-rel 5685  df-cnv 5686  df-co 5687  df-dm 5688  df-rn 5689  df-res 5690  df-ima 5691  df-pred 6305  df-ord 6372  df-on 6373  df-lim 6374  df-suc 6375  df-iota 6500  df-fun 6550  df-fn 6551  df-f 6552  df-f1 6553  df-fo 6554  df-f1o 6555  df-fv 6556  df-ov 7423  df-oprab 7424  df-mpo 7425  df-om 7871  df-1st 7993  df-2nd 7994  df-frecs 8286  df-wrecs 8317  df-recs 8391  df-rdg 8430  df-1o 8486  df-er 8724  df-map 8846  df-en 8964  df-dom 8965  df-sdom 8966  df-fin 8967  df-pnf 11280  df-mnf 11281  df-xr 11282  df-ltxr 11283  df-le 11284  df-neg 11477  df-nn 12243  df-2 12305  df-n0 12503  df-z 12589  df-dvds 16231
This theorem is referenced by:  eulerpartgbij  33992
  Copyright terms: Public domain W3C validator