Theorem sb8eulem 2597

Description: Lemma. Factor out the common proof skeleton of sb8euv 2598 and sb8eu 2599. Variable substitution in unique existential quantifier. (Contributed by NM, 7-Aug-1994.) (Revised by Mario Carneiro, 7-Oct-2016.) (Proof shortened by Wolf Lammen, 24-Aug-2019.) Factor out common proof lines. (Revised by Wolf Lammen, 9-Feb-2023.)

Hypothesis

Ref	Expression
sb8eulem.nfsb	⊢ Ⅎ𝑦[𝑤 / 𝑥]𝜑

Assertion

Ref	Expression
sb8eulem	⊢ (∃!𝑥𝜑 ↔ ∃!𝑦[𝑦 / 𝑥]𝜑)

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

Allowed substitution hints:   𝜑(𝑥,𝑦)

Proof of Theorem sb8eulem

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		nfv 1922	. . . . 5 ⊢ Ⅎ𝑤(𝜑 ↔ 𝑥 = 𝑧)
2	1	sb8v 2354	. . . 4 ⊢ (∀𝑥(𝜑 ↔ 𝑥 = 𝑧) ↔ ∀𝑤[𝑤 / 𝑥](𝜑 ↔ 𝑥 = 𝑧))
3		equsb3 2107	. . . . . 6 ⊢ ([𝑤 / 𝑥]𝑥 = 𝑧 ↔ 𝑤 = 𝑧)
4	3	sblbis 2312	. . . . 5 ⊢ ([𝑤 / 𝑥](𝜑 ↔ 𝑥 = 𝑧) ↔ ([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧))
5	4	albii 1827	. . . 4 ⊢ (∀𝑤[𝑤 / 𝑥](𝜑 ↔ 𝑥 = 𝑧) ↔ ∀𝑤([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧))
6		sb8eulem.nfsb	. . . . . 6 ⊢ Ⅎ𝑦[𝑤 / 𝑥]𝜑
7		nfv 1922	. . . . . 6 ⊢ Ⅎ𝑦 𝑤 = 𝑧
8	6, 7	nfbi 1911	. . . . 5 ⊢ Ⅎ𝑦([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧)
9		nfv 1922	. . . . 5 ⊢ Ⅎ𝑤([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧)
10		sbequ 2091	. . . . . 6 ⊢ (𝑤 = 𝑦 → ([𝑤 / 𝑥]𝜑 ↔ [𝑦 / 𝑥]𝜑))
11		equequ1 2035	. . . . . 6 ⊢ (𝑤 = 𝑦 → (𝑤 = 𝑧 ↔ 𝑦 = 𝑧))
12	10, 11	bibi12d 349	. . . . 5 ⊢ (𝑤 = 𝑦 → (([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧) ↔ ([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧)))
13	8, 9, 12	cbvalv1 2342	. . . 4 ⊢ (∀𝑤([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧) ↔ ∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
14	2, 5, 13	3bitri 300	. . 3 ⊢ (∀𝑥(𝜑 ↔ 𝑥 = 𝑧) ↔ ∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
15	14	exbii 1855	. 2 ⊢ (∃𝑧∀𝑥(𝜑 ↔ 𝑥 = 𝑧) ↔ ∃𝑧∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
16		eu6 2573	. 2 ⊢ (∃!𝑥𝜑 ↔ ∃𝑧∀𝑥(𝜑 ↔ 𝑥 = 𝑧))
17		eu6 2573	. 2 ⊢ (∃!𝑦[𝑦 / 𝑥]𝜑 ↔ ∃𝑧∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
18	15, 16, 17	3bitr4i 306	1 ⊢ (∃!𝑥𝜑 ↔ ∃!𝑦[𝑦 / 𝑥]𝜑)

Syntax hints:   ↔ wb 209  ∀wal 1541  ∃wex 1787  Ⅎwnf 1791  [wsb 2072  ∃!weu 2567

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1803  ax-4 1817  ax-5 1918  ax-6 1976  ax-7 2018  ax-10 2143  ax-11 2160  ax-12 2177

This theorem depends on definitions:  df-bi 210  df-an 400  df-or 848  df-tru 1546  df-ex 1788  df-nf 1792  df-sb 2073  df-mo 2539  df-eu 2568

This theorem is referenced by:  sb8euv  2598  sb8eu  2599