Theorem reusv2lem4 4798

Description: Lemma for reusv2 4800. (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 2903	. 2 ⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥(𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)))
2		anass 679	. . . . . 6 ⊢ (((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) ∧ 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 ∧ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶)))
3		rabid 3095	. . . . . . 7 ⊢ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ↔ (𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)))
4	3	anbi1i 727	. . . . . 6 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ∧ 𝑥 = 𝐶) ↔ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) ∧ 𝑥 = 𝐶))
5		anass 679	. . . . . . . 8 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶) ↔ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)))
6		eleq1 2676	. . . . . . . . . 10 ⊢ (𝑥 = 𝐶 → (𝑥 ∈ 𝐴 ↔ 𝐶 ∈ 𝐴))
7	6	anbi1d 737	. . . . . . . . 9 ⊢ (𝑥 = 𝐶 → ((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ (𝐶 ∈ 𝐴 ∧ 𝜑)))
8	7	pm5.32ri 668	. . . . . . . 8 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶) ↔ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶))
9	5, 8	bitr3i 265	. . . . . . 7 ⊢ ((𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶))
10	9	anbi2i 726	. . . . . 6 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶))) ↔ (𝑦 ∈ 𝐵 ∧ ((𝐶 ∈ 𝐴 ∧ 𝜑) ∧ 𝑥 = 𝐶)))
11	2, 4, 10	3bitr4ri 292	. . . . 5 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶))) ↔ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ∧ 𝑥 = 𝐶))
12	11	rexbii2 3021	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = 𝐶)
13		r19.42v 3073	. . . 4 ⊢ (∃𝑦 ∈ 𝐵 (𝑥 ∈ 𝐴 ∧ (𝜑 ∧ 𝑥 = 𝐶)) ↔ (𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)))
14		nfrab1 3099	. . . . 5 ⊢ Ⅎ𝑦{𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
15		nfcv 2751	. . . . 5 ⊢ Ⅎ𝑧{𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
16		nfv 1830	. . . . 5 ⊢ Ⅎ𝑧 𝑥 = 𝐶
17		nfcsb1v 3515	. . . . . 6 ⊢ Ⅎ𝑦⦋𝑧 / 𝑦⦌𝐶
18	17	nfeq2 2766	. . . . 5 ⊢ Ⅎ𝑦 𝑥 = ⦋𝑧 / 𝑦⦌𝐶
19		csbeq1a 3508	. . . . . 6 ⊢ (𝑦 = 𝑧 → 𝐶 = ⦋𝑧 / 𝑦⦌𝐶)
20	19	eqeq2d 2620	. . . . 5 ⊢ (𝑦 = 𝑧 → (𝑥 = 𝐶 ↔ 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
21	14, 15, 16, 18, 20	cbvrexf 3142	. . . 4 ⊢ (∃𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = 𝐶 ↔ ∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
22	12, 13, 21	3bitr3i 289	. . 3 ⊢ ((𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
23	22	eubii 2480	. 2 ⊢ (∃!𝑥(𝑥 ∈ 𝐴 ∧ ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶)) ↔ ∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
24		elex 3185	. . . . . . . 8 ⊢ (𝐶 ∈ 𝐴 → 𝐶 ∈ V)
25	24	ad2antrl 760	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝐶 ∈ V)
26	3, 25	sylbi 206	. . . . . 6 ⊢ (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝐶 ∈ V)
27	26	rgen 2906	. . . . 5 ⊢ ∀𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝐶 ∈ V
28		nfv 1830	. . . . . 6 ⊢ Ⅎ𝑧 𝐶 ∈ V
29	17	nfel1 2765	. . . . . 6 ⊢ Ⅎ𝑦⦋𝑧 / 𝑦⦌𝐶 ∈ V
30	19	eleq1d 2672	. . . . . 6 ⊢ (𝑦 = 𝑧 → (𝐶 ∈ V ↔ ⦋𝑧 / 𝑦⦌𝐶 ∈ V))
31	14, 15, 28, 29, 30	cbvralf 3141	. . . . 5 ⊢ (∀𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝐶 ∈ V ↔ ∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V)
32	27, 31	mpbi 219	. . . 4 ⊢ ∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V
33		reusv2lem3 4797	. . . 4 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}⦋𝑧 / 𝑦⦌𝐶 ∈ V → (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
34	32, 33	ax-mp 5	. . 3 ⊢ (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
35		df-ral 2901	. . . . 5 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∀𝑧(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
36		nfv 1830	. . . . . 6 ⊢ Ⅎ𝑧(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶)
37	14	nfcri 2745	. . . . . . 7 ⊢ Ⅎ𝑦 𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}
38	37, 18	nfim 1813	. . . . . 6 ⊢ Ⅎ𝑦(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶)
39		eleq1 2676	. . . . . . 7 ⊢ (𝑦 = 𝑧 → (𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} ↔ 𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}))
40	39, 20	imbi12d 333	. . . . . 6 ⊢ (𝑦 = 𝑧 → ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ (𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶)))
41	36, 38, 40	cbval 2259	. . . . 5 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑧(𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = ⦋𝑧 / 𝑦⦌𝐶))
42	3	imbi1i 338	. . . . . . . 8 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝑥 = 𝐶))
43		impexp 461	. . . . . . . 8 ⊢ (((𝑦 ∈ 𝐵 ∧ (𝐶 ∈ 𝐴 ∧ 𝜑)) → 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
44	42, 43	bitri 263	. . . . . . 7 ⊢ ((𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ (𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
45	44	albii 1737	. . . . . 6 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑦(𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
46		df-ral 2901	. . . . . 6 ⊢ (∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶) ↔ ∀𝑦(𝑦 ∈ 𝐵 → ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶)))
47	45, 46	bitr4i 266	. . . . 5 ⊢ (∀𝑦(𝑦 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)} → 𝑥 = 𝐶) ↔ ∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
48	35, 41, 47	3bitr2i 287	. . . 4 ⊢ (∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
49	48	eubii 2480	. . 3 ⊢ (∃!𝑥∀𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
50	34, 49	bitri 263	. 2 ⊢ (∃!𝑥∃𝑧 ∈ {𝑦 ∈ 𝐵 ∣ (𝐶 ∈ 𝐴 ∧ 𝜑)}𝑥 = ⦋𝑧 / 𝑦⦌𝐶 ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))
51	1, 23, 50	3bitri 285	1 ⊢ (∃!𝑥 ∈ 𝐴 ∃𝑦 ∈ 𝐵 (𝜑 ∧ 𝑥 = 𝐶) ↔ ∃!𝑥∀𝑦 ∈ 𝐵 ((𝐶 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝐶))

Syntax hints:   → wi 4   ↔ wb 195   ∧ wa 383  ∀wal 1473   = wceq 1475   ∈ wcel 1977  ∃!weu 2458  ∀wral 2896  ∃wrex 2897  ∃!wreu 2898  {crab 2900  Vcvv 3173  ⦋csb 3499

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-nul 4717  ax-pow 4769

This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-tru 1478  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-ral 2901  df-rex 2902  df-reu 2903  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-nul 3875

This theorem is referenced by:  reusv2lem5  4799