Theorem reusv2lem4 4872

Description: Lemma for reusv2 4874. (Contributed by NM, 13-Dec-2012.)

Assertion

Ref	Expression
reusv2lem4	⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))

Distinct variable groups:   𝑥,𝑦,𝐴   𝑥,𝐵   𝑥,𝐶   𝜑,𝑥

Allowed substitution hints:   𝜑(𝑦)   𝐵(𝑦)   𝐶(𝑦)

Proof of Theorem reusv2lem4

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		df-reu 2919	. 2 ⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥(𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)))
2		anass 681	. . . . . 6 ⊢ (((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) ∧ 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 ∧ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶)))
3		rabid 3116	. . . . . . 7 ⊢ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ↔ (𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)))
4	3	anbi1i 731	. . . . . 6 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ∧ 𝑥 = 𝐶) ↔ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) ∧ 𝑥 = 𝐶))
5		anass 681	. . . . . . . 8 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶) ↔ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)))
6		eleq1 2689	. . . . . . . . . 10 ⊢ (𝑥 = 𝐶 → (𝑥 ∈ 𝐴 ↔ 𝐶 ∈ 𝐴))
7	6	anbi1d 741	. . . . . . . . 9 ⊢ (𝑥 = 𝐶 → ((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ (𝐶 ∈ 𝐴 ∧ 𝜑)))
8	7	pm5.32ri 670	. . . . . . . 8 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶) ↔ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶))
9	5, 8	bitr3i 266	. . . . . . 7 ⊢ ((𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶))
10	9	anbi2i 730	. . . . . 6 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶))) ↔ (𝑦 ∈ 𝐵 ∧ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶)))
11	2, 4, 10	3bitr4ri 293	. . . . 5 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶))) ↔ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ∧ 𝑥 = 𝐶))
12	11	rexbii2 3039	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = 𝐶)
13		r19.42v 3092	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ (𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)))
14		nfrab1 3122	. . . . 5 ⊢ Ⅎ𝑦{𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
15		nfcv 2764	. . . . 5 ⊢ Ⅎ𝑧{𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
16		nfv 1843	. . . . 5 ⊢ Ⅎ𝑧 𝑥 = 𝐶
17		nfcsb1v 3549	. . . . . 6 ⊢ Ⅎ𝑦⦋𝑧 / 𝑦⦌𝐶
18	17	nfeq2 2780	. . . . 5 ⊢ Ⅎ𝑦 𝑥 = ⦋𝑧 / 𝑦⦌𝐶
19		csbeq1a 3542	. . . . . 6 ⊢ (𝑦 = 𝑧 → 𝐶 = ⦋𝑧 / 𝑦⦌𝐶)
20	19	eqeq2d 2632	. . . . 5 ⊢ (𝑦 = 𝑧 → (𝑥 = 𝐶 ↔ 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
21	14, 15, 16, 18, 20	cbvrexf 3166	. . . 4 ⊢ (∃𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = 𝐶 ↔ ∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
22	12, 13, 21	3bitr3i 290	. . 3 ⊢ ((𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
23	22	eubii 2492	. 2 ⊢ (∃!𝑥(𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
24		elex 3212	. . . . . . . 8 ⊢ (𝐶 ∈ 𝐴 → 𝐶 ∈ V)
25	24	ad2antrl 764	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝐶 ∈ V)
26	3, 25	sylbi 207	. . . . . 6 ⊢ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝐶 ∈ V)
27	26	rgen 2922	. . . . 5 ⊢ ∀𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝐶 ∈ V
28		nfv 1843	. . . . . 6 ⊢ Ⅎ𝑧 𝐶 ∈ V
29	17	nfel1 2779	. . . . . 6 ⊢ Ⅎ𝑦⦋𝑧 / 𝑦⦌𝐶 ∈ V
30	19	eleq1d 2686	. . . . . 6 ⊢ (𝑦 = 𝑧 → (𝐶 ∈ V ↔ ⦋𝑧 / 𝑦⦌𝐶 ∈ V))
31	14, 15, 28, 29, 30	cbvralf 3165	. . . . 5 ⊢ (∀𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝐶 ∈ V ↔ ∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V)
32	27, 31	mpbi 220	. . . 4 ⊢ ∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V
33		reusv2lem3 4871	. . . 4 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V → (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
34	32, 33	ax-mp 5	. . 3 ⊢ (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
35		df-ral 2917	. . . . 5 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∀𝑧(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
36		nfv 1843	. . . . . 6 ⊢ Ⅎ𝑧(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶)
37	14	nfcri 2758	. . . . . . 7 ⊢ Ⅎ𝑦 𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
38	37, 18	nfim 1825	. . . . . 6 ⊢ Ⅎ𝑦(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
39		eleq1 2689	. . . . . . 7 ⊢ (𝑦 = 𝑧 → (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ↔ 𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}))
40	39, 20	imbi12d 334	. . . . . 6 ⊢ (𝑦 = 𝑧 → ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ (𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶)))
41	36, 38, 40	cbval 2271	. . . . 5 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑧(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
42	3	imbi1i 339	. . . . . . . 8 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝑥 = 𝐶))
43		impexp 462	. . . . . . . 8 ⊢ (((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
44	42, 43	bitri 264	. . . . . . 7 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
45	44	albii 1747	. . . . . 6 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑦(𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
46		df-ral 2917	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶) ↔ ∀𝑦(𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
47	45, 46	bitr4i 267	. . . . 5 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
48	35, 41, 47	3bitr2i 288	. . . 4 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
49	48	eubii 2492	. . 3 ⊢ (∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
50	34, 49	bitri 264	. 2 ⊢ (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
51	1, 23, 50	3bitri 286	1 ⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))

Syntax hints:   → wi 4   ↔ wb 196   ∧ wa 384  ∀wal 1481   = wceq 1483   ∈ wcel 1990  ∃!weu 2470  ∀wral 2912  ∃wrex 2913  ∃!wreu 2914  {crab 2916  Vcvv 3200  ⦋csb 3533

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-nul 4789  ax-pow 4843

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-ral 2917  df-rex 2918  df-reu 2919  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-nul 3916

This theorem is referenced by:  reusv2lem5  4873