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

Theorem diophin 42767
Description: If two sets are Diophantine, so is their intersection. (Contributed by Stefan O'Rear, 9-Oct-2014.) (Revised by Stefan O'Rear, 6-May-2015.)
Assertion
Ref Expression
diophin ((𝐴 ∈ (Dioph‘𝑁) ∧ 𝐵 ∈ (Dioph‘𝑁)) → (𝐴𝐵) ∈ (Dioph‘𝑁))

Proof of Theorem diophin
Dummy variables 𝑎 𝑏 𝑐 𝑑 𝑒 𝑓 𝑔 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eldiophelnn0 42759 . . 3 (𝐴 ∈ (Dioph‘𝑁) → 𝑁 ∈ ℕ0)
2 id 22 . . . . . 6 (𝑁 ∈ ℕ0𝑁 ∈ ℕ0)
3 zex 12545 . . . . . . 7 ℤ ∈ V
4 difexg 5287 . . . . . . 7 (ℤ ∈ V → (ℤ ∖ (ℤ‘(𝑁 + 1))) ∈ V)
53, 4mp1i 13 . . . . . 6 (𝑁 ∈ ℕ0 → (ℤ ∖ (ℤ‘(𝑁 + 1))) ∈ V)
6 ominf 9212 . . . . . . 7 ¬ ω ∈ Fin
7 nn0z 12561 . . . . . . . 8 (𝑁 ∈ ℕ0𝑁 ∈ ℤ)
8 lzenom 42765 . . . . . . . 8 (𝑁 ∈ ℤ → (ℤ ∖ (ℤ‘(𝑁 + 1))) ≈ ω)
9 enfi 9157 . . . . . . . 8 ((ℤ ∖ (ℤ‘(𝑁 + 1))) ≈ ω → ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∈ Fin ↔ ω ∈ Fin))
107, 8, 93syl 18 . . . . . . 7 (𝑁 ∈ ℕ0 → ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∈ Fin ↔ ω ∈ Fin))
116, 10mtbiri 327 . . . . . 6 (𝑁 ∈ ℕ0 → ¬ (ℤ ∖ (ℤ‘(𝑁 + 1))) ∈ Fin)
12 fz1eqin 42764 . . . . . . 7 (𝑁 ∈ ℕ0 → (1...𝑁) = ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ))
13 inss1 4203 . . . . . . 7 ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ) ⊆ (ℤ ∖ (ℤ‘(𝑁 + 1)))
1412, 13eqsstrdi 3994 . . . . . 6 (𝑁 ∈ ℕ0 → (1...𝑁) ⊆ (ℤ ∖ (ℤ‘(𝑁 + 1))))
15 eldioph2b 42758 . . . . . 6 (((𝑁 ∈ ℕ0 ∧ (ℤ ∖ (ℤ‘(𝑁 + 1))) ∈ V) ∧ (¬ (ℤ ∖ (ℤ‘(𝑁 + 1))) ∈ Fin ∧ (1...𝑁) ⊆ (ℤ ∖ (ℤ‘(𝑁 + 1))))) → (𝐴 ∈ (Dioph‘𝑁) ↔ ∃𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1))))𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)}))
162, 5, 11, 14, 15syl22anc 838 . . . . 5 (𝑁 ∈ ℕ0 → (𝐴 ∈ (Dioph‘𝑁) ↔ ∃𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1))))𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)}))
17 nnex 12199 . . . . . . 7 ℕ ∈ V
1817a1i 11 . . . . . 6 (𝑁 ∈ ℕ0 → ℕ ∈ V)
19 1z 12570 . . . . . . 7 1 ∈ ℤ
20 nnuz 12843 . . . . . . . 8 ℕ = (ℤ‘1)
2120uzinf 13937 . . . . . . 7 (1 ∈ ℤ → ¬ ℕ ∈ Fin)
2219, 21mp1i 13 . . . . . 6 (𝑁 ∈ ℕ0 → ¬ ℕ ∈ Fin)
23 elfznn 13521 . . . . . . . 8 (𝑎 ∈ (1...𝑁) → 𝑎 ∈ ℕ)
2423ssriv 3953 . . . . . . 7 (1...𝑁) ⊆ ℕ
2524a1i 11 . . . . . 6 (𝑁 ∈ ℕ0 → (1...𝑁) ⊆ ℕ)
26 eldioph2b 42758 . . . . . 6 (((𝑁 ∈ ℕ0 ∧ ℕ ∈ V) ∧ (¬ ℕ ∈ Fin ∧ (1...𝑁) ⊆ ℕ)) → (𝐵 ∈ (Dioph‘𝑁) ↔ ∃𝑏 ∈ (mzPoly‘ℕ)𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}))
272, 18, 22, 25, 26syl22anc 838 . . . . 5 (𝑁 ∈ ℕ0 → (𝐵 ∈ (Dioph‘𝑁) ↔ ∃𝑏 ∈ (mzPoly‘ℕ)𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}))
2816, 27anbi12d 632 . . . 4 (𝑁 ∈ ℕ0 → ((𝐴 ∈ (Dioph‘𝑁) ∧ 𝐵 ∈ (Dioph‘𝑁)) ↔ (∃𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1))))𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∧ ∃𝑏 ∈ (mzPoly‘ℕ)𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)})))
29 reeanv 3210 . . . . 5 (∃𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1))))∃𝑏 ∈ (mzPoly‘ℕ)(𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∧ 𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) ↔ (∃𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1))))𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∧ ∃𝑏 ∈ (mzPoly‘ℕ)𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}))
30 inab 4275 . . . . . . . . 9 ({𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∩ {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) = {𝑐 ∣ (∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))}
31 reeanv 3210 . . . . . . . . . . 11 (∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))∃𝑒 ∈ (ℕ0m ℕ)((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)) ↔ (∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)))
32 simplrl 776 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → 𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))))
33 simplrr 777 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → 𝑒 ∈ (ℕ0m ℕ))
3412eqcomd 2736 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ ℕ0 → ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ) = (1...𝑁))
3534reseq2d 5953 . . . . . . . . . . . . . . . . . . . 20 (𝑁 ∈ ℕ0 → (𝑑 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)) = (𝑑 ↾ (1...𝑁)))
3635ad3antrrr 730 . . . . . . . . . . . . . . . . . . 19 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑑 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)) = (𝑑 ↾ (1...𝑁)))
3734reseq2d 5953 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ ℕ0 → (𝑒 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)) = (𝑒 ↾ (1...𝑁)))
3837ad3antrrr 730 . . . . . . . . . . . . . . . . . . . 20 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑒 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)) = (𝑒 ↾ (1...𝑁)))
39 simprrl 780 . . . . . . . . . . . . . . . . . . . 20 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → 𝑐 = (𝑒 ↾ (1...𝑁)))
40 simprll 778 . . . . . . . . . . . . . . . . . . . 20 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → 𝑐 = (𝑑 ↾ (1...𝑁)))
4138, 39, 403eqtr2d 2771 . . . . . . . . . . . . . . . . . . 19 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑒 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)) = (𝑑 ↾ (1...𝑁)))
4236, 41eqtr4d 2768 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑑 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)) = (𝑒 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)))
43 elmapresaun 8856 . . . . . . . . . . . . . . . . . 18 ((𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ) ∧ (𝑑 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)) = (𝑒 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ))) → (𝑑𝑒) ∈ (ℕ0m ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∪ ℕ)))
4432, 33, 42, 43syl3anc 1373 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑑𝑒) ∈ (ℕ0m ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∪ ℕ)))
4520uneq2i 4131 . . . . . . . . . . . . . . . . . . . 20 ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∪ ℕ) = ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∪ (ℤ‘1))
4619a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ ℕ0 → 1 ∈ ℤ)
47 nn0p1nn 12488 . . . . . . . . . . . . . . . . . . . . . 22 (𝑁 ∈ ℕ0 → (𝑁 + 1) ∈ ℕ)
4847nnge1d 12241 . . . . . . . . . . . . . . . . . . . . 21 (𝑁 ∈ ℕ0 → 1 ≤ (𝑁 + 1))
49 lzunuz 42763 . . . . . . . . . . . . . . . . . . . . 21 ((𝑁 ∈ ℤ ∧ 1 ∈ ℤ ∧ 1 ≤ (𝑁 + 1)) → ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∪ (ℤ‘1)) = ℤ)
507, 46, 48, 49syl3anc 1373 . . . . . . . . . . . . . . . . . . . 20 (𝑁 ∈ ℕ0 → ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∪ (ℤ‘1)) = ℤ)
5145, 50eqtrid 2777 . . . . . . . . . . . . . . . . . . 19 (𝑁 ∈ ℕ0 → ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∪ ℕ) = ℤ)
5251oveq2d 7406 . . . . . . . . . . . . . . . . . 18 (𝑁 ∈ ℕ0 → (ℕ0m ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∪ ℕ)) = (ℕ0m ℤ))
5352ad3antrrr 730 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (ℕ0m ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∪ ℕ)) = (ℕ0m ℤ))
5444, 53eleqtrd 2831 . . . . . . . . . . . . . . . 16 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑑𝑒) ∈ (ℕ0m ℤ))
55 unidm 4123 . . . . . . . . . . . . . . . . . . 19 (𝑐𝑐) = 𝑐
5640, 39uneq12d 4135 . . . . . . . . . . . . . . . . . . 19 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑐𝑐) = ((𝑑 ↾ (1...𝑁)) ∪ (𝑒 ↾ (1...𝑁))))
5755, 56eqtr3id 2779 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → 𝑐 = ((𝑑 ↾ (1...𝑁)) ∪ (𝑒 ↾ (1...𝑁))))
58 resundir 5968 . . . . . . . . . . . . . . . . . 18 ((𝑑𝑒) ↾ (1...𝑁)) = ((𝑑 ↾ (1...𝑁)) ∪ (𝑒 ↾ (1...𝑁)))
5957, 58eqtr4di 2783 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → 𝑐 = ((𝑑𝑒) ↾ (1...𝑁)))
60 uncom 4124 . . . . . . . . . . . . . . . . . . . . 21 (𝑑𝑒) = (𝑒𝑑)
6160reseq1i 5949 . . . . . . . . . . . . . . . . . . . 20 ((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) = ((𝑒𝑑) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))
62 incom 4175 . . . . . . . . . . . . . . . . . . . . . . . . 25 (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1)))) = ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)
6362, 34eqtrid 2777 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℕ0 → (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1)))) = (1...𝑁))
6463reseq2d 5953 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑁 ∈ ℕ0 → (𝑒 ↾ (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = (𝑒 ↾ (1...𝑁)))
6564ad3antrrr 730 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑒 ↾ (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = (𝑒 ↾ (1...𝑁)))
6663reseq2d 5953 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑁 ∈ ℕ0 → (𝑑 ↾ (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = (𝑑 ↾ (1...𝑁)))
6766ad3antrrr 730 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑑 ↾ (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = (𝑑 ↾ (1...𝑁)))
6867, 40, 393eqtr2d 2771 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑑 ↾ (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = (𝑒 ↾ (1...𝑁)))
6965, 68eqtr4d 2768 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑒 ↾ (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = (𝑑 ↾ (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1))))))
70 elmapresaunres2 42766 . . . . . . . . . . . . . . . . . . . . 21 ((𝑒 ∈ (ℕ0m ℕ) ∧ 𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ (𝑒 ↾ (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = (𝑑 ↾ (ℕ ∩ (ℤ ∖ (ℤ‘(𝑁 + 1)))))) → ((𝑒𝑑) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) = 𝑑)
7133, 32, 69, 70syl3anc 1373 . . . . . . . . . . . . . . . . . . . 20 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → ((𝑒𝑑) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) = 𝑑)
7261, 71eqtrid 2777 . . . . . . . . . . . . . . . . . . 19 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → ((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) = 𝑑)
7372fveq2d 6865 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑎‘((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = (𝑎𝑑))
74 simprlr 779 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑎𝑑) = 0)
7573, 74eqtrd 2765 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑎‘((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0)
76 elmapresaunres2 42766 . . . . . . . . . . . . . . . . . . . 20 ((𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ) ∧ (𝑑 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ)) = (𝑒 ↾ ((ℤ ∖ (ℤ‘(𝑁 + 1))) ∩ ℕ))) → ((𝑑𝑒) ↾ ℕ) = 𝑒)
7732, 33, 42, 76syl3anc 1373 . . . . . . . . . . . . . . . . . . 19 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → ((𝑑𝑒) ↾ ℕ) = 𝑒)
7877fveq2d 6865 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑏‘((𝑑𝑒) ↾ ℕ)) = (𝑏𝑒))
79 simprrr 781 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑏𝑒) = 0)
8078, 79eqtrd 2765 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑏‘((𝑑𝑒) ↾ ℕ)) = 0)
8159, 75, 80jca32 515 . . . . . . . . . . . . . . . 16 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → (𝑐 = ((𝑑𝑒) ↾ (1...𝑁)) ∧ ((𝑎‘((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘((𝑑𝑒) ↾ ℕ)) = 0)))
82 reseq1 5947 . . . . . . . . . . . . . . . . . . 19 (𝑓 = (𝑑𝑒) → (𝑓 ↾ (1...𝑁)) = ((𝑑𝑒) ↾ (1...𝑁)))
8382eqeq2d 2741 . . . . . . . . . . . . . . . . . 18 (𝑓 = (𝑑𝑒) → (𝑐 = (𝑓 ↾ (1...𝑁)) ↔ 𝑐 = ((𝑑𝑒) ↾ (1...𝑁))))
84 reseq1 5947 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = (𝑑𝑒) → (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) = ((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))
8584fveqeq2d 6869 . . . . . . . . . . . . . . . . . . 19 (𝑓 = (𝑑𝑒) → ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ↔ (𝑎‘((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0))
86 reseq1 5947 . . . . . . . . . . . . . . . . . . . 20 (𝑓 = (𝑑𝑒) → (𝑓 ↾ ℕ) = ((𝑑𝑒) ↾ ℕ))
8786fveqeq2d 6869 . . . . . . . . . . . . . . . . . . 19 (𝑓 = (𝑑𝑒) → ((𝑏‘(𝑓 ↾ ℕ)) = 0 ↔ (𝑏‘((𝑑𝑒) ↾ ℕ)) = 0))
8885, 87anbi12d 632 . . . . . . . . . . . . . . . . . 18 (𝑓 = (𝑑𝑒) → (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0) ↔ ((𝑎‘((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘((𝑑𝑒) ↾ ℕ)) = 0)))
8983, 88anbi12d 632 . . . . . . . . . . . . . . . . 17 (𝑓 = (𝑑𝑒) → ((𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0)) ↔ (𝑐 = ((𝑑𝑒) ↾ (1...𝑁)) ∧ ((𝑎‘((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘((𝑑𝑒) ↾ ℕ)) = 0))))
9089rspcev 3591 . . . . . . . . . . . . . . . 16 (((𝑑𝑒) ∈ (ℕ0m ℤ) ∧ (𝑐 = ((𝑑𝑒) ↾ (1...𝑁)) ∧ ((𝑎‘((𝑑𝑒) ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘((𝑑𝑒) ↾ ℕ)) = 0))) → ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0)))
9154, 81, 90syl2anc 584 . . . . . . . . . . . . . . 15 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) ∧ ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))) → ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0)))
9291ex 412 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ (𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑒 ∈ (ℕ0m ℕ))) → (((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)) → ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))))
9392rexlimdvva 3195 . . . . . . . . . . . . 13 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))∃𝑒 ∈ (ℕ0m ℕ)((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)) → ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))))
94 simpr 484 . . . . . . . . . . . . . . . . 17 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → 𝑓 ∈ (ℕ0m ℤ))
95 difss 4102 . . . . . . . . . . . . . . . . 17 (ℤ ∖ (ℤ‘(𝑁 + 1))) ⊆ ℤ
96 elmapssres 8843 . . . . . . . . . . . . . . . . 17 ((𝑓 ∈ (ℕ0m ℤ) ∧ (ℤ ∖ (ℤ‘(𝑁 + 1))) ⊆ ℤ) → (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))))
9794, 95, 96sylancl 586 . . . . . . . . . . . . . . . 16 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))))
9897adantr 480 . . . . . . . . . . . . . . 15 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))))
99 nnssz 12558 . . . . . . . . . . . . . . . . 17 ℕ ⊆ ℤ
100 elmapssres 8843 . . . . . . . . . . . . . . . . 17 ((𝑓 ∈ (ℕ0m ℤ) ∧ ℕ ⊆ ℤ) → (𝑓 ↾ ℕ) ∈ (ℕ0m ℕ))
10194, 99, 100sylancl 586 . . . . . . . . . . . . . . . 16 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (𝑓 ↾ ℕ) ∈ (ℕ0m ℕ))
102101adantr 480 . . . . . . . . . . . . . . 15 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → (𝑓 ↾ ℕ) ∈ (ℕ0m ℕ))
103 simprl 770 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → 𝑐 = (𝑓 ↾ (1...𝑁)))
10414ad3antrrr 730 . . . . . . . . . . . . . . . . . . 19 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → (1...𝑁) ⊆ (ℤ ∖ (ℤ‘(𝑁 + 1))))
105104resabs1d 5982 . . . . . . . . . . . . . . . . . 18 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)) = (𝑓 ↾ (1...𝑁)))
106103, 105eqtr4d 2768 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → 𝑐 = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)))
107 simprrl 780 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0)
108106, 107jca 511 . . . . . . . . . . . . . . . 16 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → (𝑐 = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)) ∧ (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0))
109 resabs1 5980 . . . . . . . . . . . . . . . . . 18 ((1...𝑁) ⊆ ℕ → ((𝑓 ↾ ℕ) ↾ (1...𝑁)) = (𝑓 ↾ (1...𝑁)))
11024, 109mp1i 13 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → ((𝑓 ↾ ℕ) ↾ (1...𝑁)) = (𝑓 ↾ (1...𝑁)))
111103, 110eqtr4d 2768 . . . . . . . . . . . . . . . 16 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → 𝑐 = ((𝑓 ↾ ℕ) ↾ (1...𝑁)))
112 simprrr 781 . . . . . . . . . . . . . . . 16 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → (𝑏‘(𝑓 ↾ ℕ)) = 0)
113108, 111, 112jca32 515 . . . . . . . . . . . . . . 15 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → ((𝑐 = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)) ∧ (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0) ∧ (𝑐 = ((𝑓 ↾ ℕ) ↾ (1...𝑁)) ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0)))
114 reseq1 5947 . . . . . . . . . . . . . . . . . . 19 (𝑑 = (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) → (𝑑 ↾ (1...𝑁)) = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)))
115114eqeq2d 2741 . . . . . . . . . . . . . . . . . 18 (𝑑 = (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) → (𝑐 = (𝑑 ↾ (1...𝑁)) ↔ 𝑐 = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁))))
116 fveqeq2 6870 . . . . . . . . . . . . . . . . . 18 (𝑑 = (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) → ((𝑎𝑑) = 0 ↔ (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0))
117115, 116anbi12d 632 . . . . . . . . . . . . . . . . 17 (𝑑 = (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) → ((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ↔ (𝑐 = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)) ∧ (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0)))
118117anbi1d 631 . . . . . . . . . . . . . . . 16 (𝑑 = (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) → (((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)) ↔ ((𝑐 = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)) ∧ (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))))
119 reseq1 5947 . . . . . . . . . . . . . . . . . . 19 (𝑒 = (𝑓 ↾ ℕ) → (𝑒 ↾ (1...𝑁)) = ((𝑓 ↾ ℕ) ↾ (1...𝑁)))
120119eqeq2d 2741 . . . . . . . . . . . . . . . . . 18 (𝑒 = (𝑓 ↾ ℕ) → (𝑐 = (𝑒 ↾ (1...𝑁)) ↔ 𝑐 = ((𝑓 ↾ ℕ) ↾ (1...𝑁))))
121 fveqeq2 6870 . . . . . . . . . . . . . . . . . 18 (𝑒 = (𝑓 ↾ ℕ) → ((𝑏𝑒) = 0 ↔ (𝑏‘(𝑓 ↾ ℕ)) = 0))
122120, 121anbi12d 632 . . . . . . . . . . . . . . . . 17 (𝑒 = (𝑓 ↾ ℕ) → ((𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0) ↔ (𝑐 = ((𝑓 ↾ ℕ) ↾ (1...𝑁)) ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0)))
123122anbi2d 630 . . . . . . . . . . . . . . . 16 (𝑒 = (𝑓 ↾ ℕ) → (((𝑐 = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)) ∧ (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)) ↔ ((𝑐 = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)) ∧ (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0) ∧ (𝑐 = ((𝑓 ↾ ℕ) ↾ (1...𝑁)) ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))))
124118, 123rspc2ev 3604 . . . . . . . . . . . . . . 15 (((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ (𝑓 ↾ ℕ) ∈ (ℕ0m ℕ) ∧ ((𝑐 = ((𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ↾ (1...𝑁)) ∧ (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0) ∧ (𝑐 = ((𝑓 ↾ ℕ) ↾ (1...𝑁)) ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))∃𝑒 ∈ (ℕ0m ℕ)((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)))
12598, 102, 113, 124syl3anc 1373 . . . . . . . . . . . . . 14 ((((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) ∧ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))) → ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))∃𝑒 ∈ (ℕ0m ℕ)((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)))
126125rexlimdva2 3137 . . . . . . . . . . . . 13 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0)) → ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))∃𝑒 ∈ (ℕ0m ℕ)((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))))
12793, 126impbid 212 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))∃𝑒 ∈ (ℕ0m ℕ)((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)) ↔ ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0))))
128 simplrl 776 . . . . . . . . . . . . . . . . . . 19 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → 𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))))
129 mzpf 42731 . . . . . . . . . . . . . . . . . . 19 (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) → 𝑎:(ℤ ↑m (ℤ ∖ (ℤ‘(𝑁 + 1))))⟶ℤ)
130128, 129syl 17 . . . . . . . . . . . . . . . . . 18 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → 𝑎:(ℤ ↑m (ℤ ∖ (ℤ‘(𝑁 + 1))))⟶ℤ)
131 nn0ssz 12559 . . . . . . . . . . . . . . . . . . . . . 22 0 ⊆ ℤ
132 mapss 8865 . . . . . . . . . . . . . . . . . . . . . 22 ((ℤ ∈ V ∧ ℕ0 ⊆ ℤ) → (ℕ0m ℤ) ⊆ (ℤ ↑m ℤ))
1333, 131, 132mp2an 692 . . . . . . . . . . . . . . . . . . . . 21 (ℕ0m ℤ) ⊆ (ℤ ↑m ℤ)
134133sseli 3945 . . . . . . . . . . . . . . . . . . . 20 (𝑓 ∈ (ℕ0m ℤ) → 𝑓 ∈ (ℤ ↑m ℤ))
135 elmapssres 8843 . . . . . . . . . . . . . . . . . . . 20 ((𝑓 ∈ (ℤ ↑m ℤ) ∧ (ℤ ∖ (ℤ‘(𝑁 + 1))) ⊆ ℤ) → (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∈ (ℤ ↑m (ℤ ∖ (ℤ‘(𝑁 + 1)))))
136134, 95, 135sylancl 586 . . . . . . . . . . . . . . . . . . 19 (𝑓 ∈ (ℕ0m ℤ) → (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∈ (ℤ ↑m (ℤ ∖ (ℤ‘(𝑁 + 1)))))
137136adantl 481 . . . . . . . . . . . . . . . . . 18 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) ∈ (ℤ ↑m (ℤ ∖ (ℤ‘(𝑁 + 1)))))
138130, 137ffvelcdmd 7060 . . . . . . . . . . . . . . . . 17 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) ∈ ℤ)
139138zred 12645 . . . . . . . . . . . . . . . 16 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) ∈ ℝ)
140 simplrr 777 . . . . . . . . . . . . . . . . . . 19 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → 𝑏 ∈ (mzPoly‘ℕ))
141 mzpf 42731 . . . . . . . . . . . . . . . . . . 19 (𝑏 ∈ (mzPoly‘ℕ) → 𝑏:(ℤ ↑m ℕ)⟶ℤ)
142140, 141syl 17 . . . . . . . . . . . . . . . . . 18 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → 𝑏:(ℤ ↑m ℕ)⟶ℤ)
143 elmapssres 8843 . . . . . . . . . . . . . . . . . . . 20 ((𝑓 ∈ (ℤ ↑m ℤ) ∧ ℕ ⊆ ℤ) → (𝑓 ↾ ℕ) ∈ (ℤ ↑m ℕ))
144134, 99, 143sylancl 586 . . . . . . . . . . . . . . . . . . 19 (𝑓 ∈ (ℕ0m ℤ) → (𝑓 ↾ ℕ) ∈ (ℤ ↑m ℕ))
145144adantl 481 . . . . . . . . . . . . . . . . . 18 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (𝑓 ↾ ℕ) ∈ (ℤ ↑m ℕ))
146142, 145ffvelcdmd 7060 . . . . . . . . . . . . . . . . 17 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (𝑏‘(𝑓 ↾ ℕ)) ∈ ℤ)
147146zred 12645 . . . . . . . . . . . . . . . 16 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (𝑏‘(𝑓 ↾ ℕ)) ∈ ℝ)
148 sumsqeq0 14151 . . . . . . . . . . . . . . . 16 (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) ∈ ℝ ∧ (𝑏‘(𝑓 ↾ ℕ)) ∈ ℝ) → (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0) ↔ (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑓 ↾ ℕ))↑2)) = 0))
149139, 147, 148syl2anc 584 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0) ↔ (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑓 ↾ ℕ))↑2)) = 0))
150134adantl 481 . . . . . . . . . . . . . . . . 17 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → 𝑓 ∈ (ℤ ↑m ℤ))
151 reseq1 5947 . . . . . . . . . . . . . . . . . . . . 21 (𝑔 = 𝑓 → (𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))) = (𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))
152151fveq2d 6865 . . . . . . . . . . . . . . . . . . . 20 (𝑔 = 𝑓 → (𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = (𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))))
153152oveq1d 7405 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝑓 → ((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) = ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2))
154 reseq1 5947 . . . . . . . . . . . . . . . . . . . . 21 (𝑔 = 𝑓 → (𝑔 ↾ ℕ) = (𝑓 ↾ ℕ))
155154fveq2d 6865 . . . . . . . . . . . . . . . . . . . 20 (𝑔 = 𝑓 → (𝑏‘(𝑔 ↾ ℕ)) = (𝑏‘(𝑓 ↾ ℕ)))
156155oveq1d 7405 . . . . . . . . . . . . . . . . . . 19 (𝑔 = 𝑓 → ((𝑏‘(𝑔 ↾ ℕ))↑2) = ((𝑏‘(𝑓 ↾ ℕ))↑2))
157153, 156oveq12d 7408 . . . . . . . . . . . . . . . . . 18 (𝑔 = 𝑓 → (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)) = (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑓 ↾ ℕ))↑2)))
158 eqid 2730 . . . . . . . . . . . . . . . . . 18 (𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2))) = (𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))
159 ovex 7423 . . . . . . . . . . . . . . . . . 18 (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑓 ↾ ℕ))↑2)) ∈ V
160157, 158, 159fvmpt 6971 . . . . . . . . . . . . . . . . 17 (𝑓 ∈ (ℤ ↑m ℤ) → ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑓 ↾ ℕ))↑2)))
161150, 160syl 17 . . . . . . . . . . . . . . . 16 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑓 ↾ ℕ))↑2)))
162161eqeq1d 2732 . . . . . . . . . . . . . . 15 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0 ↔ (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑓 ↾ ℕ))↑2)) = 0))
163149, 162bitr4d 282 . . . . . . . . . . . . . 14 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → (((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0) ↔ ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0))
164163anbi2d 630 . . . . . . . . . . . . 13 (((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) ∧ 𝑓 ∈ (ℕ0m ℤ)) → ((𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0)) ↔ (𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0)))
165164rexbidva 3156 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑎‘(𝑓 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1))))) = 0 ∧ (𝑏‘(𝑓 ↾ ℕ)) = 0)) ↔ ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0)))
166127, 165bitrd 279 . . . . . . . . . . 11 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))∃𝑒 ∈ (ℕ0m ℕ)((𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ (𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)) ↔ ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0)))
16731, 166bitr3id 285 . . . . . . . . . 10 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → ((∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)) ↔ ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0)))
168167abbidv 2796 . . . . . . . . 9 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → {𝑐 ∣ (∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0) ∧ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0))} = {𝑐 ∣ ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0)})
16930, 168eqtrid 2777 . . . . . . . 8 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → ({𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∩ {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) = {𝑐 ∣ ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0)})
170 simpl 482 . . . . . . . . 9 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → 𝑁 ∈ ℕ0)
171 fzssuz 13533 . . . . . . . . . . . 12 (1...𝑁) ⊆ (ℤ‘1)
172 uzssz 12821 . . . . . . . . . . . 12 (ℤ‘1) ⊆ ℤ
173171, 172sstri 3959 . . . . . . . . . . 11 (1...𝑁) ⊆ ℤ
1743, 173pm3.2i 470 . . . . . . . . . 10 (ℤ ∈ V ∧ (1...𝑁) ⊆ ℤ)
175174a1i 11 . . . . . . . . 9 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (ℤ ∈ V ∧ (1...𝑁) ⊆ ℤ))
1763a1i 11 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → ℤ ∈ V)
17795a1i 11 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (ℤ ∖ (ℤ‘(𝑁 + 1))) ⊆ ℤ)
178 simprl 770 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → 𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))))
179 mzpresrename 42745 . . . . . . . . . . . 12 ((ℤ ∈ V ∧ (ℤ ∖ (ℤ‘(𝑁 + 1))) ⊆ ℤ ∧ 𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1))))) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ (𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))) ∈ (mzPoly‘ℤ))
180176, 177, 178, 179syl3anc 1373 . . . . . . . . . . 11 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ (𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))) ∈ (mzPoly‘ℤ))
181 2nn0 12466 . . . . . . . . . . 11 2 ∈ ℕ0
182 mzpexpmpt 42740 . . . . . . . . . . 11 (((𝑔 ∈ (ℤ ↑m ℤ) ↦ (𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))) ∈ (mzPoly‘ℤ) ∧ 2 ∈ ℕ0) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ ((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2)) ∈ (mzPoly‘ℤ))
183180, 181, 182sylancl 586 . . . . . . . . . 10 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ ((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2)) ∈ (mzPoly‘ℤ))
18499a1i 11 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → ℕ ⊆ ℤ)
185 simprr 772 . . . . . . . . . . . 12 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → 𝑏 ∈ (mzPoly‘ℕ))
186 mzpresrename 42745 . . . . . . . . . . . 12 ((ℤ ∈ V ∧ ℕ ⊆ ℤ ∧ 𝑏 ∈ (mzPoly‘ℕ)) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ (𝑏‘(𝑔 ↾ ℕ))) ∈ (mzPoly‘ℤ))
187176, 184, 185, 186syl3anc 1373 . . . . . . . . . . 11 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ (𝑏‘(𝑔 ↾ ℕ))) ∈ (mzPoly‘ℤ))
188 mzpexpmpt 42740 . . . . . . . . . . 11 (((𝑔 ∈ (ℤ ↑m ℤ) ↦ (𝑏‘(𝑔 ↾ ℕ))) ∈ (mzPoly‘ℤ) ∧ 2 ∈ ℕ0) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ ((𝑏‘(𝑔 ↾ ℕ))↑2)) ∈ (mzPoly‘ℤ))
189187, 181, 188sylancl 586 . . . . . . . . . 10 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ ((𝑏‘(𝑔 ↾ ℕ))↑2)) ∈ (mzPoly‘ℤ))
190 mzpaddmpt 42736 . . . . . . . . . 10 (((𝑔 ∈ (ℤ ↑m ℤ) ↦ ((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2)) ∈ (mzPoly‘ℤ) ∧ (𝑔 ∈ (ℤ ↑m ℤ) ↦ ((𝑏‘(𝑔 ↾ ℕ))↑2)) ∈ (mzPoly‘ℤ)) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2))) ∈ (mzPoly‘ℤ))
191183, 189, 190syl2anc 584 . . . . . . . . 9 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → (𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2))) ∈ (mzPoly‘ℤ))
192 eldioph2 42757 . . . . . . . . 9 ((𝑁 ∈ ℕ0 ∧ (ℤ ∈ V ∧ (1...𝑁) ⊆ ℤ) ∧ (𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2))) ∈ (mzPoly‘ℤ)) → {𝑐 ∣ ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0)} ∈ (Dioph‘𝑁))
193170, 175, 191, 192syl3anc 1373 . . . . . . . 8 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → {𝑐 ∣ ∃𝑓 ∈ (ℕ0m ℤ)(𝑐 = (𝑓 ↾ (1...𝑁)) ∧ ((𝑔 ∈ (ℤ ↑m ℤ) ↦ (((𝑎‘(𝑔 ↾ (ℤ ∖ (ℤ‘(𝑁 + 1)))))↑2) + ((𝑏‘(𝑔 ↾ ℕ))↑2)))‘𝑓) = 0)} ∈ (Dioph‘𝑁))
194169, 193eqeltrd 2829 . . . . . . 7 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → ({𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∩ {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) ∈ (Dioph‘𝑁))
195 ineq12 4181 . . . . . . . 8 ((𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∧ 𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) → (𝐴𝐵) = ({𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∩ {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}))
196195eleq1d 2814 . . . . . . 7 ((𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∧ 𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) → ((𝐴𝐵) ∈ (Dioph‘𝑁) ↔ ({𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∩ {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) ∈ (Dioph‘𝑁)))
197194, 196syl5ibrcom 247 . . . . . 6 ((𝑁 ∈ ℕ0 ∧ (𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1)))) ∧ 𝑏 ∈ (mzPoly‘ℕ))) → ((𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∧ 𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) → (𝐴𝐵) ∈ (Dioph‘𝑁)))
198197rexlimdvva 3195 . . . . 5 (𝑁 ∈ ℕ0 → (∃𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1))))∃𝑏 ∈ (mzPoly‘ℕ)(𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∧ 𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) → (𝐴𝐵) ∈ (Dioph‘𝑁)))
19929, 198biimtrrid 243 . . . 4 (𝑁 ∈ ℕ0 → ((∃𝑎 ∈ (mzPoly‘(ℤ ∖ (ℤ‘(𝑁 + 1))))𝐴 = {𝑐 ∣ ∃𝑑 ∈ (ℕ0m (ℤ ∖ (ℤ‘(𝑁 + 1))))(𝑐 = (𝑑 ↾ (1...𝑁)) ∧ (𝑎𝑑) = 0)} ∧ ∃𝑏 ∈ (mzPoly‘ℕ)𝐵 = {𝑐 ∣ ∃𝑒 ∈ (ℕ0m ℕ)(𝑐 = (𝑒 ↾ (1...𝑁)) ∧ (𝑏𝑒) = 0)}) → (𝐴𝐵) ∈ (Dioph‘𝑁)))
20028, 199sylbid 240 . . 3 (𝑁 ∈ ℕ0 → ((𝐴 ∈ (Dioph‘𝑁) ∧ 𝐵 ∈ (Dioph‘𝑁)) → (𝐴𝐵) ∈ (Dioph‘𝑁)))
2011, 200syl 17 . 2 (𝐴 ∈ (Dioph‘𝑁) → ((𝐴 ∈ (Dioph‘𝑁) ∧ 𝐵 ∈ (Dioph‘𝑁)) → (𝐴𝐵) ∈ (Dioph‘𝑁)))
202201anabsi5 669 1 ((𝐴 ∈ (Dioph‘𝑁) ∧ 𝐵 ∈ (Dioph‘𝑁)) → (𝐴𝐵) ∈ (Dioph‘𝑁))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395   = wceq 1540  wcel 2109  {cab 2708  wrex 3054  Vcvv 3450  cdif 3914  cun 3915  cin 3916  wss 3917   class class class wbr 5110  cmpt 5191  cres 5643  wf 6510  cfv 6514  (class class class)co 7390  ωcom 7845  m cmap 8802  cen 8918  Fincfn 8921  cr 11074  0cc0 11075  1c1 11076   + caddc 11078  cle 11216  cn 12193  2c2 12248  0cn0 12449  cz 12536  cuz 12800  ...cfz 13475  cexp 14033  mzPolycmzp 42717  Diophcdioph 42750
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-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
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-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-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-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-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-of 7656  df-om 7846  df-1st 7971  df-2nd 7972  df-frecs 8263  df-wrecs 8294  df-recs 8343  df-rdg 8381  df-1o 8437  df-oadd 8441  df-er 8674  df-map 8804  df-en 8922  df-dom 8923  df-sdom 8924  df-fin 8925  df-dju 9861  df-card 9899  df-pnf 11217  df-mnf 11218  df-xr 11219  df-ltxr 11220  df-le 11221  df-sub 11414  df-neg 11415  df-nn 12194  df-2 12256  df-n0 12450  df-z 12537  df-uz 12801  df-fz 13476  df-seq 13974  df-exp 14034  df-hash 14303  df-mzpcl 42718  df-mzp 42719  df-dioph 42751
This theorem is referenced by:  anrabdioph  42775
  Copyright terms: Public domain W3C validator