Theorem euind 3013

Description: Existential uniqueness via an indirect equality. (Contributed by NM, 11-Oct-2010.)

Hypotheses

Ref	Expression
euind.1	⊢ 𝐵 ∈ V
euind.2	⊢ (𝑥 = 𝑦 → (𝜑 ↔ 𝜓))
euind.3	⊢ (𝑥 = 𝑦 → 𝐴 = 𝐵)

Assertion

Ref	Expression
euind	⊢ ((∀𝑥∀𝑦((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) ∧ ∃𝑥𝜑) → ∃!𝑧∀𝑥(𝜑 → 𝑧 = 𝐴))

Distinct variable groups:   𝑦,𝑧,𝜑   𝑥,𝑧,𝜓   𝑦,𝐴,𝑧   𝑥,𝐵,𝑧   𝑥,𝑦

Allowed substitution hints:   𝜑(𝑥)   𝜓(𝑦)   𝐴(𝑥)   𝐵(𝑦)

Proof of Theorem euind

Dummy variable 𝑤 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		euind.2	. . . . . 6 ⊢ (𝑥 = 𝑦 → (𝜑 ↔ 𝜓))
2	1	cbvexv 1974	. . . . 5 ⊢ (∃𝑥𝜑 ↔ ∃𝑦𝜓)
3		euind.1	. . . . . . . . 9 ⊢ 𝐵 ∈ V
4	3	isseti 2830	. . . . . . . 8 ⊢ ∃𝑧 𝑧 = 𝐵
5	4	biantrur 303	. . . . . . 7 ⊢ (𝜓 ↔ (∃𝑧 𝑧 = 𝐵 ∧ 𝜓))
6	5	exbii 1658	. . . . . 6 ⊢ (∃𝑦𝜓 ↔ ∃𝑦(∃𝑧 𝑧 = 𝐵 ∧ 𝜓))
7		19.41v 1958	. . . . . . 7 ⊢ (∃𝑧(𝑧 = 𝐵 ∧ 𝜓) ↔ (∃𝑧 𝑧 = 𝐵 ∧ 𝜓))
8	7	exbii 1658	. . . . . 6 ⊢ (∃𝑦∃𝑧(𝑧 = 𝐵 ∧ 𝜓) ↔ ∃𝑦(∃𝑧 𝑧 = 𝐵 ∧ 𝜓))
9		excom 1716	. . . . . 6 ⊢ (∃𝑦∃𝑧(𝑧 = 𝐵 ∧ 𝜓) ↔ ∃𝑧∃𝑦(𝑧 = 𝐵 ∧ 𝜓))
10	6, 8, 9	3bitr2i 208	. . . . 5 ⊢ (∃𝑦𝜓 ↔ ∃𝑧∃𝑦(𝑧 = 𝐵 ∧ 𝜓))
11	2, 10	bitri 184	. . . 4 ⊢ (∃𝑥𝜑 ↔ ∃𝑧∃𝑦(𝑧 = 𝐵 ∧ 𝜓))
12		eqeq2 2248	. . . . . . . . 9 ⊢ (𝐴 = 𝐵 → (𝑧 = 𝐴 ↔ 𝑧 = 𝐵))
13	12	imim2i 12	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) → ((𝜑 ∧ 𝜓) → (𝑧 = 𝐴 ↔ 𝑧 = 𝐵)))
14		biimpr 130	. . . . . . . . . 10 ⊢ ((𝑧 = 𝐴 ↔ 𝑧 = 𝐵) → (𝑧 = 𝐵 → 𝑧 = 𝐴))
15	14	imim2i 12	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝜓) → (𝑧 = 𝐴 ↔ 𝑧 = 𝐵)) → ((𝜑 ∧ 𝜓) → (𝑧 = 𝐵 → 𝑧 = 𝐴)))
16		an31 570	. . . . . . . . . . 11 ⊢ (((𝜑 ∧ 𝜓) ∧ 𝑧 = 𝐵) ↔ ((𝑧 = 𝐵 ∧ 𝜓) ∧ 𝜑))
17	16	imbi1i 238	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝜓) ∧ 𝑧 = 𝐵) → 𝑧 = 𝐴) ↔ (((𝑧 = 𝐵 ∧ 𝜓) ∧ 𝜑) → 𝑧 = 𝐴))
18		impexp 263	. . . . . . . . . 10 ⊢ ((((𝜑 ∧ 𝜓) ∧ 𝑧 = 𝐵) → 𝑧 = 𝐴) ↔ ((𝜑 ∧ 𝜓) → (𝑧 = 𝐵 → 𝑧 = 𝐴)))
19		impexp 263	. . . . . . . . . 10 ⊢ ((((𝑧 = 𝐵 ∧ 𝜓) ∧ 𝜑) → 𝑧 = 𝐴) ↔ ((𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)))
20	17, 18, 19	3bitr3i 210	. . . . . . . . 9 ⊢ (((𝜑 ∧ 𝜓) → (𝑧 = 𝐵 → 𝑧 = 𝐴)) ↔ ((𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)))
21	15, 20	sylib 122	. . . . . . . 8 ⊢ (((𝜑 ∧ 𝜓) → (𝑧 = 𝐴 ↔ 𝑧 = 𝐵)) → ((𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)))
22	13, 21	syl 14	. . . . . . 7 ⊢ (((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) → ((𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)))
23	22	2alimi 1509	. . . . . 6 ⊢ (∀𝑥∀𝑦((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) → ∀𝑥∀𝑦((𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)))
24		19.23v 1936	. . . . . . . 8 ⊢ (∀𝑦((𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)) ↔ (∃𝑦(𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)))
25	24	albii 1523	. . . . . . 7 ⊢ (∀𝑥∀𝑦((𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)) ↔ ∀𝑥(∃𝑦(𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)))
26		19.21v 1926	. . . . . . 7 ⊢ (∀𝑥(∃𝑦(𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)) ↔ (∃𝑦(𝑧 = 𝐵 ∧ 𝜓) → ∀𝑥(𝜑 → 𝑧 = 𝐴)))
27	25, 26	bitri 184	. . . . . 6 ⊢ (∀𝑥∀𝑦((𝑧 = 𝐵 ∧ 𝜓) → (𝜑 → 𝑧 = 𝐴)) ↔ (∃𝑦(𝑧 = 𝐵 ∧ 𝜓) → ∀𝑥(𝜑 → 𝑧 = 𝐴)))
28	23, 27	sylib 122	. . . . 5 ⊢ (∀𝑥∀𝑦((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) → (∃𝑦(𝑧 = 𝐵 ∧ 𝜓) → ∀𝑥(𝜑 → 𝑧 = 𝐴)))
29	28	eximdv 1933	. . . 4 ⊢ (∀𝑥∀𝑦((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) → (∃𝑧∃𝑦(𝑧 = 𝐵 ∧ 𝜓) → ∃𝑧∀𝑥(𝜑 → 𝑧 = 𝐴)))
30	11, 29	biimtrid 152	. . 3 ⊢ (∀𝑥∀𝑦((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) → (∃𝑥𝜑 → ∃𝑧∀𝑥(𝜑 → 𝑧 = 𝐴)))
31	30	imp 124	. 2 ⊢ ((∀𝑥∀𝑦((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) ∧ ∃𝑥𝜑) → ∃𝑧∀𝑥(𝜑 → 𝑧 = 𝐴))
32		pm4.24 399	. . . . . . . 8 ⊢ (𝜑 ↔ (𝜑 ∧ 𝜑))
33	32	biimpi 120	. . . . . . 7 ⊢ (𝜑 → (𝜑 ∧ 𝜑))
34		anim12 344	. . . . . . 7 ⊢ (((𝜑 → 𝑧 = 𝐴) ∧ (𝜑 → 𝑤 = 𝐴)) → ((𝜑 ∧ 𝜑) → (𝑧 = 𝐴 ∧ 𝑤 = 𝐴)))
35		eqtr3 2258	. . . . . . 7 ⊢ ((𝑧 = 𝐴 ∧ 𝑤 = 𝐴) → 𝑧 = 𝑤)
36	33, 34, 35	syl56 34	. . . . . 6 ⊢ (((𝜑 → 𝑧 = 𝐴) ∧ (𝜑 → 𝑤 = 𝐴)) → (𝜑 → 𝑧 = 𝑤))
37	36	alanimi 1512	. . . . 5 ⊢ ((∀𝑥(𝜑 → 𝑧 = 𝐴) ∧ ∀𝑥(𝜑 → 𝑤 = 𝐴)) → ∀𝑥(𝜑 → 𝑧 = 𝑤))
38		19.23v 1936	. . . . . . 7 ⊢ (∀𝑥(𝜑 → 𝑧 = 𝑤) ↔ (∃𝑥𝜑 → 𝑧 = 𝑤))
39	38	biimpi 120	. . . . . 6 ⊢ (∀𝑥(𝜑 → 𝑧 = 𝑤) → (∃𝑥𝜑 → 𝑧 = 𝑤))
40	39	com12 30	. . . . 5 ⊢ (∃𝑥𝜑 → (∀𝑥(𝜑 → 𝑧 = 𝑤) → 𝑧 = 𝑤))
41	37, 40	syl5 32	. . . 4 ⊢ (∃𝑥𝜑 → ((∀𝑥(𝜑 → 𝑧 = 𝐴) ∧ ∀𝑥(𝜑 → 𝑤 = 𝐴)) → 𝑧 = 𝑤))
42	41	alrimivv 1928	. . 3 ⊢ (∃𝑥𝜑 → ∀𝑧∀𝑤((∀𝑥(𝜑 → 𝑧 = 𝐴) ∧ ∀𝑥(𝜑 → 𝑤 = 𝐴)) → 𝑧 = 𝑤))
43	42	adantl 277	. 2 ⊢ ((∀𝑥∀𝑦((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) ∧ ∃𝑥𝜑) → ∀𝑧∀𝑤((∀𝑥(𝜑 → 𝑧 = 𝐴) ∧ ∀𝑥(𝜑 → 𝑤 = 𝐴)) → 𝑧 = 𝑤))
44		eqeq1 2245	. . . . 5 ⊢ (𝑧 = 𝑤 → (𝑧 = 𝐴 ↔ 𝑤 = 𝐴))
45	44	imbi2d 230	. . . 4 ⊢ (𝑧 = 𝑤 → ((𝜑 → 𝑧 = 𝐴) ↔ (𝜑 → 𝑤 = 𝐴)))
46	45	albidv 1877	. . 3 ⊢ (𝑧 = 𝑤 → (∀𝑥(𝜑 → 𝑧 = 𝐴) ↔ ∀𝑥(𝜑 → 𝑤 = 𝐴)))
47	46	eu4 2149	. 2 ⊢ (∃!𝑧∀𝑥(𝜑 → 𝑧 = 𝐴) ↔ (∃𝑧∀𝑥(𝜑 → 𝑧 = 𝐴) ∧ ∀𝑧∀𝑤((∀𝑥(𝜑 → 𝑧 = 𝐴) ∧ ∀𝑥(𝜑 → 𝑤 = 𝐴)) → 𝑧 = 𝑤)))
48	31, 43, 47	sylanbrc 421	1 ⊢ ((∀𝑥∀𝑦((𝜑 ∧ 𝜓) → 𝐴 = 𝐵) ∧ ∃𝑥𝜑) → ∃!𝑧∀𝑥(𝜑 → 𝑧 = 𝐴))

This proof depends on syntax axioms:   → wi 4   ∧ wa 104   ↔ wb 105  ∀wal 1400   = wceq 1402  ∃wex 1545  ∃!weu 2086   ∈ wcel 2209  Vcvv 2821

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-ext 2220

This proof depends on definitions:  df-bi 117  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-v 2823

This theorem is used by: (None)