Theorem reu6 3689

Description: A way to express restricted uniqueness. (Contributed by NM, 20-Oct-2006.)

Assertion

Ref	Expression
reu6	⊢ (∃!𝑥 ∈ 𝐴 𝜑 ↔ ∃𝑦 ∈ 𝐴 ∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝑦))

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

Allowed substitution hint:   𝜑(𝑥)

Proof of Theorem reu6

Step	Hyp	Ref	Expression
1		df-reu 3370	. 2 ⊢ (∃!𝑥 ∈ 𝐴 𝜑 ↔ ∃!𝑥(𝑥 ∈ 𝐴 ∧ 𝜑))
2		19.28v 2026	. . . . 5 ⊢ (∀𝑥(𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) ↔ (𝑦 ∈ 𝐴 ∧ ∀𝑥(𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))))
3		eleq1w 2846	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑦 → (𝑥 ∈ 𝐴 ↔ 𝑦 ∈ 𝐴))
4		sbequ12 2287	. . . . . . . . . . . 12 ⊢ (𝑥 = 𝑦 → (𝜑 ↔ [𝑦 / 𝑥]𝜑))
5	3, 4	anbi12d 643	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → ((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ (𝑦 ∈ 𝐴 ∧ [𝑦 / 𝑥]𝜑)))
6		equequ1 2055	. . . . . . . . . . 11 ⊢ (𝑥 = 𝑦 → (𝑥 = 𝑦 ↔ 𝑦 = 𝑦))
7	5, 6	bibi12d 348	. . . . . . . . . 10 ⊢ (𝑥 = 𝑦 → (((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) ↔ ((𝑦 ∈ 𝐴 ∧ [𝑦 / 𝑥]𝜑) ↔ 𝑦 = 𝑦)))
8		equid 2042	. . . . . . . . . . . 12 ⊢ 𝑦 = 𝑦
9	8	tbt 372	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ 𝐴 ∧ [𝑦 / 𝑥]𝜑) ↔ ((𝑦 ∈ 𝐴 ∧ [𝑦 / 𝑥]𝜑) ↔ 𝑦 = 𝑦))
10		simpl 487	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ 𝐴 ∧ [𝑦 / 𝑥]𝜑) → 𝑦 ∈ 𝐴)
11	9, 10	sylbir 238	. . . . . . . . . 10 ⊢ (((𝑦 ∈ 𝐴 ∧ [𝑦 / 𝑥]𝜑) ↔ 𝑦 = 𝑦) → 𝑦 ∈ 𝐴)
12	7, 11	biimtrdi 256	. . . . . . . . 9 ⊢ (𝑥 = 𝑦 → (((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) → 𝑦 ∈ 𝐴))
13	12	spimvw 2016	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) → 𝑦 ∈ 𝐴)
14		ibar 537	. . . . . . . . . . 11 ⊢ (𝑥 ∈ 𝐴 → (𝜑 ↔ (𝑥 ∈ 𝐴 ∧ 𝜑)))
15	14	bibi1d 346	. . . . . . . . . 10 ⊢ (𝑥 ∈ 𝐴 → ((𝜑 ↔ 𝑥 = 𝑦) ↔ ((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦)))
16	15	biimprcd 253	. . . . . . . . 9 ⊢ (((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) → (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦)))
17	16	sps 2221	. . . . . . . 8 ⊢ (∀𝑥((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) → (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦)))
18	13, 17	jca 520	. . . . . . 7 ⊢ (∀𝑥((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) → (𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))))
19	18	axc4i 2355	. . . . . 6 ⊢ (∀𝑥((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) → ∀𝑥(𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))))
20		biimp 218	. . . . . . . . . . 11 ⊢ ((𝜑 ↔ 𝑥 = 𝑦) → (𝜑 → 𝑥 = 𝑦))
21	20	imim2i 17	. . . . . . . . . 10 ⊢ ((𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦)) → (𝑥 ∈ 𝐴 → (𝜑 → 𝑥 = 𝑦)))
22	21	impd 415	. . . . . . . . 9 ⊢ ((𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦)) → ((𝑥 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝑦))
23	22	adantl 486	. . . . . . . 8 ⊢ ((𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) → ((𝑥 ∈ 𝐴 ∧ 𝜑) → 𝑥 = 𝑦))
24	3	biimprcd 253	. . . . . . . . . . . 12 ⊢ (𝑦 ∈ 𝐴 → (𝑥 = 𝑦 → 𝑥 ∈ 𝐴))
25	24	adantr 485	. . . . . . . . . . 11 ⊢ ((𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) → (𝑥 = 𝑦 → 𝑥 ∈ 𝐴))
26	25	imp 411	. . . . . . . . . 10 ⊢ (((𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) ∧ 𝑥 = 𝑦) → 𝑥 ∈ 𝐴)
27		simplr 780	. . . . . . . . . . 11 ⊢ (((𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) ∧ 𝑥 = 𝑦) → (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦)))
28		simpr 489	. . . . . . . . . . 11 ⊢ (((𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) ∧ 𝑥 = 𝑦) → 𝑥 = 𝑦)
29		biimpr 223	. . . . . . . . . . 11 ⊢ ((𝜑 ↔ 𝑥 = 𝑦) → (𝑥 = 𝑦 → 𝜑))
30	27, 28, 29	syl6ci 72	. . . . . . . . . 10 ⊢ (((𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) ∧ 𝑥 = 𝑦) → (𝑥 ∈ 𝐴 → 𝜑))
31	26, 30	jcai 525	. . . . . . . . 9 ⊢ (((𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) ∧ 𝑥 = 𝑦) → (𝑥 ∈ 𝐴 ∧ 𝜑))
32	31	ex 417	. . . . . . . 8 ⊢ ((𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) → (𝑥 = 𝑦 → (𝑥 ∈ 𝐴 ∧ 𝜑)))
33	23, 32	impbid 215	. . . . . . 7 ⊢ ((𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) → ((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦))
34	33	alimi 1841	. . . . . 6 ⊢ (∀𝑥(𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))) → ∀𝑥((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦))
35	19, 34	impbii 212	. . . . 5 ⊢ (∀𝑥((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) ↔ ∀𝑥(𝑦 ∈ 𝐴 ∧ (𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))))
36		df-ral 3080	. . . . . 6 ⊢ (∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝑦) ↔ ∀𝑥(𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦)))
37	36	anbi2i 634	. . . . 5 ⊢ ((𝑦 ∈ 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝑦)) ↔ (𝑦 ∈ 𝐴 ∧ ∀𝑥(𝑥 ∈ 𝐴 → (𝜑 ↔ 𝑥 = 𝑦))))
38	2, 35, 37	3bitr4i 306	. . . 4 ⊢ (∀𝑥((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) ↔ (𝑦 ∈ 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝑦)))
39	38	exbii 1878	. . 3 ⊢ (∃𝑦∀𝑥((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦) ↔ ∃𝑦(𝑦 ∈ 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝑦)))
40		eu6 2602	. . 3 ⊢ (∃!𝑥(𝑥 ∈ 𝐴 ∧ 𝜑) ↔ ∃𝑦∀𝑥((𝑥 ∈ 𝐴 ∧ 𝜑) ↔ 𝑥 = 𝑦))
41		df-rex 3090	. . 3 ⊢ (∃𝑦 ∈ 𝐴 ∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝑦) ↔ ∃𝑦(𝑦 ∈ 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝑦)))
42	39, 40, 41	3bitr4i 306	. 2 ⊢ (∃!𝑥(𝑥 ∈ 𝐴 ∧ 𝜑) ↔ ∃𝑦 ∈ 𝐴 ∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝑦))
43	1, 42	bitri 278	1 ⊢ (∃!𝑥 ∈ 𝐴 𝜑 ↔ ∃𝑦 ∈ 𝐴 ∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝑦))

This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 400  ∀wal 1568  ∃wex 1809  [wsb 2096   ∈ wcel 2143  ∃!weu 2596  ∀wral 3079  ∃wrex 3089  ∃!wreu 3367

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-10 2176  ax-12 2213

This proof depends on definitions:  df-bi 210  df-an 401  df-or 861  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clel 2838  df-ral 3080  df-rex 3090  df-reu 3370

This theorem is used by:  reu3  3690  reu6i  3691  reu8  3696  xpf1o  9123  ufileu  24085  isppw2  27288  cusgrfilem2  29815  fgreu  33025  fcnvgreu  33026  gsumhashmul  33396  aks6d1c7  42979  modelac8prim  45729  fourierdlem50  46898