Theorem kmlem12 10164

Description: Lemma for 5-quantifier AC of Kurt Maes, Th. 4, part of 3 => 4. (Contributed by NM, 27-Mar-2004.)

Hypothesis

Ref	Expression
kmlem9.1	⊢ 𝐴 = {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))}

Assertion

Ref	Expression
kmlem12	⊢ (∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → (∀𝑧 ∈ 𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) → ∀𝑧 ∈ 𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))))

Distinct variable groups:   𝑥,𝑦,𝑧,𝑣,𝑢,𝑡   𝑦,𝐴,𝑧,𝑣

Allowed substitution hints:   𝐴(𝑥, 𝑢, 𝑡)

Proof of Theorem kmlem12

Step	Hyp	Ref	Expression
1		difeq1 4077	. . . . . . 7 ⊢ (𝑡 = 𝑧 → (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) = (𝑧 ∖ ∪ (𝑥 ∖ {𝑡})))
2		sneq 4604	. . . . . . . . . 10 ⊢ (𝑡 = 𝑧 → {𝑡} = {𝑧})
3	2	difeq2d 4084	. . . . . . . . 9 ⊢ (𝑡 = 𝑧 → (𝑥 ∖ {𝑡}) = (𝑥 ∖ {𝑧}))
4	3	unieqd 4890	. . . . . . . 8 ⊢ (𝑡 = 𝑧 → ∪ (𝑥 ∖ {𝑡}) = ∪ (𝑥 ∖ {𝑧}))
5	4	difeq2d 4084	. . . . . . 7 ⊢ (𝑡 = 𝑧 → (𝑧 ∖ ∪ (𝑥 ∖ {𝑡})) = (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})))
6	1, 5	eqtrd 2801	. . . . . 6 ⊢ (𝑡 = 𝑧 → (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) = (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})))
7	6	neeq1d 3020	. . . . 5 ⊢ (𝑡 = 𝑧 → ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ ↔ (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅))
8	7	cbvralvw 3246	. . . 4 ⊢ (∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ ↔ ∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅)
9	6	ineq1d 4175	. . . . . . 7 ⊢ (𝑡 = 𝑧 → ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦) = ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦))
10	9	eleq2d 2852	. . . . . 6 ⊢ (𝑡 = 𝑧 → (𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦)))
11	10	eubidv 2617	. . . . 5 ⊢ (𝑡 = 𝑧 → (∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦)))
12	11	cbvralvw 3246	. . . 4 ⊢ (∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ ∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦))
13	8, 12	imbi12i 353	. . 3 ⊢ ((∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)) ↔ (∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦)))
14		in12 4184	. . . . . . . . . 10 ⊢ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)) = (𝑦 ∩ (𝑧 ∩ ∪ 𝐴))
15		incom 4165	. . . . . . . . . 10 ⊢ (𝑦 ∩ (𝑧 ∩ ∪ 𝐴)) = ((𝑧 ∩ ∪ 𝐴) ∩ 𝑦)
16	14, 15	eqtri 2789	. . . . . . . . 9 ⊢ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)) = ((𝑧 ∩ ∪ 𝐴) ∩ 𝑦)
17		kmlem9.1	. . . . . . . . . . 11 ⊢ 𝐴 = {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))}
18	17	kmlem11 10163	. . . . . . . . . 10 ⊢ (𝑧 ∈ 𝑥 → (𝑧 ∩ ∪ 𝐴) = (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})))
19	18	ineq1d 4175	. . . . . . . . 9 ⊢ (𝑧 ∈ 𝑥 → ((𝑧 ∩ ∪ 𝐴) ∩ 𝑦) = ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦))
20	16, 19	eqtr2id 2814	. . . . . . . 8 ⊢ (𝑧 ∈ 𝑥 → ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) = (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))
21	20	eleq2d 2852	. . . . . . 7 ⊢ (𝑧 ∈ 𝑥 → (𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) ↔ 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴))))
22	21	eubidv 2617	. . . . . 6 ⊢ (𝑧 ∈ 𝑥 → (∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴))))
23		ax-1 6	. . . . . 6 ⊢ (∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴))))
24	22, 23	biimtrdi 256	. . . . 5 ⊢ (𝑧 ∈ 𝑥 → (∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))))
25	24	ralimia 3102	. . . 4 ⊢ (∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) → ∀𝑧 ∈ 𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴))))
26	25	imim2i 17	. . 3 ⊢ ((∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦)) → (∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧 ∈ 𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))))
27	13, 26	sylbi 220	. 2 ⊢ ((∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)) → (∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧 ∈ 𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))))
28	17	raleqi 3324	. . . 4 ⊢ (∀𝑧 ∈ 𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) ↔ ∀𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)))
29		df-ral 3083	. . . 4 ⊢ (∀𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) ↔ ∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
30		vex 3462	. . . . . . . . 9 ⊢ 𝑧 ∈ V
31		eqeq1 2770	. . . . . . . . . 10 ⊢ (𝑢 = 𝑧 → (𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ↔ 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))))
32	31	rexbidv 3192	. . . . . . . . 9 ⊢ (𝑢 = 𝑧 → (∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ↔ ∃𝑡 ∈ 𝑥 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))))
33	30, 32	elab 3641	. . . . . . . 8 ⊢ (𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} ↔ ∃𝑡 ∈ 𝑥 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})))
34	33	imbi1i 352	. . . . . . 7 ⊢ ((𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ (∃𝑡 ∈ 𝑥 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
35		r19.23v 3195	. . . . . . 7 ⊢ (∀𝑡 ∈ 𝑥 (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ (∃𝑡 ∈ 𝑥 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
36	34, 35	bitr4i 281	. . . . . 6 ⊢ ((𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑡 ∈ 𝑥 (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
37	36	albii 1852	. . . . 5 ⊢ (∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑧∀𝑡 ∈ 𝑥 (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
38		ralcom4 3294	. . . . 5 ⊢ (∀𝑡 ∈ 𝑥 ∀𝑧(𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑧∀𝑡 ∈ 𝑥 (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
39		vex 3462	. . . . . . . 8 ⊢ 𝑡 ∈ V
40	39	difexi 5306	. . . . . . 7 ⊢ (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∈ V
41		neeq1 3023	. . . . . . . 8 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ ↔ (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅))
42		ineq1 4169	. . . . . . . . . 10 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ∩ 𝑦) = ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦))
43	42	eleq2d 2852	. . . . . . . . 9 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑣 ∈ (𝑧 ∩ 𝑦) ↔ 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
44	43	eubidv 2617	. . . . . . . 8 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
45	41, 44	imbi12d 347	. . . . . . 7 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → ((𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) ↔ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦))))
46	40, 45	ceqsalv 3497	. . . . . 6 ⊢ (∀𝑧(𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
47	46	ralbii 3114	. . . . 5 ⊢ (∀𝑡 ∈ 𝑥 ∀𝑧(𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑡 ∈ 𝑥 ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
48	37, 38, 47	3bitr2i 302	. . . 4 ⊢ (∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑡 ∈ 𝑥 ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
49	28, 29, 48	3bitri 300	. . 3 ⊢ (∀𝑧 ∈ 𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) ↔ ∀𝑡 ∈ 𝑥 ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
50		ralim 3108	. . 3 ⊢ (∀𝑡 ∈ 𝑥 ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)) → (∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
51	49, 50	sylbi 220	. 2 ⊢ (∀𝑧 ∈ 𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) → (∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
52	27, 51	syl11 34	1 ⊢ (∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → (∀𝑧 ∈ 𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) → ∀𝑧 ∈ 𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))))

This proof depends on syntax axioms:   → wi 4  ∀wal 1568   = wceq 1570   ∈ wcel 2146  ∃!weu 2599  {cab 2744   ≠ wne 2961  ∀wral 3082  ∃wrex 3092   ∖ cdif 3905   ∩ cin 3907  ∅c0 4289  {csn 4594  ∪ cuni 4877

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 2148  ax-9 2156  ax-11 2195  ax-ext 2738  ax-sep 5262

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-sb 2100  df-mo 2570  df-eu 2600  df-clab 2745  df-cleq 2758  df-clel 2841  df-ne 2962  df-ral 3083  df-rex 3093  df-rab 3420  df-v 3460  df-dif 3911  df-un 3913  df-in 3915  df-ss 3925  df-nul 4290  df-sn 4595  df-uni 4878  df-iun 4963

This theorem is used by:  kmlem13  10165