Theorem eldioph4b 42834

Description: Membership in Dioph expressed using a quantified union to add witness variables instead of a restriction to remove them. (Contributed by Stefan O'Rear, 16-Oct-2014.)

Hypotheses

Ref	Expression
eldioph4b.a	⊢ 𝑊 ∈ V
eldioph4b.b	⊢ ¬ 𝑊 ∈ Fin
eldioph4b.c	⊢ (𝑊 ∩ ℕ) = ∅

Assertion

Ref	Expression
eldioph4b	⊢ (𝑆 ∈ (Dioph‘𝑁) ↔ (𝑁 ∈ ℕ0 ∧ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0}))

Distinct variable groups:   𝑊,𝑝,𝑡,𝑤   𝑆,𝑝,𝑡,𝑤   𝑁,𝑝,𝑡,𝑤

Proof of Theorem eldioph4b

Dummy variable 𝑢 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		eldiophelnn0 42787	. 2 ⊢ (𝑆 ∈ (Dioph‘𝑁) → 𝑁 ∈ ℕ0)
2		eldioph4b.a	. . . . . 6 ⊢ 𝑊 ∈ V
3		ovex 7438	. . . . . 6 ⊢ (1...𝑁) ∈ V
4	2, 3	unex 7738	. . . . 5 ⊢ (𝑊 ∪ (1...𝑁)) ∈ V
5	4	jctr 524	. . . 4 ⊢ (𝑁 ∈ ℕ0 → (𝑁 ∈ ℕ0 ∧ (𝑊 ∪ (1...𝑁)) ∈ V))
6		eldioph4b.b	. . . . . . 7 ⊢ ¬ 𝑊 ∈ Fin
7	6	intnanr 487	. . . . . 6 ⊢ ¬ (𝑊 ∈ Fin ∧ (1...𝑁) ∈ Fin)
8		unfir 9318	. . . . . 6 ⊢ ((𝑊 ∪ (1...𝑁)) ∈ Fin → (𝑊 ∈ Fin ∧ (1...𝑁) ∈ Fin))
9	7, 8	mto 197	. . . . 5 ⊢ ¬ (𝑊 ∪ (1...𝑁)) ∈ Fin
10		ssun2 4154	. . . . 5 ⊢ (1...𝑁) ⊆ (𝑊 ∪ (1...𝑁))
11	9, 10	pm3.2i 470	. . . 4 ⊢ (¬ (𝑊 ∪ (1...𝑁)) ∈ Fin ∧ (1...𝑁) ⊆ (𝑊 ∪ (1...𝑁)))
12		eldioph2b 42786	. . . 4 ⊢ (((𝑁 ∈ ℕ0 ∧ (𝑊 ∪ (1...𝑁)) ∈ V) ∧ (¬ (𝑊 ∪ (1...𝑁)) ∈ Fin ∧ (1...𝑁) ⊆ (𝑊 ∪ (1...𝑁)))) → (𝑆 ∈ (Dioph‘𝑁) ↔ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}))
13	5, 11, 12	sylancl 586	. . 3 ⊢ (𝑁 ∈ ℕ0 → (𝑆 ∈ (Dioph‘𝑁) ↔ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}))
14		elmapssres 8881	. . . . . . . . . . . . . . 15 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (1...𝑁) ⊆ (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)))
15	10, 14	mpan2 691	. . . . . . . . . . . . . 14 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)))
16	15	adantr 480	. . . . . . . . . . . . 13 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → (𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)))
17		ssun1 4153	. . . . . . . . . . . . . . . 16 ⊢ 𝑊 ⊆ (𝑊 ∪ (1...𝑁))
18		elmapssres 8881	. . . . . . . . . . . . . . . 16 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ 𝑊 ⊆ (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ 𝑊) ∈ (ℕ0 ↑m 𝑊))
19	17, 18	mpan2 691	. . . . . . . . . . . . . . 15 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ 𝑊) ∈ (ℕ0 ↑m 𝑊))
20	19	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → (𝑢 ↾ 𝑊) ∈ (ℕ0 ↑m 𝑊))
21		uncom 4133	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊)) = ((𝑢 ↾ 𝑊) ∪ (𝑢 ↾ (1...𝑁)))
22		resundi 5980	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢 ↾ (𝑊 ∪ (1...𝑁))) = ((𝑢 ↾ 𝑊) ∪ (𝑢 ↾ (1...𝑁)))
23	21, 22	eqtr4i 2761	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊)) = (𝑢 ↾ (𝑊 ∪ (1...𝑁)))
24		elmapi 8863	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → 𝑢:(𝑊 ∪ (1...𝑁))⟶ℕ0)
25		ffn 6706	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢:(𝑊 ∪ (1...𝑁))⟶ℕ0 → 𝑢 Fn (𝑊 ∪ (1...𝑁)))
26		fnresdm 6657	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢 Fn (𝑊 ∪ (1...𝑁)) → (𝑢 ↾ (𝑊 ∪ (1...𝑁))) = 𝑢)
27	24, 25, 26	3syl 18	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ (𝑊 ∪ (1...𝑁))) = 𝑢)
28	23, 27	eqtrid 2782	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → ((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊)) = 𝑢)
29	28	fveqeq2d 6884	. . . . . . . . . . . . . . 15 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → ((𝑝‘((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊))) = 0 ↔ (𝑝‘𝑢) = 0))
30	29	biimpar 477	. . . . . . . . . . . . . 14 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → (𝑝‘((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊))) = 0)
31		uneq2 4137	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = (𝑢 ↾ 𝑊) → ((𝑢 ↾ (1...𝑁)) ∪ 𝑤) = ((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊)))
32	31	fveqeq2d 6884	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = (𝑢 ↾ 𝑊) → ((𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0 ↔ (𝑝‘((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊))) = 0))
33	32	rspcev 3601	. . . . . . . . . . . . . 14 ⊢ (((𝑢 ↾ 𝑊) ∈ (ℕ0 ↑m 𝑊) ∧ (𝑝‘((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊))) = 0) → ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0)
34	20, 30, 33	syl2anc 584	. . . . . . . . . . . . 13 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0)
35	16, 34	jca 511	. . . . . . . . . . . 12 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → ((𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0))
36		eleq1 2822	. . . . . . . . . . . . 13 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ↔ (𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁))))
37		uneq1 4136	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → (𝑡 ∪ 𝑤) = ((𝑢 ↾ (1...𝑁)) ∪ 𝑤))
38	37	fveqeq2d 6884	. . . . . . . . . . . . . 14 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → ((𝑝‘(𝑡 ∪ 𝑤)) = 0 ↔ (𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0))
39	38	rexbidv 3164	. . . . . . . . . . . . 13 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → (∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0 ↔ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0))
40	36, 39	anbi12d 632	. . . . . . . . . . . 12 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0) ↔ ((𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0)))
41	35, 40	syl5ibrcom 247	. . . . . . . . . . 11 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → (𝑡 = (𝑢 ↾ (1...𝑁)) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)))
42	41	expimpd 453	. . . . . . . . . 10 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → (((𝑝‘𝑢) = 0 ∧ 𝑡 = (𝑢 ↾ (1...𝑁))) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)))
43	42	ancomsd 465	. . . . . . . . 9 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → ((𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)))
44	43	rexlimiv 3134	. . . . . . . 8 ⊢ (∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0))
45		uncom 4133	. . . . . . . . . . . 12 ⊢ (𝑡 ∪ 𝑤) = (𝑤 ∪ 𝑡)
46		fz1ssnn 13572	. . . . . . . . . . . . . . . . . . . 20 ⊢ (1...𝑁) ⊆ ℕ
47		sslin 4218	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((1...𝑁) ⊆ ℕ → (𝑊 ∩ (1...𝑁)) ⊆ (𝑊 ∩ ℕ))
48	46, 47	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑊 ∩ (1...𝑁)) ⊆ (𝑊 ∩ ℕ)
49		eldioph4b.c	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑊 ∩ ℕ) = ∅
50	48, 49	sseqtri 4007	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑊 ∩ (1...𝑁)) ⊆ ∅
51		ss0 4377	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑊 ∩ (1...𝑁)) ⊆ ∅ → (𝑊 ∩ (1...𝑁)) = ∅)
52	50, 51	ax-mp 5	. . . . . . . . . . . . . . . . 17 ⊢ (𝑊 ∩ (1...𝑁)) = ∅
53	52	reseq2i 5963	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ↾ (𝑊 ∩ (1...𝑁))) = (𝑤 ↾ ∅)
54		res0 5970	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 ↾ ∅) = ∅
55	53, 54	eqtri 2758	. . . . . . . . . . . . . . 15 ⊢ (𝑤 ↾ (𝑊 ∩ (1...𝑁))) = ∅
56	52	reseq2i 5963	. . . . . . . . . . . . . . . 16 ⊢ (𝑡 ↾ (𝑊 ∩ (1...𝑁))) = (𝑡 ↾ ∅)
57		res0 5970	. . . . . . . . . . . . . . . 16 ⊢ (𝑡 ↾ ∅) = ∅
58	56, 57	eqtri 2758	. . . . . . . . . . . . . . 15 ⊢ (𝑡 ↾ (𝑊 ∩ (1...𝑁))) = ∅
59	55, 58	eqtr4i 2761	. . . . . . . . . . . . . 14 ⊢ (𝑤 ↾ (𝑊 ∩ (1...𝑁))) = (𝑡 ↾ (𝑊 ∩ (1...𝑁)))
60		elmapresaun 8894	. . . . . . . . . . . . . 14 ⊢ ((𝑤 ∈ (ℕ0 ↑m 𝑊) ∧ 𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ (𝑤 ↾ (𝑊 ∩ (1...𝑁))) = (𝑡 ↾ (𝑊 ∩ (1...𝑁)))) → (𝑤 ∪ 𝑡) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
61	59, 60	mp3an3 1452	. . . . . . . . . . . . 13 ⊢ ((𝑤 ∈ (ℕ0 ↑m 𝑊) ∧ 𝑡 ∈ (ℕ0 ↑m (1...𝑁))) → (𝑤 ∪ 𝑡) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
62	61	ancoms 458	. . . . . . . . . . . 12 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) → (𝑤 ∪ 𝑡) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
63	45, 62	eqeltrid 2838	. . . . . . . . . . 11 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) → (𝑡 ∪ 𝑤) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
64	63	adantr 480	. . . . . . . . . 10 ⊢ (((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0) → (𝑡 ∪ 𝑤) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
65	45	reseq1i 5962	. . . . . . . . . . . 12 ⊢ ((𝑡 ∪ 𝑤) ↾ (1...𝑁)) = ((𝑤 ∪ 𝑡) ↾ (1...𝑁))
66		elmapresaunres2 42794	. . . . . . . . . . . . . 14 ⊢ ((𝑤 ∈ (ℕ0 ↑m 𝑊) ∧ 𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ (𝑤 ↾ (𝑊 ∩ (1...𝑁))) = (𝑡 ↾ (𝑊 ∩ (1...𝑁)))) → ((𝑤 ∪ 𝑡) ↾ (1...𝑁)) = 𝑡)
67	59, 66	mp3an3 1452	. . . . . . . . . . . . 13 ⊢ ((𝑤 ∈ (ℕ0 ↑m 𝑊) ∧ 𝑡 ∈ (ℕ0 ↑m (1...𝑁))) → ((𝑤 ∪ 𝑡) ↾ (1...𝑁)) = 𝑡)
68	67	ancoms 458	. . . . . . . . . . . 12 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) → ((𝑤 ∪ 𝑡) ↾ (1...𝑁)) = 𝑡)
69	65, 68	eqtr2id 2783	. . . . . . . . . . 11 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) → 𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)))
70	69	adantr 480	. . . . . . . . . 10 ⊢ (((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0) → 𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)))
71		simpr 484	. . . . . . . . . 10 ⊢ (((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0) → (𝑝‘(𝑡 ∪ 𝑤)) = 0)
72		reseq1 5960	. . . . . . . . . . . . 13 ⊢ (𝑢 = (𝑡 ∪ 𝑤) → (𝑢 ↾ (1...𝑁)) = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)))
73	72	eqeq2d 2746	. . . . . . . . . . . 12 ⊢ (𝑢 = (𝑡 ∪ 𝑤) → (𝑡 = (𝑢 ↾ (1...𝑁)) ↔ 𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁))))
74		fveqeq2 6885	. . . . . . . . . . . 12 ⊢ (𝑢 = (𝑡 ∪ 𝑤) → ((𝑝‘𝑢) = 0 ↔ (𝑝‘(𝑡 ∪ 𝑤)) = 0))
75	73, 74	anbi12d 632	. . . . . . . . . . 11 ⊢ (𝑢 = (𝑡 ∪ 𝑤) → ((𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) ↔ (𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0)))
76	75	rspcev 3601	. . . . . . . . . 10 ⊢ (((𝑡 ∪ 𝑤) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0)) → ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0))
77	64, 70, 71, 76	syl12anc 836	. . . . . . . . 9 ⊢ (((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0) → ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0))
78	77	r19.29an 3144	. . . . . . . 8 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0) → ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0))
79	44, 78	impbii 209	. . . . . . 7 ⊢ (∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) ↔ (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0))
80	79	abbii 2802	. . . . . 6 ⊢ {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} = {𝑡 ∣ (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)}
81		df-rab 3416	. . . . . 6 ⊢ {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0} = {𝑡 ∣ (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)}
82	80, 81	eqtr4i 2761	. . . . 5 ⊢ {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0}
83	82	eqeq2i 2748	. . . 4 ⊢ (𝑆 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ↔ 𝑆 = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0})
84	83	rexbii 3083	. . 3 ⊢ (∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ↔ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0})
85	13, 84	bitrdi 287	. 2 ⊢ (𝑁 ∈ ℕ0 → (𝑆 ∈ (Dioph‘𝑁) ↔ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0}))
86	1, 85	biadanii 821	1 ⊢ (𝑆 ∈ (Dioph‘𝑁) ↔ (𝑁 ∈ ℕ0 ∧ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0}))

Syntax hints:  ¬ wn 3   ↔ wb 206   ∧ wa 395   = wceq 1540   ∈ wcel 2108  {cab 2713  ∃wrex 3060  {crab 3415  Vcvv 3459   ∪ cun 3924   ∩ cin 3925   ⊆ wss 3926  ∅c0 4308   ↾ cres 5656   Fn wfn 6526  ⟶wf 6527  ‘cfv 6531  (class class class)co 7405   ↑_m cmap 8840  Fincfn 8959  0cc0 11129  1c1 11130  ℕcn 12240  ℕ₀cn0 12501  ...cfz 13524  mzPolycmzp 42745  Diophcdioph 42778

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 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-rep 5249  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7729  ax-cnex 11185  ax-resscn 11186  ax-1cn 11187  ax-icn 11188  ax-addcl 11189  ax-addrcl 11190  ax-mulcl 11191  ax-mulrcl 11192  ax-mulcom 11193  ax-addass 11194  ax-mulass 11195  ax-distr 11196  ax-i2m1 11197  ax-1ne0 11198  ax-1rid 11199  ax-rnegex 11200  ax-rrecex 11201  ax-cnre 11202  ax-pre-lttri 11203  ax-pre-lttrn 11204  ax-pre-ltadd 11205  ax-pre-mulgt0 11206

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 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-nel 3037  df-ral 3052  df-rex 3061  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-pss 3946  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-int 4923  df-iun 4969  df-br 5120  df-opab 5182  df-mpt 5202  df-tr 5230  df-id 5548  df-eprel 5553  df-po 5561  df-so 5562  df-fr 5606  df-we 5608  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-pred 6290  df-ord 6355  df-on 6356  df-lim 6357  df-suc 6358  df-iota 6484  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-riota 7362  df-ov 7408  df-oprab 7409  df-mpo 7410  df-of 7671  df-om 7862  df-1st 7988  df-2nd 7989  df-frecs 8280  df-wrecs 8311  df-recs 8385  df-rdg 8424  df-1o 8480  df-oadd 8484  df-er 8719  df-map 8842  df-en 8960  df-dom 8961  df-sdom 8962  df-fin 8963  df-dju 9915  df-card 9953  df-pnf 11271  df-mnf 11272  df-xr 11273  df-ltxr 11274  df-le 11275  df-sub 11468  df-neg 11469  df-nn 12241  df-n0 12502  df-z 12589  df-uz 12853  df-fz 13525  df-hash 14349  df-mzpcl 42746  df-mzp 42747  df-dioph 42779

This theorem is referenced by:  eldioph4i  42835  diophren  42836