Theorem reusv2lem4 5362

Description: Lemma for reusv2 5364. (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 3366	. 2 ⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥(𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)))
2		anass 474	. . . . . 6 ⊢ (((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) ∧ 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 ∧ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶)))
3		rabid 3432	. . . . . . 7 ⊢ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ↔ (𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)))
4	3	anbi1i 636	. . . . . 6 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ∧ 𝑥 = 𝐶) ↔ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) ∧ 𝑥 = 𝐶))
5		anass 474	. . . . . . . 8 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶) ↔ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)))
6		eleq1 2848	. . . . . . . . . 10 ⊢ (𝑥 = 𝐶 → (𝑥 ∈ 𝐴 ↔ 𝐶 ∈ 𝐴))
7	6	anbi1d 643	. . . . . . . . 9 ⊢ (𝑥 = 𝐶 → ((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ (𝐶 ∈ 𝐴 ∧ 𝜑)))
8	7	pm5.32ri 586	. . . . . . . 8 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶) ↔ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶))
9	5, 8	bitr3i 280	. . . . . . 7 ⊢ ((𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶))
10	9	anbi2i 635	. . . . . 6 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶))) ↔ (𝑦 ∈ 𝐵 ∧ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶)))
11	2, 4, 10	3bitr4ri 307	. . . . 5 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶))) ↔ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ∧ 𝑥 = 𝐶))
12	11	rexbii2 3105	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = 𝐶)
13		r19.42v 3194	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ (𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)))
14		nfrab1 3431	. . . . 5 ⊢ Ⅎ𝑦{𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
15		nfcv 2922	. . . . 5 ⊢ Ⅎ𝑧{𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
16		nfv 1946	. . . . 5 ⊢ Ⅎ𝑧 𝑥 = 𝐶
17		nfcsb1v 3870	. . . . . 6 ⊢ Ⅎ𝑦⦋𝑧 / 𝑦⦌𝐶
18	17	nfeq2 2939	. . . . 5 ⊢ Ⅎ𝑦 𝑥 = ⦋𝑧 / 𝑦⦌𝐶
19		csbeq1a 3860	. . . . . 6 ⊢ (𝑦 = 𝑧 → 𝐶 = ⦋𝑧 / 𝑦⦌𝐶)
20	19	eqeq2d 2771	. . . . 5 ⊢ (𝑦 = 𝑧 → (𝑥 = 𝐶 ↔ 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
21	14, 15, 16, 18, 20	cbvrexfw 3303	. . . 4 ⊢ (∃𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = 𝐶 ↔ ∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
22	12, 13, 21	3bitr3i 304	. . 3 ⊢ ((𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
23	22	eubii 2610	. 2 ⊢ (∃!𝑥(𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
24		elex 3471	. . . . . . . 8 ⊢ (𝐶 ∈ 𝐴 → 𝐶 ∈ V)
25	24	ad2antrl 741	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝐶 ∈ V)
26	3, 25	sylbi 220	. . . . . 6 ⊢ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝐶 ∈ V)
27	26	rgen 3078	. . . . 5 ⊢ ∀𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝐶 ∈ V
28		nfv 1946	. . . . . 6 ⊢ Ⅎ𝑧 𝐶 ∈ V
29	17	nfel1 2938	. . . . . 6 ⊢ Ⅎ𝑦⦋𝑧 / 𝑦⦌𝐶 ∈ V
30	19	eleq1d 2845	. . . . . 6 ⊢ (𝑦 = 𝑧 → (𝐶 ∈ V ↔ ⦋𝑧 / 𝑦⦌𝐶 ∈ V))
31	14, 15, 28, 29, 30	cbvralfw 3302	. . . . 5 ⊢ (∀𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝐶 ∈ V ↔ ∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V)
32	27, 31	mpbi 233	. . . 4 ⊢ ∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V
33		reusv2lem3 5361	. . . 4 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V → (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
34	32, 33	ax-mp 5	. . 3 ⊢ (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
35		df-ral 3077	. . . . 5 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∀𝑧(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
36		nfv 1946	. . . . . 6 ⊢ Ⅎ𝑧(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶)
37	14	nfcri 2914	. . . . . . 7 ⊢ Ⅎ𝑦 𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
38	37, 18	nfim 1928	. . . . . 6 ⊢ Ⅎ𝑦(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
39		eleq1 2848	. . . . . . 7 ⊢ (𝑦 = 𝑧 → (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ↔ 𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}))
40	39, 20	imbi12d 347	. . . . . 6 ⊢ (𝑦 = 𝑧 → ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ (𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶)))
41	36, 38, 40	cbvalv1 2370	. . . . 5 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑧(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
42	3	imbi1i 352	. . . . . . . 8 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝑥 = 𝐶))
43		impexp 456	. . . . . . . 8 ⊢ (((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
44	42, 43	bitri 278	. . . . . . 7 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
45	44	albii 1851	. . . . . 6 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑦(𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
46		df-ral 3077	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶) ↔ ∀𝑦(𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
47	45, 46	bitr4i 281	. . . . 5 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
48	35, 41, 47	3bitr2i 302	. . . 4 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
49	48	eubii 2610	. . 3 ⊢ (∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
50	34, 49	bitri 278	. 2 ⊢ (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
51	1, 23, 50	3bitri 300	1 ⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401  ∀wal 1567   = wceq 1569   ∈ wcel 2144  ∃!weu 2593  ∀wral 3076  ∃wrex 3086  ∃!wreu 3363  {crab 3412  Vcvv 3450  ⦋csb 3846

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1827  ax-4 1841  ax-5 1942  ax-6 1999  ax-7 2040  ax-8 2146  ax-9 2154  ax-10 2177  ax-11 2193  ax-12 2212  ax-ext 2732  ax-nul 5259  ax-pow 5326

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-tru 1572  df-fal 1582  df-ex 1812  df-nf 1816  df-sb 2099  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-ral 3077  df-rex 3087  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-dif 4047  df-nul 4279

This theorem is used by:  reusv2lem5  5363