Theorem eldioph4b 43756

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 43713	. 2 ⊢ (𝑆 ∈ (Dioph‘𝑁) → 𝑁 ∈ ℕ0)
2		eldioph4b.a	. . . . . 6 ⊢ 𝑊 ∈ V
3		ovex 7441	. . . . . 6 ⊢ (1...𝑁) ∈ V
4	2, 3	unex 7744	. . . . 5 ⊢ (𝑊 ∪ (1...𝑁)) ∈ V
5	4	jctr 534	. . . 4 ⊢ (𝑁 ∈ ℕ0 → (𝑁 ∈ ℕ0 ∧ (𝑊 ∪ (1...𝑁)) ∈ V))
6		eldioph4b.b	. . . . . . 7 ⊢ ¬ 𝑊 ∈ Fin
7	6	intnanr 493	. . . . . 6 ⊢ ¬ (𝑊 ∈ Fin ∧ (1...𝑁) ∈ Fin)
8		unfir 9278	. . . . . 6 ⊢ ((𝑊 ∪ (1...𝑁)) ∈ Fin → (𝑊 ∈ Fin ∧ (1...𝑁) ∈ Fin))
9	7, 8	mto 200	. . . . 5 ⊢ ¬ (𝑊 ∪ (1...𝑁)) ∈ Fin
10		ssun2 4124	. . . . 5 ⊢ (1...𝑁) ⊆ (𝑊 ∪ (1...𝑁))
11	9, 10	pm3.2i 476	. . . 4 ⊢ (¬ (𝑊 ∪ (1...𝑁)) ∈ Fin ∧ (1...𝑁) ⊆ (𝑊 ∪ (1...𝑁)))
12		eldioph2b 43712	. . . 4 ⊢ (((𝑁 ∈ ℕ0 ∧ (𝑊 ∪ (1...𝑁)) ∈ V) ∧ (¬ (𝑊 ∪ (1...𝑁)) ∈ Fin ∧ (1...𝑁) ⊆ (𝑊 ∪ (1...𝑁)))) → (𝑆 ∈ (Dioph‘𝑁) ↔ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}))
13	5, 11, 12	sylancl 598	. . 3 ⊢ (𝑁 ∈ ℕ0 → (𝑆 ∈ (Dioph‘𝑁) ↔ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)}))
14		elmapssres 8872	. . . . . . . . . . . . . . 15 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (1...𝑁) ⊆ (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)))
15	10, 14	mpan2 704	. . . . . . . . . . . . . 14 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)))
16	15	adantr 486	. . . . . . . . . . . . 13 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → (𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)))
17		ssun1 4123	. . . . . . . . . . . . . . . 16 ⊢ 𝑊 ⊆ (𝑊 ∪ (1...𝑁))
18		elmapssres 8872	. . . . . . . . . . . . . . . 16 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ 𝑊 ⊆ (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ 𝑊) ∈ (ℕ0 ↑m 𝑊))
19	17, 18	mpan2 704	. . . . . . . . . . . . . . 15 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ 𝑊) ∈ (ℕ0 ↑m 𝑊))
20	19	adantr 486	. . . . . . . . . . . . . 14 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → (𝑢 ↾ 𝑊) ∈ (ℕ0 ↑m 𝑊))
21		uncom 4104	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊)) = ((𝑢 ↾ 𝑊) ∪ (𝑢 ↾ (1...𝑁)))
22		resundi 5980	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢 ↾ (𝑊 ∪ (1...𝑁))) = ((𝑢 ↾ 𝑊) ∪ (𝑢 ↾ (1...𝑁)))
23	21, 22	eqtr4i 2786	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊)) = (𝑢 ↾ (𝑊 ∪ (1...𝑁)))
24		elmapi 8847	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → 𝑢:(𝑊 ∪ (1...𝑁))⟶ℕ0)
25		ffn 6697	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢:(𝑊 ∪ (1...𝑁))⟶ℕ0 → 𝑢 Fn (𝑊 ∪ (1...𝑁)))
26		fnresdm 6646	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑢 Fn (𝑊 ∪ (1...𝑁)) → (𝑢 ↾ (𝑊 ∪ (1...𝑁))) = 𝑢)
27	24, 25, 26	3syl 19	. . . . . . . . . . . . . . . . 17 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → (𝑢 ↾ (𝑊 ∪ (1...𝑁))) = 𝑢)
28	23, 27	eqtrid 2807	. . . . . . . . . . . . . . . 16 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → ((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊)) = 𝑢)
29	28	fveqeq2d 6881	. . . . . . . . . . . . . . 15 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → ((𝑝‘((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊))) = 0 ↔ (𝑝‘𝑢) = 0))
30	29	biimpar 483	. . . . . . . . . . . . . 14 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → (𝑝‘((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊))) = 0)
31		uneq2 4108	. . . . . . . . . . . . . . . 16 ⊢ (𝑤 = (𝑢 ↾ 𝑊) → ((𝑢 ↾ (1...𝑁)) ∪ 𝑤) = ((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊)))
32	31	fveqeq2d 6881	. . . . . . . . . . . . . . 15 ⊢ (𝑤 = (𝑢 ↾ 𝑊) → ((𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0 ↔ (𝑝‘((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊))) = 0))
33	32	rspcev 3576	. . . . . . . . . . . . . 14 ⊢ (((𝑢 ↾ 𝑊) ∈ (ℕ0 ↑m 𝑊) ∧ (𝑝‘((𝑢 ↾ (1...𝑁)) ∪ (𝑢 ↾ 𝑊))) = 0) → ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0)
34	20, 30, 33	syl2anc 596	. . . . . . . . . . . . 13 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0)
35	16, 34	jca 521	. . . . . . . . . . . 12 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → ((𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0))
36		eleq1 2848	. . . . . . . . . . . . 13 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ↔ (𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁))))
37		uneq1 4107	. . . . . . . . . . . . . . 15 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → (𝑡 ∪ 𝑤) = ((𝑢 ↾ (1...𝑁)) ∪ 𝑤))
38	37	fveqeq2d 6881	. . . . . . . . . . . . . 14 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → ((𝑝‘(𝑡 ∪ 𝑤)) = 0 ↔ (𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0))
39	38	rexbidv 3186	. . . . . . . . . . . . 13 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → (∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0 ↔ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0))
40	36, 39	anbi12d 644	. . . . . . . . . . . 12 ⊢ (𝑡 = (𝑢 ↾ (1...𝑁)) → ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0) ↔ ((𝑢 ↾ (1...𝑁)) ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘((𝑢 ↾ (1...𝑁)) ∪ 𝑤)) = 0)))
41	35, 40	syl5ibrcom 250	. . . . . . . . . . 11 ⊢ ((𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑝‘𝑢) = 0) → (𝑡 = (𝑢 ↾ (1...𝑁)) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)))
42	41	expimpd 459	. . . . . . . . . 10 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → (((𝑝‘𝑢) = 0 ∧ 𝑡 = (𝑢 ↾ (1...𝑁))) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)))
43	42	ancomsd 471	. . . . . . . . 9 ⊢ (𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) → ((𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)))
44	43	rexlimiv 3156	. . . . . . . 8 ⊢ (∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) → (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0))
45		uncom 4104	. . . . . . . . . . . 12 ⊢ (𝑡 ∪ 𝑤) = (𝑤 ∪ 𝑡)
46		fz1ssnn 13658	. . . . . . . . . . . . . . . . . . . 20 ⊢ (1...𝑁) ⊆ ℕ
47		sslin 4187	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((1...𝑁) ⊆ ℕ → (𝑊 ∩ (1...𝑁)) ⊆ (𝑊 ∩ ℕ))
48	46, 47	ax-mp 5	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑊 ∩ (1...𝑁)) ⊆ (𝑊 ∩ ℕ)
49		eldioph4b.c	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑊 ∩ ℕ) = ∅
50	48, 49	sseqtri 3978	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑊 ∩ (1...𝑁)) ⊆ ∅
51		ss0 4351	. . . . . . . . . . . . . . . . . 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 2783	. . . . . . . . . . . . . . 15 ⊢ (𝑤 ↾ (𝑊 ∩ (1...𝑁))) = ∅
56	52	reseq2i 5963	. . . . . . . . . . . . . . . 16 ⊢ (𝑡 ↾ (𝑊 ∩ (1...𝑁))) = (𝑡 ↾ ∅)
57		res0 5970	. . . . . . . . . . . . . . . 16 ⊢ (𝑡 ↾ ∅) = ∅
58	56, 57	eqtri 2783	. . . . . . . . . . . . . . 15 ⊢ (𝑡 ↾ (𝑊 ∩ (1...𝑁))) = ∅
59	55, 58	eqtr4i 2786	. . . . . . . . . . . . . 14 ⊢ (𝑤 ↾ (𝑊 ∩ (1...𝑁))) = (𝑡 ↾ (𝑊 ∩ (1...𝑁)))
60		elmapresaun 8886	. . . . . . . . . . . . . 14 ⊢ ((𝑤 ∈ (ℕ0 ↑m 𝑊) ∧ 𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ (𝑤 ↾ (𝑊 ∩ (1...𝑁))) = (𝑡 ↾ (𝑊 ∩ (1...𝑁)))) → (𝑤 ∪ 𝑡) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
61	59, 60	mp3an3 1479	. . . . . . . . . . . . 13 ⊢ ((𝑤 ∈ (ℕ0 ↑m 𝑊) ∧ 𝑡 ∈ (ℕ0 ↑m (1...𝑁))) → (𝑤 ∪ 𝑡) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
62	61	ancoms 464	. . . . . . . . . . . 12 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) → (𝑤 ∪ 𝑡) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
63	45, 62	eqeltrid 2864	. . . . . . . . . . 11 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) → (𝑡 ∪ 𝑤) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
64	63	adantr 486	. . . . . . . . . 10 ⊢ (((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0) → (𝑡 ∪ 𝑤) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))))
65	45	reseq1i 5962	. . . . . . . . . . . 12 ⊢ ((𝑡 ∪ 𝑤) ↾ (1...𝑁)) = ((𝑤 ∪ 𝑡) ↾ (1...𝑁))
66		elmapresaunres2 43720	. . . . . . . . . . . . . 14 ⊢ ((𝑤 ∈ (ℕ0 ↑m 𝑊) ∧ 𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ (𝑤 ↾ (𝑊 ∩ (1...𝑁))) = (𝑡 ↾ (𝑊 ∩ (1...𝑁)))) → ((𝑤 ∪ 𝑡) ↾ (1...𝑁)) = 𝑡)
67	59, 66	mp3an3 1479	. . . . . . . . . . . . 13 ⊢ ((𝑤 ∈ (ℕ0 ↑m 𝑊) ∧ 𝑡 ∈ (ℕ0 ↑m (1...𝑁))) → ((𝑤 ∪ 𝑡) ↾ (1...𝑁)) = 𝑡)
68	67	ancoms 464	. . . . . . . . . . . 12 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) → ((𝑤 ∪ 𝑡) ↾ (1...𝑁)) = 𝑡)
69	65, 68	eqtr2id 2808	. . . . . . . . . . 11 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) → 𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)))
70	69	adantr 486	. . . . . . . . . 10 ⊢ (((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0) → 𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)))
71		simpr 490	. . . . . . . . . 10 ⊢ (((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0) → (𝑝‘(𝑡 ∪ 𝑤)) = 0)
72		reseq1 5960	. . . . . . . . . . . . 13 ⊢ (𝑢 = (𝑡 ∪ 𝑤) → (𝑢 ↾ (1...𝑁)) = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)))
73	72	eqeq2d 2771	. . . . . . . . . . . 12 ⊢ (𝑢 = (𝑡 ∪ 𝑤) → (𝑡 = (𝑢 ↾ (1...𝑁)) ↔ 𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁))))
74		fveqeq2 6882	. . . . . . . . . . . 12 ⊢ (𝑢 = (𝑡 ∪ 𝑤) → ((𝑝‘𝑢) = 0 ↔ (𝑝‘(𝑡 ∪ 𝑤)) = 0))
75	73, 74	anbi12d 644	. . . . . . . . . . 11 ⊢ (𝑢 = (𝑡 ∪ 𝑤) → ((𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) ↔ (𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0)))
76	75	rspcev 3576	. . . . . . . . . 10 ⊢ (((𝑡 ∪ 𝑤) ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁))) ∧ (𝑡 = ((𝑡 ∪ 𝑤) ↾ (1...𝑁)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0)) → ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0))
77	64, 70, 71, 76	syl12anc 850	. . . . . . . . 9 ⊢ (((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ 𝑤 ∈ (ℕ0 ↑m 𝑊)) ∧ (𝑝‘(𝑡 ∪ 𝑤)) = 0) → ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0))
78	77	r19.29an 3166	. . . . . . . 8 ⊢ ((𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0) → ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0))
79	44, 78	impbii 212	. . . . . . 7 ⊢ (∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0) ↔ (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0))
80	79	abbii 2827	. . . . . 6 ⊢ {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} = {𝑡 ∣ (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)}
81		df-rab 3413	. . . . . 6 ⊢ {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0} = {𝑡 ∣ (𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∧ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0)}
82	80, 81	eqtr4i 2786	. . . . 5 ⊢ {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0}
83	82	eqeq2i 2773	. . . 4 ⊢ (𝑆 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ↔ 𝑆 = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0})
84	83	rexbii 3109	. . 3 ⊢ (∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∣ ∃𝑢 ∈ (ℕ0 ↑m (𝑊 ∪ (1...𝑁)))(𝑡 = (𝑢 ↾ (1...𝑁)) ∧ (𝑝‘𝑢) = 0)} ↔ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0})
85	13, 84	bitrdi 290	. 2 ⊢ (𝑁 ∈ ℕ0 → (𝑆 ∈ (Dioph‘𝑁) ↔ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0}))
86	1, 85	biadanii 834	1 ⊢ (𝑆 ∈ (Dioph‘𝑁) ↔ (𝑁 ∈ ℕ0 ∧ ∃𝑝 ∈ (mzPoly‘(𝑊 ∪ (1...𝑁)))𝑆 = {𝑡 ∈ (ℕ0 ↑m (1...𝑁)) ∣ ∃𝑤 ∈ (ℕ0 ↑m 𝑊)(𝑝‘(𝑡 ∪ 𝑤)) = 0}))

This proof depends on syntax axioms:  ¬ wn 3   ↔ wb 209   ∧ wa 401   = wceq 1570   ∈ wcel 2145  {cab 2738  ∃wrex 3086  {crab 3412  Vcvv 3450   ∪ cun 3896   ∩ cin 3897   ⊆ wss 3898  ∅c0 4278   ↾ cres 5649   Fn wfn 6522  ⟶wf 6523  ‘cfv 6527  (class class class)co 7408   ↑_m cmap 8825  Fincfn 8951  0cc0 11172  1c1 11173  ℕcn 12305  ℕ₀cn0 12576  ...cfz 13609  mzPolycmzp 43671  Diophcdioph 43704

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 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7734  ax-cnex 11228  ax-resscn 11229  ax-1cn 11230  ax-icn 11231  ax-addcl 11232  ax-addrcl 11233  ax-mulcl 11234  ax-mulrcl 11235  ax-mulcom 11236  ax-addass 11237  ax-mulass 11238  ax-distr 11239  ax-i2m1 11240  ax-1ne0 11241  ax-1rid 11242  ax-rnegex 11243  ax-rrecex 11244  ax-cnre 11245  ax-pre-lttri 11246  ax-pre-lttrn 11247  ax-pre-ltadd 11248  ax-pre-mulgt0 11249

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 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6293  df-ord 6354  df-on 6355  df-lim 6356  df-suc 6357  df-iota 6483  df-fun 6529  df-fn 6530  df-f 6531  df-f1 6532  df-fo 6533  df-f1o 6534  df-fv 6535  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-of 7676  df-om 7861  df-1st 7984  df-2nd 7985  df-frecs 8277  df-wrecs 8308  df-recs 8357  df-rdg 8396  df-1o 8454  df-oadd 8458  df-er 8695  df-map 8827  df-en 8952  df-dom 8953  df-sdom 8954  df-fin 8955  df-dju 9954  df-card 9992  df-pnf 11317  df-mnf 11318  df-xr 11319  df-ltxr 11320  df-le 11321  df-sub 11515  df-neg 11516  df-nn 12306  df-n0 12577  df-z 12664  df-uz 12936  df-fz 13610  df-hash 14443  df-mzpcl 43672  df-mzp 43673  df-dioph 43705

This theorem is used by:  eldioph4i  43757  diophren  43758