Theorem sb8eulem 2596

Description: Lemma. Factor out the common proof skeleton of sb8euv 2597 and sb8eu 2598. 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		sb8v 2353	. . . 4 ⊢ (∀𝑥(𝜑 ↔ 𝑥 = 𝑧) ↔ ∀𝑤[𝑤 / 𝑥](𝜑 ↔ 𝑥 = 𝑧))
2		equsb3 2102	. . . . . 6 ⊢ ([𝑤 / 𝑥]𝑥 = 𝑧 ↔ 𝑤 = 𝑧)
3	2	sblbis 2308	. . . . 5 ⊢ ([𝑤 / 𝑥](𝜑 ↔ 𝑥 = 𝑧) ↔ ([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧))
4	3	albii 1818	. . . 4 ⊢ (∀𝑤[𝑤 / 𝑥](𝜑 ↔ 𝑥 = 𝑧) ↔ ∀𝑤([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧))
5		sb8eulem.nfsb	. . . . . 6 ⊢ Ⅎ𝑦[𝑤 / 𝑥]𝜑
6		nfv 1913	. . . . . 6 ⊢ Ⅎ𝑦 𝑤 = 𝑧
7	5, 6	nfbi 1902	. . . . 5 ⊢ Ⅎ𝑦([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧)
8		nfv 1913	. . . . 5 ⊢ Ⅎ𝑤([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧)
9		sbequ 2082	. . . . . 6 ⊢ (𝑤 = 𝑦 → ([𝑤 / 𝑥]𝜑 ↔ [𝑦 / 𝑥]𝜑))
10		equequ1 2023	. . . . . 6 ⊢ (𝑤 = 𝑦 → (𝑤 = 𝑧 ↔ 𝑦 = 𝑧))
11	9, 10	bibi12d 345	. . . . 5 ⊢ (𝑤 = 𝑦 → (([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧) ↔ ([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧)))
12	7, 8, 11	cbvalv1 2341	. . . 4 ⊢ (∀𝑤([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧) ↔ ∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
13	1, 4, 12	3bitri 297	. . 3 ⊢ (∀𝑥(𝜑 ↔ 𝑥 = 𝑧) ↔ ∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
14	13	exbii 1847	. 2 ⊢ (∃𝑧∀𝑥(𝜑 ↔ 𝑥 = 𝑧) ↔ ∃𝑧∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
15		eu6 2572	. 2 ⊢ (∃!𝑥𝜑 ↔ ∃𝑧∀𝑥(𝜑 ↔ 𝑥 = 𝑧))
16		eu6 2572	. 2 ⊢ (∃!𝑦[𝑦 / 𝑥]𝜑 ↔ ∃𝑧∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
17	14, 15, 16	3bitr4i 303	1 ⊢ (∃!𝑥𝜑 ↔ ∃!𝑦[𝑦 / 𝑥]𝜑)

Syntax hints:   ↔ wb 206  ∀wal 1537  ∃wex 1778  Ⅎwnf 1782  [wsb 2063  ∃!weu 2566

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1794  ax-4 1808  ax-5 1909  ax-6 1966  ax-7 2006  ax-10 2140  ax-11 2156  ax-12 2176

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-tru 1542  df-ex 1779  df-nf 1783  df-sb 2064  df-mo 2538  df-eu 2567

This theorem is referenced by:  sb8euv  2597  sb8eu  2598