Theorem kmlem12 10097

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 4075	. . . . . . 7 ⊢ (𝑡 = 𝑧 → (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) = (𝑧 ∖ ∪ (𝑥 ∖ {𝑡})))
2		sneq 4596	. . . . . . . . . 10 ⊢ (𝑡 = 𝑧 → {𝑡} = {𝑧})
3	2	difeq2d 4082	. . . . . . . . 9 ⊢ (𝑡 = 𝑧 → (𝑥 ∖ {𝑡}) = (𝑥 ∖ {𝑧}))
4	3	unieqd 4879	. . . . . . . 8 ⊢ (𝑡 = 𝑧 → ∪ (𝑥 ∖ {𝑡}) = ∪ (𝑥 ∖ {𝑧}))
5	4	difeq2d 4082	. . . . . . 7 ⊢ (𝑡 = 𝑧 → (𝑧 ∖ ∪ (𝑥 ∖ {𝑡})) = (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})))
6	1, 5	eqtrd 2776	. . . . . 6 ⊢ (𝑡 = 𝑧 → (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) = (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})))
7	6	neeq1d 3003	. . . . 5 ⊢ (𝑡 = 𝑧 → ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ ↔ (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅))
8	7	cbvralvw 3225	. . . 4 ⊢ (∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ ↔ ∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅)
9	6	ineq1d 4171	. . . . . . 7 ⊢ (𝑡 = 𝑧 → ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦) = ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦))
10	9	eleq2d 2823	. . . . . 6 ⊢ (𝑡 = 𝑧 → (𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦)))
11	10	eubidv 2584	. . . . 5 ⊢ (𝑡 = 𝑧 → (∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦)))
12	11	cbvralvw 3225	. . . 4 ⊢ (∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦) ↔ ∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦))
13	8, 12	imbi12i 350	. . 3 ⊢ ((∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)) ↔ (∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦)))
14		in12 4180	. . . . . . . . . 10 ⊢ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)) = (𝑦 ∩ (𝑧 ∩ ∪ 𝐴))
15		incom 4161	. . . . . . . . . 10 ⊢ (𝑦 ∩ (𝑧 ∩ ∪ 𝐴)) = ((𝑧 ∩ ∪ 𝐴) ∩ 𝑦)
16	14, 15	eqtri 2764	. . . . . . . . 9 ⊢ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)) = ((𝑧 ∩ ∪ 𝐴) ∩ 𝑦)
17		kmlem9.1	. . . . . . . . . . 11 ⊢ 𝐴 = {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))}
18	17	kmlem11 10096	. . . . . . . . . 10 ⊢ (𝑧 ∈ 𝑥 → (𝑧 ∩ ∪ 𝐴) = (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})))
19	18	ineq1d 4171	. . . . . . . . 9 ⊢ (𝑧 ∈ 𝑥 → ((𝑧 ∩ ∪ 𝐴) ∩ 𝑦) = ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦))
20	16, 19	eqtr2id 2789	. . . . . . . 8 ⊢ (𝑧 ∈ 𝑥 → ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) = (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))
21	20	eleq2d 2823	. . . . . . 7 ⊢ (𝑧 ∈ 𝑥 → (𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) ↔ 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴))))
22	21	eubidv 2584	. . . . . 6 ⊢ (𝑧 ∈ 𝑥 → (∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴))))
23		ax-1 6	. . . . . 6 ⊢ (∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴))))
24	22, 23	syl6bi 252	. . . . 5 ⊢ (𝑧 ∈ 𝑥 → (∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))))
25	24	ralimia 3083	. . . 4 ⊢ (∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦) → ∀𝑧 ∈ 𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴))))
26	25	imim2i 16	. . 3 ⊢ ((∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ∩ 𝑦)) → (∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧 ∈ 𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))))
27	13, 26	sylbi 216	. 2 ⊢ ((∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)) → (∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → ∀𝑧 ∈ 𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))))
28	17	raleqi 3311	. . . 4 ⊢ (∀𝑧 ∈ 𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) ↔ ∀𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)))
29		df-ral 3065	. . . 4 ⊢ (∀𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) ↔ ∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
30		vex 3449	. . . . . . . . 9 ⊢ 𝑧 ∈ V
31		eqeq1 2740	. . . . . . . . . 10 ⊢ (𝑢 = 𝑧 → (𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ↔ 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))))
32	31	rexbidv 3175	. . . . . . . . 9 ⊢ (𝑢 = 𝑧 → (∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ↔ ∃𝑡 ∈ 𝑥 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))))
33	30, 32	elab 3630	. . . . . . . 8 ⊢ (𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} ↔ ∃𝑡 ∈ 𝑥 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})))
34	33	imbi1i 349	. . . . . . 7 ⊢ ((𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ (∃𝑡 ∈ 𝑥 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
35		r19.23v 3179	. . . . . . 7 ⊢ (∀𝑡 ∈ 𝑥 (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ (∃𝑡 ∈ 𝑥 𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
36	34, 35	bitr4i 277	. . . . . 6 ⊢ ((𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑡 ∈ 𝑥 (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
37	36	albii 1821	. . . . 5 ⊢ (∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑧∀𝑡 ∈ 𝑥 (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
38		ralcom4 3269	. . . . 5 ⊢ (∀𝑡 ∈ 𝑥 ∀𝑧(𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑧∀𝑡 ∈ 𝑥 (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))))
39		vex 3449	. . . . . . . 8 ⊢ 𝑡 ∈ V
40	39	difexi 5285	. . . . . . 7 ⊢ (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∈ V
41		neeq1 3006	. . . . . . . 8 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ ↔ (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅))
42		ineq1 4165	. . . . . . . . . 10 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ∩ 𝑦) = ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦))
43	42	eleq2d 2823	. . . . . . . . 9 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑣 ∈ (𝑧 ∩ 𝑦) ↔ 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
44	43	eubidv 2584	. . . . . . . 8 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦) ↔ ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
45	41, 44	imbi12d 344	. . . . . . 7 ⊢ (𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → ((𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) ↔ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦))))
46	40, 45	ceqsalv 3481	. . . . . 6 ⊢ (∀𝑧(𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
47	46	ralbii 3096	. . . . 5 ⊢ (∀𝑡 ∈ 𝑥 ∀𝑧(𝑧 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑡 ∈ 𝑥 ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
48	37, 38, 47	3bitr2i 298	. . . 4 ⊢ (∀𝑧(𝑧 ∈ {𝑢 ∣ ∃𝑡 ∈ 𝑥 𝑢 = (𝑡 ∖ ∪ (𝑥 ∖ {𝑡}))} → (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦))) ↔ ∀𝑡 ∈ 𝑥 ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
49	28, 29, 48	3bitri 296	. . 3 ⊢ (∀𝑧 ∈ 𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) ↔ ∀𝑡 ∈ 𝑥 ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
50		ralim 3089	. . 3 ⊢ (∀𝑡 ∈ 𝑥 ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)) → (∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
51	49, 50	sylbi 216	. 2 ⊢ (∀𝑧 ∈ 𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) → (∀𝑡 ∈ 𝑥 (𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ≠ ∅ → ∀𝑡 ∈ 𝑥 ∃!𝑣 𝑣 ∈ ((𝑡 ∖ ∪ (𝑥 ∖ {𝑡})) ∩ 𝑦)))
52	27, 51	syl11 33	1 ⊢ (∀𝑧 ∈ 𝑥 (𝑧 ∖ ∪ (𝑥 ∖ {𝑧})) ≠ ∅ → (∀𝑧 ∈ 𝐴 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ 𝑦)) → ∀𝑧 ∈ 𝑥 (𝑧 ≠ ∅ → ∃!𝑣 𝑣 ∈ (𝑧 ∩ (𝑦 ∩ ∪ 𝐴)))))

Syntax hints:   → wi 4  ∀wal 1539   = wceq 1541   ∈ wcel 2106  ∃!weu 2566  {cab 2713   ≠ wne 2943  ∀wral 3064  ∃wrex 3073   ∖ cdif 3907   ∩ cin 3909  ∅c0 4282  {csn 4586  ∪ cuni 4865

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-11 2154  ax-ext 2707  ax-sep 5256

This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-tru 1544  df-fal 1554  df-ex 1782  df-sb 2068  df-mo 2538  df-eu 2567  df-clab 2714  df-cleq 2728  df-clel 2814  df-ne 2944  df-ral 3065  df-rex 3074  df-rab 3408  df-v 3447  df-dif 3913  df-un 3915  df-in 3917  df-ss 3927  df-nul 4283  df-sn 4587  df-uni 4866  df-iun 4956

This theorem is referenced by:  kmlem13  10098