Step | Hyp | Ref
| Expression |
1 | | df-dioph 40494 |
. . . 4
⊢ Dioph =
(𝑛 ∈
ℕ0 ↦ ran (𝑘 ∈ (ℤ≥‘𝑛), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑛)) ∧ (𝑝‘𝑢) = 0)})) |
2 | 1 | dmmptss 6133 |
. . 3
⊢ dom Dioph
⊆ ℕ0 |
3 | | elfvdm 6788 |
. . 3
⊢ (𝐷 ∈ (Dioph‘𝑁) → 𝑁 ∈ dom Dioph) |
4 | 2, 3 | sselid 3915 |
. 2
⊢ (𝐷 ∈ (Dioph‘𝑁) → 𝑁 ∈
ℕ0) |
5 | | fveq2 6756 |
. . . . . . 7
⊢ (𝑛 = 𝑁 → (ℤ≥‘𝑛) =
(ℤ≥‘𝑁)) |
6 | | eqidd 2739 |
. . . . . . 7
⊢ (𝑛 = 𝑁 → (mzPoly‘(1...𝑘)) = (mzPoly‘(1...𝑘))) |
7 | | oveq2 7263 |
. . . . . . . . . . . 12
⊢ (𝑛 = 𝑁 → (1...𝑛) = (1...𝑁)) |
8 | 7 | reseq2d 5880 |
. . . . . . . . . . 11
⊢ (𝑛 = 𝑁 → (𝑢 ↾ (1...𝑛)) = (𝑢 ↾ (1...𝑁))) |
9 | 8 | eqeq2d 2749 |
. . . . . . . . . 10
⊢ (𝑛 = 𝑁 → (𝑡 = (𝑢 ↾ (1...𝑛)) ↔ 𝑡 = (𝑢 ↾ (1...𝑁)))) |
10 | 9 | anbi1d 629 |
. . . . . . . . 9
⊢ (𝑛 = 𝑁 → ((𝑡 = (𝑢 ↾ (1...𝑛)) ∧ (𝑝‘𝑢) = 0) ↔ (𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0))) |
11 | 10 | rexbidv 3225 |
. . . . . . . 8
⊢ (𝑛 = 𝑁 → (∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑛)) ∧ (𝑝‘𝑢) = 0) ↔ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0))) |
12 | 11 | abbidv 2808 |
. . . . . . 7
⊢ (𝑛 = 𝑁 → {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑛)) ∧ (𝑝‘𝑢) = 0)} = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}) |
13 | 5, 6, 12 | mpoeq123dv 7328 |
. . . . . 6
⊢ (𝑛 = 𝑁 → (𝑘 ∈ (ℤ≥‘𝑛), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑛)) ∧ (𝑝‘𝑢) = 0)}) = (𝑘 ∈ (ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)})) |
14 | 13 | rneqd 5836 |
. . . . 5
⊢ (𝑛 = 𝑁 → ran (𝑘 ∈ (ℤ≥‘𝑛), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑛)) ∧ (𝑝‘𝑢) = 0)}) = ran (𝑘 ∈ (ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)})) |
15 | | ovex 7288 |
. . . . . . 7
⊢
(ℕ0 ↑m (1...𝑁)) ∈ V |
16 | 15 | pwex 5298 |
. . . . . 6
⊢ 𝒫
(ℕ0 ↑m (1...𝑁)) ∈ V |
17 | | eqid 2738 |
. . . . . . . 8
⊢ (𝑘 ∈
(ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}) = (𝑘 ∈ (ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}) |
18 | 17 | rnmpo 7385 |
. . . . . . 7
⊢ ran
(𝑘 ∈
(ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}) = {𝑑 ∣ ∃𝑘 ∈ (ℤ≥‘𝑁)∃𝑝 ∈ (mzPoly‘(1...𝑘))𝑑 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}} |
19 | | elmapi 8595 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑢 ∈ (ℕ0
↑m (1...𝑘))
→ 𝑢:(1...𝑘)⟶ℕ0) |
20 | | fzss2 13225 |
. . . . . . . . . . . . . . . . 17
⊢ (𝑘 ∈
(ℤ≥‘𝑁) → (1...𝑁) ⊆ (1...𝑘)) |
21 | | fssres 6624 |
. . . . . . . . . . . . . . . . 17
⊢ ((𝑢:(1...𝑘)⟶ℕ0 ∧ (1...𝑁) ⊆ (1...𝑘)) → (𝑢 ↾ (1...𝑁)):(1...𝑁)⟶ℕ0) |
22 | 19, 20, 21 | syl2anr 596 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑘 ∈
(ℤ≥‘𝑁) ∧ 𝑢 ∈ (ℕ0
↑m (1...𝑘))) → (𝑢 ↾ (1...𝑁)):(1...𝑁)⟶ℕ0) |
23 | | nn0ex 12169 |
. . . . . . . . . . . . . . . . 17
⊢
ℕ0 ∈ V |
24 | | ovex 7288 |
. . . . . . . . . . . . . . . . 17
⊢
(1...𝑁) ∈
V |
25 | 23, 24 | elmap 8617 |
. . . . . . . . . . . . . . . 16
⊢ ((𝑢 ↾ (1...𝑁)) ∈ (ℕ0
↑m (1...𝑁))
↔ (𝑢 ↾
(1...𝑁)):(1...𝑁)⟶ℕ0) |
26 | 22, 25 | sylibr 233 |
. . . . . . . . . . . . . . 15
⊢ ((𝑘 ∈
(ℤ≥‘𝑁) ∧ 𝑢 ∈ (ℕ0
↑m (1...𝑘))) → (𝑢 ↾ (1...𝑁)) ∈ (ℕ0
↑m (1...𝑁))) |
27 | | eleq1 2826 |
. . . . . . . . . . . . . . . 16
⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → (𝑡 ∈ (ℕ0
↑m (1...𝑁))
↔ (𝑢 ↾
(1...𝑁)) ∈
(ℕ0 ↑m (1...𝑁)))) |
28 | 27 | adantr 480 |
. . . . . . . . . . . . . . 15
⊢ ((𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) → (𝑡 ∈ (ℕ0
↑m (1...𝑁))
↔ (𝑢 ↾
(1...𝑁)) ∈
(ℕ0 ↑m (1...𝑁)))) |
29 | 26, 28 | syl5ibrcom 246 |
. . . . . . . . . . . . . 14
⊢ ((𝑘 ∈
(ℤ≥‘𝑁) ∧ 𝑢 ∈ (ℕ0
↑m (1...𝑘))) → ((𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) → 𝑡 ∈ (ℕ0
↑m (1...𝑁)))) |
30 | 29 | rexlimdva 3212 |
. . . . . . . . . . . . 13
⊢ (𝑘 ∈
(ℤ≥‘𝑁) → (∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) → 𝑡 ∈ (ℕ0
↑m (1...𝑁)))) |
31 | 30 | abssdv 3998 |
. . . . . . . . . . . 12
⊢ (𝑘 ∈
(ℤ≥‘𝑁) → {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ⊆ (ℕ0
↑m (1...𝑁))) |
32 | 15 | elpw2 5264 |
. . . . . . . . . . . 12
⊢ ({𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ∈ 𝒫 (ℕ0
↑m (1...𝑁))
↔ {𝑡 ∣
∃𝑢 ∈
(ℕ0 ↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ⊆ (ℕ0
↑m (1...𝑁))) |
33 | 31, 32 | sylibr 233 |
. . . . . . . . . . 11
⊢ (𝑘 ∈
(ℤ≥‘𝑁) → {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ∈ 𝒫 (ℕ0
↑m (1...𝑁))) |
34 | | eleq1 2826 |
. . . . . . . . . . 11
⊢ (𝑑 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} → (𝑑 ∈ 𝒫 (ℕ0
↑m (1...𝑁))
↔ {𝑡 ∣
∃𝑢 ∈
(ℕ0 ↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ∈ 𝒫 (ℕ0
↑m (1...𝑁)))) |
35 | 33, 34 | syl5ibrcom 246 |
. . . . . . . . . 10
⊢ (𝑘 ∈
(ℤ≥‘𝑁) → (𝑑 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} → 𝑑 ∈ 𝒫 (ℕ0
↑m (1...𝑁)))) |
36 | 35 | rexlimdvw 3218 |
. . . . . . . . 9
⊢ (𝑘 ∈
(ℤ≥‘𝑁) → (∃𝑝 ∈ (mzPoly‘(1...𝑘))𝑑 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} → 𝑑 ∈ 𝒫 (ℕ0
↑m (1...𝑁)))) |
37 | 36 | rexlimiv 3208 |
. . . . . . . 8
⊢
(∃𝑘 ∈
(ℤ≥‘𝑁)∃𝑝 ∈ (mzPoly‘(1...𝑘))𝑑 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} → 𝑑 ∈ 𝒫 (ℕ0
↑m (1...𝑁))) |
38 | 37 | abssi 3999 |
. . . . . . 7
⊢ {𝑑 ∣ ∃𝑘 ∈
(ℤ≥‘𝑁)∃𝑝 ∈ (mzPoly‘(1...𝑘))𝑑 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}} ⊆ 𝒫
(ℕ0 ↑m (1...𝑁)) |
39 | 18, 38 | eqsstri 3951 |
. . . . . 6
⊢ ran
(𝑘 ∈
(ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}) ⊆ 𝒫
(ℕ0 ↑m (1...𝑁)) |
40 | 16, 39 | ssexi 5241 |
. . . . 5
⊢ ran
(𝑘 ∈
(ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}) ∈ V |
41 | 14, 1, 40 | fvmpt 6857 |
. . . 4
⊢ (𝑁 ∈ ℕ0
→ (Dioph‘𝑁) =
ran (𝑘 ∈
(ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)})) |
42 | 41 | eleq2d 2824 |
. . 3
⊢ (𝑁 ∈ ℕ0
→ (𝐷 ∈
(Dioph‘𝑁) ↔
𝐷 ∈ ran (𝑘 ∈
(ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}))) |
43 | | ovex 7288 |
. . . . . 6
⊢
(ℕ0 ↑m (1...𝑘)) ∈ V |
44 | 43 | abrexex 7778 |
. . . . 5
⊢ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))𝑡 = (𝑢 ↾ (1...𝑁))} ∈ V |
45 | | simpl 482 |
. . . . . . 7
⊢ ((𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) → 𝑡 = (𝑢 ↾ (1...𝑁))) |
46 | 45 | reximi 3174 |
. . . . . 6
⊢
(∃𝑢 ∈
(ℕ0 ↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) → ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))𝑡 = (𝑢 ↾ (1...𝑁))) |
47 | 46 | ss2abi 3996 |
. . . . 5
⊢ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ⊆ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))𝑡 = (𝑢 ↾ (1...𝑁))} |
48 | 44, 47 | ssexi 5241 |
. . . 4
⊢ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ∈ V |
49 | 17, 48 | elrnmpo 7388 |
. . 3
⊢ (𝐷 ∈ ran (𝑘 ∈ (ℤ≥‘𝑁), 𝑝 ∈ (mzPoly‘(1...𝑘)) ↦ {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}) ↔ ∃𝑘 ∈ (ℤ≥‘𝑁)∃𝑝 ∈ (mzPoly‘(1...𝑘))𝐷 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}) |
50 | 42, 49 | bitrdi 286 |
. 2
⊢ (𝑁 ∈ ℕ0
→ (𝐷 ∈
(Dioph‘𝑁) ↔
∃𝑘 ∈
(ℤ≥‘𝑁)∃𝑝 ∈ (mzPoly‘(1...𝑘))𝐷 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)})) |
51 | 4, 50 | biadanii 818 |
1
⊢ (𝐷 ∈ (Dioph‘𝑁) ↔ (𝑁 ∈ ℕ0 ∧
∃𝑘 ∈
(ℤ≥‘𝑁)∃𝑝 ∈ (mzPoly‘(1...𝑘))𝐷 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0
↑m (1...𝑘))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)})) |