Users' Mathboxes Mathbox for Stefan O'Rear < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  diophren Structured version   Visualization version   GIF version

Theorem diophren 43819
Description: Change variables in a Diophantine set, using class notation. This allows already proved Diophantine sets to be reused in contexts with more variables. (Contributed by Stefan O'Rear, 16-Oct-2014.) (Revised by Stefan O'Rear, 5-Jun-2015.)
Assertion
Ref Expression
diophren ((𝑆 ∈ (Dioph‘𝑁) ∧ 𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ 𝑆} ∈ (Dioph‘𝑀))
Distinct variable groups:   𝑆,𝑎   𝑀,𝑎   𝑁,𝑎   𝐹,𝑎

Proof of Theorem diophren
Dummy variables 𝑏 𝑐 𝑑 𝑒 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 zex 12702 . . . . . 6 ℤ ∈ V
2 difexg 5291 . . . . . 6 (ℤ ∈ V → (ℤ ∖ ℕ) ∈ V)
31, 2ax-mp 5 . . . . 5 (ℤ ∖ ℕ) ∈ V
4 ominf 9255 . . . . . 6 ¬ ω ∈ Fin
5 nnuz 13004 . . . . . . . . . 10 ℕ = (ℤ≥‘1)
6 0p1e1 12463 . . . . . . . . . . 11 (0 + 1) = 1
76fveq2i 6888 . . . . . . . . . 10 (ℤ≥‘(0 + 1)) = (ℤ≥‘1)
85, 7eqtr4i 2787 . . . . . . . . 9 ℕ = (ℤ≥‘(0 + 1))
98difeq2i 4071 . . . . . . . 8 (ℤ ∖ ℕ) = (ℤ ∖ (ℤ≥‘(0 + 1)))
10 0z 12704 . . . . . . . . 9 0 ∈ ℤ
11 lzenom 43780 . . . . . . . . 9 (0 ∈ ℤ → (ℤ ∖ (ℤ≥‘(0 + 1))) ≈ ω)
1210, 11ax-mp 5 . . . . . . . 8 (ℤ ∖ (ℤ≥‘(0 + 1))) ≈ ω
139, 12eqbrtri 5126 . . . . . . 7 (ℤ ∖ ℕ) ≈ ω
14 enfi 9202 . . . . . . 7 ((ℤ ∖ ℕ) ≈ ω → ((ℤ ∖ ℕ) ∈ Fin ↔ ω ∈ Fin))
1513, 14ax-mp 5 . . . . . 6 ((ℤ ∖ ℕ) ∈ Fin ↔ ω ∈ Fin)
164, 15mtbir 326 . . . . 5 ¬ (ℤ ∖ ℕ) ∈ Fin
17 disjdifr 4427 . . . . 5 ((ℤ ∖ ℕ) ∩ ℕ) = ∅
183, 16, 17eldioph4b 43817 . . . 4 (𝑆 ∈ (Dioph‘𝑁) ↔ (𝑁 ∈ ℕ0 ∧ ∃𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))𝑆 = {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0}))
19 simpr 490 . . . . . . . . . . . 12 (((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) → 𝑎 ∈ (ℕ0 ↑m (1...𝑀)))
20 simp-4r 796 . . . . . . . . . . . 12 (((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) → 𝐹:(1...𝑁)⟶(1...𝑀))
21 ovex 7453 . . . . . . . . . . . . 13 (1...𝑁) ∈ V
2221mapco2 43725 . . . . . . . . . . . 12 ((𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) → (𝑎 ∘ 𝐹) ∈ (ℕ0 ↑m (1...𝑁)))
2319, 20, 22syl2anc 596 . . . . . . . . . . 11 (((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) → (𝑎 ∘ 𝐹) ∈ (ℕ0 ↑m (1...𝑁)))
24 uneq1 4108 . . . . . . . . . . . . . 14 (𝑐 = (𝑎 ∘ 𝐹) → (𝑐 ∪ 𝑑) = ((𝑎 ∘ 𝐹) ∪ 𝑑))
2524fveqeq2d 6893 . . . . . . . . . . . . 13 (𝑐 = (𝑎 ∘ 𝐹) → ((𝑏‘(𝑐 ∪ 𝑑)) = 0 ↔ (𝑏‘((𝑎 ∘ 𝐹) ∪ 𝑑)) = 0))
2625rexbidv 3187 . . . . . . . . . . . 12 (𝑐 = (𝑎 ∘ 𝐹) → (∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0 ↔ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘((𝑎 ∘ 𝐹) ∪ 𝑑)) = 0))
2726elrab3 3646 . . . . . . . . . . 11 ((𝑎 ∘ 𝐹) ∈ (ℕ0 ↑m (1...𝑁)) → ((𝑎 ∘ 𝐹) ∈ {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0} ↔ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘((𝑎 ∘ 𝐹) ∪ 𝑑)) = 0))
2823, 27syl 18 . . . . . . . . . 10 (((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) → ((𝑎 ∘ 𝐹) ∈ {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0} ↔ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘((𝑎 ∘ 𝐹) ∪ 𝑑)) = 0))
29 simp-5r 798 . . . . . . . . . . . . . . 15 ((((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → 𝐹:(1...𝑁)⟶(1...𝑀))
30 simplr 781 . . . . . . . . . . . . . . 15 ((((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → 𝑎 ∈ (ℕ0 ↑m (1...𝑀)))
31 simpr 490 . . . . . . . . . . . . . . 15 ((((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ)))
32 coundi 6248 . . . . . . . . . . . . . . . 16 ((𝑎 ∪ 𝑑) ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))) = (((𝑎 ∪ 𝑑) ∘ 𝐹) ∪ ((𝑎 ∪ 𝑑) ∘ ( I ↾ (ℤ ∖ ℕ))))
33 coundir 6249 . . . . . . . . . . . . . . . . . . 19 ((𝑎 ∪ 𝑑) ∘ 𝐹) = ((𝑎 ∘ 𝐹) ∪ (𝑑 ∘ 𝐹))
34 elmapi 8869 . . . . . . . . . . . . . . . . . . . . . 22 (𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ)) → 𝑑:(ℤ ∖ ℕ)⟶ℕ0)
35343ad2ant3 1153 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → 𝑑:(ℤ ∖ ℕ)⟶ℕ0)
36 simp1 1154 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → 𝐹:(1...𝑁)⟶(1...𝑀))
37 incom 4155 . . . . . . . . . . . . . . . . . . . . . . 23 ((ℤ ∖ ℕ) ∩ (1...𝑀)) = ((1...𝑀) ∩ (ℤ ∖ ℕ))
38 fz1ssnn 13689 . . . . . . . . . . . . . . . . . . . . . . . 24 (1...𝑀) ⊆ ℕ
39 disjdif 4426 . . . . . . . . . . . . . . . . . . . . . . . 24 (ℕ ∩ (ℤ ∖ ℕ)) = ∅
40 ssdisj 4413 . . . . . . . . . . . . . . . . . . . . . . . 24 (((1...𝑀) ⊆ ℕ ∧ (ℕ ∩ (ℤ ∖ ℕ)) = ∅) → ((1...𝑀) ∩ (ℤ ∖ ℕ)) = ∅)
4138, 39, 40mp2an 705 . . . . . . . . . . . . . . . . . . . . . . 23 ((1...𝑀) ∩ (ℤ ∖ ℕ)) = ∅
4237, 41eqtri 2784 . . . . . . . . . . . . . . . . . . . . . 22 ((ℤ ∖ ℕ) ∩ (1...𝑀)) = ∅
4342a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((ℤ ∖ ℕ) ∩ (1...𝑀)) = ∅)
44 coeq0i 43763 . . . . . . . . . . . . . . . . . . . . 21 ((𝑑:(ℤ ∖ ℕ)⟶ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀) ∧ ((ℤ ∖ ℕ) ∩ (1...𝑀)) = ∅) → (𝑑 ∘ 𝐹) = ∅)
4535, 36, 43, 44syl3anc 1398 . . . . . . . . . . . . . . . . . . . 20 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → (𝑑 ∘ 𝐹) = ∅)
4645uneq2d 4115 . . . . . . . . . . . . . . . . . . 19 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑎 ∘ 𝐹) ∪ (𝑑 ∘ 𝐹)) = ((𝑎 ∘ 𝐹) ∪ ∅))
4733, 46eqtrid 2808 . . . . . . . . . . . . . . . . . 18 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑎 ∪ 𝑑) ∘ 𝐹) = ((𝑎 ∘ 𝐹) ∪ ∅))
48 un0 4344 . . . . . . . . . . . . . . . . . 18 ((𝑎 ∘ 𝐹) ∪ ∅) = (𝑎 ∘ 𝐹)
4947, 48eqtrdi 2812 . . . . . . . . . . . . . . . . 17 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑎 ∪ 𝑑) ∘ 𝐹) = (𝑎 ∘ 𝐹))
50 coundir 6249 . . . . . . . . . . . . . . . . . . 19 ((𝑎 ∪ 𝑑) ∘ ( I ↾ (ℤ ∖ ℕ))) = ((𝑎 ∘ ( I ↾ (ℤ ∖ ℕ))) ∪ (𝑑 ∘ ( I ↾ (ℤ ∖ ℕ))))
51 elmapi 8869 . . . . . . . . . . . . . . . . . . . . . 22 (𝑎 ∈ (ℕ0 ↑m (1...𝑀)) → 𝑎:(1...𝑀)⟶ℕ0)
52513ad2ant2 1152 . . . . . . . . . . . . . . . . . . . . 21 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → 𝑎:(1...𝑀)⟶ℕ0)
53 f1oi 6863 . . . . . . . . . . . . . . . . . . . . . . 23 ( I ↾ (ℤ ∖ ℕ)):(ℤ ∖ ℕ)–1-1-onto→(ℤ ∖ ℕ)
54 f1of 6824 . . . . . . . . . . . . . . . . . . . . . . 23 (( I ↾ (ℤ ∖ ℕ)):(ℤ ∖ ℕ)–1-1-onto→(ℤ ∖ ℕ) → ( I ↾ (ℤ ∖ ℕ)):(ℤ ∖ ℕ)⟶(ℤ ∖ ℕ))
5553, 54ax-mp 5 . . . . . . . . . . . . . . . . . . . . . 22 ( I ↾ (ℤ ∖ ℕ)):(ℤ ∖ ℕ)⟶(ℤ ∖ ℕ)
56 coeq0i 43763 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑎:(1...𝑀)⟶ℕ0 ∧ ( I ↾ (ℤ ∖ ℕ)):(ℤ ∖ ℕ)⟶(ℤ ∖ ℕ) ∧ ((1...𝑀) ∩ (ℤ ∖ ℕ)) = ∅) → (𝑎 ∘ ( I ↾ (ℤ ∖ ℕ))) = ∅)
5755, 41, 56mp3an23 1482 . . . . . . . . . . . . . . . . . . . . 21 (𝑎:(1...𝑀)⟶ℕ0 → (𝑎 ∘ ( I ↾ (ℤ ∖ ℕ))) = ∅)
5852, 57syl 18 . . . . . . . . . . . . . . . . . . . 20 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → (𝑎 ∘ ( I ↾ (ℤ ∖ ℕ))) = ∅)
59 coires1 6266 . . . . . . . . . . . . . . . . . . . . . 22 (𝑑 ∘ ( I ↾ (ℤ ∖ ℕ))) = (𝑑 ↾ (ℤ ∖ ℕ))
60 ffn 6709 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑑:(ℤ ∖ ℕ)⟶ℕ0 → 𝑑 Fn (ℤ ∖ ℕ))
61 fnresdm 6658 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑑 Fn (ℤ ∖ ℕ) → (𝑑 ↾ (ℤ ∖ ℕ)) = 𝑑)
6234, 60, 613syl 19 . . . . . . . . . . . . . . . . . . . . . 22 (𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ)) → (𝑑 ↾ (ℤ ∖ ℕ)) = 𝑑)
6359, 62eqtrid 2808 . . . . . . . . . . . . . . . . . . . . 21 (𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ)) → (𝑑 ∘ ( I ↾ (ℤ ∖ ℕ))) = 𝑑)
64633ad2ant3 1153 . . . . . . . . . . . . . . . . . . . 20 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → (𝑑 ∘ ( I ↾ (ℤ ∖ ℕ))) = 𝑑)
6558, 64uneq12d 4116 . . . . . . . . . . . . . . . . . . 19 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑎 ∘ ( I ↾ (ℤ ∖ ℕ))) ∪ (𝑑 ∘ ( I ↾ (ℤ ∖ ℕ)))) = (∅ ∪ 𝑑))
6650, 65eqtrid 2808 . . . . . . . . . . . . . . . . . 18 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑎 ∪ 𝑑) ∘ ( I ↾ (ℤ ∖ ℕ))) = (∅ ∪ 𝑑))
67 uncom 4105 . . . . . . . . . . . . . . . . . . 19 (∅ ∪ 𝑑) = (𝑑 ∪ ∅)
68 un0 4344 . . . . . . . . . . . . . . . . . . 19 (𝑑 ∪ ∅) = 𝑑
6967, 68eqtri 2784 . . . . . . . . . . . . . . . . . 18 (∅ ∪ 𝑑) = 𝑑
7066, 69eqtrdi 2812 . . . . . . . . . . . . . . . . 17 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑎 ∪ 𝑑) ∘ ( I ↾ (ℤ ∖ ℕ))) = 𝑑)
7149, 70uneq12d 4116 . . . . . . . . . . . . . . . 16 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → (((𝑎 ∪ 𝑑) ∘ 𝐹) ∪ ((𝑎 ∪ 𝑑) ∘ ( I ↾ (ℤ ∖ ℕ)))) = ((𝑎 ∘ 𝐹) ∪ 𝑑))
7232, 71eqtr2id 2809 . . . . . . . . . . . . . . 15 ((𝐹:(1...𝑁)⟶(1...𝑀) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑎 ∘ 𝐹) ∪ 𝑑) = ((𝑎 ∪ 𝑑) ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))))
7329, 30, 31, 72syl3anc 1398 . . . . . . . . . . . . . 14 ((((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑎 ∘ 𝐹) ∪ 𝑑) = ((𝑎 ∪ 𝑑) ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))))
7473fveq2d 6889 . . . . . . . . . . . . 13 ((((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → (𝑏‘((𝑎 ∘ 𝐹) ∪ 𝑑)) = (𝑏‘((𝑎 ∪ 𝑑) ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))
75 nn0ssz 12716 . . . . . . . . . . . . . . . . 17 ℕ0 ⊆ ℤ
76 mapss 8917 . . . . . . . . . . . . . . . . 17 ((ℤ ∈ V ∧ ℕ0 ⊆ ℤ) → (ℕ0 ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ⊆ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))))
771, 75, 76mp2an 705 . . . . . . . . . . . . . . . 16 (ℕ0 ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ⊆ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀)))
7841reseq2i 5967 . . . . . . . . . . . . . . . . . . 19 (𝑎 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ))) = (𝑎 ↾ ∅)
79 res0 5974 . . . . . . . . . . . . . . . . . . 19 (𝑎 ↾ ∅) = ∅
8078, 79eqtri 2784 . . . . . . . . . . . . . . . . . 18 (𝑎 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ))) = ∅
8141reseq2i 5967 . . . . . . . . . . . . . . . . . . 19 (𝑑 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ))) = (𝑑 ↾ ∅)
82 res0 5974 . . . . . . . . . . . . . . . . . . 19 (𝑑 ↾ ∅) = ∅
8381, 82eqtri 2784 . . . . . . . . . . . . . . . . . 18 (𝑑 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ))) = ∅
8480, 83eqtr4i 2787 . . . . . . . . . . . . . . . . 17 (𝑎 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ))) = (𝑑 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ)))
85 elmapresaun 8908 . . . . . . . . . . . . . . . . . 18 ((𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ)) ∧ (𝑎 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ))) = (𝑑 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ)))) → (𝑎 ∪ 𝑑) ∈ (ℕ0 ↑m ((1...𝑀) ∪ (ℤ ∖ ℕ))))
86 uncom 4105 . . . . . . . . . . . . . . . . . . 19 ((1...𝑀) ∪ (ℤ ∖ ℕ)) = ((ℤ ∖ ℕ) ∪ (1...𝑀))
8786oveq2i 7431 . . . . . . . . . . . . . . . . . 18 (ℕ0 ↑m ((1...𝑀) ∪ (ℤ ∖ ℕ))) = (ℕ0 ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀)))
8885, 87eleqtrdi 2871 . . . . . . . . . . . . . . . . 17 ((𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ)) ∧ (𝑎 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ))) = (𝑑 ↾ ((1...𝑀) ∩ (ℤ ∖ ℕ)))) → (𝑎 ∪ 𝑑) ∈ (ℕ0 ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))))
8984, 88mp3an3 1479 . . . . . . . . . . . . . . . 16 ((𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → (𝑎 ∪ 𝑑) ∈ (ℕ0 ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))))
9077, 89sselid 3929 . . . . . . . . . . . . . . 15 ((𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → (𝑎 ∪ 𝑑) ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))))
9190adantll 727 . . . . . . . . . . . . . 14 ((((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → (𝑎 ∪ 𝑑) ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))))
92 coeq1 5835 . . . . . . . . . . . . . . . 16 (𝑒 = (𝑎 ∪ 𝑑) → (𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))) = ((𝑎 ∪ 𝑑) ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))))
9392fveq2d 6889 . . . . . . . . . . . . . . 15 (𝑒 = (𝑎 ∪ 𝑑) → (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))) = (𝑏‘((𝑎 ∪ 𝑑) ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))
94 eqid 2761 . . . . . . . . . . . . . . 15 (𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))))) = (𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))
95 fvex 6898 . . . . . . . . . . . . . . 15 (𝑏‘((𝑎 ∪ 𝑑) ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))) ∈ V
9693, 94, 95fvmpt 6993 . . . . . . . . . . . . . 14 ((𝑎 ∪ 𝑑) ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) → ((𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))‘(𝑎 ∪ 𝑑)) = (𝑏‘((𝑎 ∪ 𝑑) ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))
9791, 96syl 18 . . . . . . . . . . . . 13 ((((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))‘(𝑎 ∪ 𝑑)) = (𝑏‘((𝑎 ∪ 𝑑) ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))
9874, 97eqtr4d 2799 . . . . . . . . . . . 12 ((((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → (𝑏‘((𝑎 ∘ 𝐹) ∪ 𝑑)) = ((𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))‘(𝑎 ∪ 𝑑)))
9998eqeq1d 2763 . . . . . . . . . . 11 ((((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) ∧ 𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))) → ((𝑏‘((𝑎 ∘ 𝐹) ∪ 𝑑)) = 0 ↔ ((𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))‘(𝑎 ∪ 𝑑)) = 0))
10099rexbidva 3185 . . . . . . . . . 10 (((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) → (∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘((𝑎 ∘ 𝐹) ∪ 𝑑)) = 0 ↔ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))((𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))‘(𝑎 ∪ 𝑑)) = 0))
10128, 100bitrd 282 . . . . . . . . 9 (((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) ∧ 𝑎 ∈ (ℕ0 ↑m (1...𝑀))) → ((𝑎 ∘ 𝐹) ∈ {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0} ↔ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))((𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))‘(𝑎 ∪ 𝑑)) = 0))
102101rabbidva 3419 . . . . . . . 8 ((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0}} = {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))((𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))‘(𝑎 ∪ 𝑑)) = 0})
103 simplll 787 . . . . . . . . 9 ((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) → 𝑀 ∈ ℕ0)
104 ovex 7453 . . . . . . . . . . . 12 (1...𝑀) ∈ V
1053, 104unex 7761 . . . . . . . . . . 11 ((ℤ ∖ ℕ) ∪ (1...𝑀)) ∈ V
106105a1i 11 . . . . . . . . . 10 ((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) → ((ℤ ∖ ℕ) ∪ (1...𝑀)) ∈ V)
107 simpr 490 . . . . . . . . . 10 ((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) → 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁))))
10855a1i 11 . . . . . . . . . . . . 13 (𝐹:(1...𝑁)⟶(1...𝑀) → ( I ↾ (ℤ ∖ ℕ)):(ℤ ∖ ℕ)⟶(ℤ ∖ ℕ))
109 id 23 . . . . . . . . . . . . 13 (𝐹:(1...𝑁)⟶(1...𝑀) → 𝐹:(1...𝑁)⟶(1...𝑀))
110 incom 4155 . . . . . . . . . . . . . . 15 ((ℤ ∖ ℕ) ∩ (1...𝑁)) = ((1...𝑁) ∩ (ℤ ∖ ℕ))
111 fz1ssnn 13689 . . . . . . . . . . . . . . . 16 (1...𝑁) ⊆ ℕ
112 ssdisj 4413 . . . . . . . . . . . . . . . 16 (((1...𝑁) ⊆ ℕ ∧ (ℕ ∩ (ℤ ∖ ℕ)) = ∅) → ((1...𝑁) ∩ (ℤ ∖ ℕ)) = ∅)
113111, 39, 112mp2an 705 . . . . . . . . . . . . . . 15 ((1...𝑁) ∩ (ℤ ∖ ℕ)) = ∅
114110, 113eqtri 2784 . . . . . . . . . . . . . 14 ((ℤ ∖ ℕ) ∩ (1...𝑁)) = ∅
115114a1i 11 . . . . . . . . . . . . 13 (𝐹:(1...𝑁)⟶(1...𝑀) → ((ℤ ∖ ℕ) ∩ (1...𝑁)) = ∅)
116 fun 6744 . . . . . . . . . . . . 13 (((( I ↾ (ℤ ∖ ℕ)):(ℤ ∖ ℕ)⟶(ℤ ∖ ℕ) ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ ((ℤ ∖ ℕ) ∩ (1...𝑁)) = ∅) → (( I ↾ (ℤ ∖ ℕ)) ∪ 𝐹):((ℤ ∖ ℕ) ∪ (1...𝑁))⟶((ℤ ∖ ℕ) ∪ (1...𝑀)))
117108, 109, 115, 116syl21anc 851 . . . . . . . . . . . 12 (𝐹:(1...𝑁)⟶(1...𝑀) → (( I ↾ (ℤ ∖ ℕ)) ∪ 𝐹):((ℤ ∖ ℕ) ∪ (1...𝑁))⟶((ℤ ∖ ℕ) ∪ (1...𝑀)))
118 uncom 4105 . . . . . . . . . . . . 13 (( I ↾ (ℤ ∖ ℕ)) ∪ 𝐹) = (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))
119118feq1i 6700 . . . . . . . . . . . 12 ((( I ↾ (ℤ ∖ ℕ)) ∪ 𝐹):((ℤ ∖ ℕ) ∪ (1...𝑁))⟶((ℤ ∖ ℕ) ∪ (1...𝑀)) ↔ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))):((ℤ ∖ ℕ) ∪ (1...𝑁))⟶((ℤ ∖ ℕ) ∪ (1...𝑀)))
120117, 119sylib 221 . . . . . . . . . . 11 (𝐹:(1...𝑁)⟶(1...𝑀) → (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))):((ℤ ∖ ℕ) ∪ (1...𝑁))⟶((ℤ ∖ ℕ) ∪ (1...𝑀)))
121120ad3antlr 744 . . . . . . . . . 10 ((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) → (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))):((ℤ ∖ ℕ) ∪ (1...𝑁))⟶((ℤ ∖ ℕ) ∪ (1...𝑀)))
122 mzprename 43759 . . . . . . . . . 10 ((((ℤ ∖ ℕ) ∪ (1...𝑀)) ∈ V ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁))) ∧ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))):((ℤ ∖ ℕ) ∪ (1...𝑁))⟶((ℤ ∖ ℕ) ∪ (1...𝑀))) → (𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))))) ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑀))))
123106, 107, 121, 122syl3anc 1398 . . . . . . . . 9 ((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) → (𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))))) ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑀))))
1243, 16, 17eldioph4i 43818 . . . . . . . . 9 ((𝑀 ∈ ℕ0 ∧ (𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ)))))) ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑀)))) → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))((𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))‘(𝑎 ∪ 𝑑)) = 0} ∈ (Dioph‘𝑀))
125103, 123, 124syl2anc 596 . . . . . . . 8 ((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))((𝑒 ∈ (ℤ ↑m ((ℤ ∖ ℕ) ∪ (1...𝑀))) ↦ (𝑏‘(𝑒 ∘ (𝐹 ∪ ( I ↾ (ℤ ∖ ℕ))))))‘(𝑎 ∪ 𝑑)) = 0} ∈ (Dioph‘𝑀))
126102, 125eqeltrd 2861 . . . . . . 7 ((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0}} ∈ (Dioph‘𝑀))
127 eleq2 2850 . . . . . . . . 9 (𝑆 = {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0} → ((𝑎 ∘ 𝐹) ∈ 𝑆 ↔ (𝑎 ∘ 𝐹) ∈ {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0}))
128127rabbidv 3420 . . . . . . . 8 (𝑆 = {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0} → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ 𝑆} = {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0}})
129128eleq1d 2846 . . . . . . 7 (𝑆 = {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0} → ({𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ 𝑆} ∈ (Dioph‘𝑀) ↔ {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0}} ∈ (Dioph‘𝑀)))
130126, 129syl5ibrcom 250 . . . . . 6 ((((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) ∧ 𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))) → (𝑆 = {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0} → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ 𝑆} ∈ (Dioph‘𝑀)))
131130rexlimdva 3164 . . . . 5 (((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) ∧ 𝑁 ∈ ℕ0) → (∃𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))𝑆 = {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0} → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ 𝑆} ∈ (Dioph‘𝑀)))
132131expimpd 459 . . . 4 ((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) → ((𝑁 ∈ ℕ0 ∧ ∃𝑏 ∈ (mzPoly‘((ℤ ∖ ℕ) ∪ (1...𝑁)))𝑆 = {𝑐 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑑 ∈ (ℕ0 ↑m (ℤ ∖ ℕ))(𝑏‘(𝑐 ∪ 𝑑)) = 0}) → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ 𝑆} ∈ (Dioph‘𝑀)))
13318, 132biimtrid 245 . . 3 ((𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) → (𝑆 ∈ (Dioph‘𝑁) → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ 𝑆} ∈ (Dioph‘𝑀)))
134133impcom 413 . 2 ((𝑆 ∈ (Dioph‘𝑁) ∧ (𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀))) → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ 𝑆} ∈ (Dioph‘𝑀))
1351343impb 1132 1 ((𝑆 ∈ (Dioph‘𝑁) ∧ 𝑀 ∈ ℕ0 ∧ 𝐹:(1...𝑁)⟶(1...𝑀)) → {𝑎 ∈ (ℕ0 ↑m (1...𝑀)) ∣ (𝑎 ∘ 𝐹) ∈ 𝑆} ∈ (Dioph‘𝑀))
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145  ∃wrex 3087  {crab 3413  Vcvv 3451   ∖ cdif 3896   ∪ cun 3897   ∩ cin 3898   ⊆ wss 3899  ∅c0 4279   class class class wbr 5103   ↦ cmpt 5186   I cid 5545   ↾ cres 5653   ∘ ccom 5655   Fn wfn 6533  ⟶wf 6534  –1-1-onto→wf1o 6537  ‘cfv 6538  (class class class)co 7420  ωcom 7877   ↑m cmap 8847   ≈ cen 8970  Fincfn 8973  0cc0 11200  1c1 11201   + caddc 11203  ℕcn 12335  ℕ0cn0 12606  ℤcz 12693  ℤ≥cuz 12965  ...cfz 13639  mzPolycmzp 43732  Diophcdioph 43765
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2733  ax-rep 5232  ax-sep 5249  ax-nul 5260  ax-pow 5327  ax-pr 5391  ax-un 7751  ax-inf2 9642  ax-cnex 11256  ax-resscn 11257  ax-1cn 11258  ax-icn 11259  ax-addcl 11260  ax-addrcl 11261  ax-mulcl 11262  ax-mulrcl 11263  ax-mulcom 11264  ax-addass 11265  ax-mulass 11266  ax-distr 11267  ax-i2m1 11268  ax-1ne0 11269  ax-1rid 11270  ax-rnegex 11271  ax-rrecex 11272  ax-cnre 11273  ax-pre-lttri 11274  ax-pre-lttrn 11275  ax-pre-ltadd 11276  ax-pre-mulgt0 11277
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2565  df-eu 2595  df-clab 2740  df-cleq 2753  df-clel 2836  df-nfc 2910  df-ne 2957  df-nel 3063  df-ral 3078  df-rex 3088  df-reu 3367  df-rab 3414  df-v 3453  df-sbc 3740  df-csb 3848  df-dif 3902  df-un 3904  df-in 3906  df-ss 3916  df-pss 3919  df-nul 4280  df-if 4483  df-pw 4559  df-sn 4585  df-pr 4587  df-op 4591  df-uni 4868  df-int 4908  df-iun 4953  df-br 5104  df-opab 5168  df-mpt 5187  df-tr 5213  df-id 5546  df-eprel 5551  df-po 5559  df-so 5560  df-fr 5604  df-we 5606  df-xp 5657  df-rel 5658  df-cnv 5659  df-co 5660  df-dm 5661  df-rn 5662  df-res 5663  df-ima 5664  df-pred 6304  df-ord 6365  df-on 6366  df-lim 6367  df-suc 6368  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7377  df-ov 7423  df-oprab 7424  df-mpo 7425  df-of 7693  df-om 7878  df-1st 8001  df-2nd 8002  df-frecs 8299  df-wrecs 8330  df-recs 8379  df-rdg 8418  df-1o 8476  df-oadd 8480  df-er 8717  df-map 8849  df-en 8974  df-dom 8975  df-sdom 8976  df-fin 8977  df-dju 9982  df-card 10020  df-pnf 11345  df-mnf 11346  df-xr 11347  df-ltxr 11348  df-le 11349  df-sub 11543  df-neg 11544  df-nn 12336  df-n0 12607  df-z 12694  df-uz 12966  df-fz 13640  df-hash 14475  df-mzpcl 43733  df-mzp 43734  df-dioph 43766
This theorem is used by:  rabrenfdioph  43820
  Copyright terms: Public domain W3C validator