Theorem sb8eulem 2628

Description: Lemma. Factor out the common proof skeleton of sb8euv 2629 and sb8eu 2630. 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 2387	. . . 4 ⊢ (∀𝑥(𝜑 ↔ 𝑥 = 𝑧) ↔ ∀𝑤[𝑤 / 𝑥](𝜑 ↔ 𝑥 = 𝑧))
2		equsb3 2141	. . . . . 6 ⊢ ([𝑤 / 𝑥]𝑥 = 𝑧 ↔ 𝑤 = 𝑧)
3	2	sblbis 2345	. . . . 5 ⊢ ([𝑤 / 𝑥](𝜑 ↔ 𝑥 = 𝑧) ↔ ([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧))
4	3	albii 1852	. . . 4 ⊢ (∀𝑤[𝑤 / 𝑥](𝜑 ↔ 𝑥 = 𝑧) ↔ ∀𝑤([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧))
5		sb8eulem.nfsb	. . . . . 6 ⊢ Ⅎ𝑦[𝑤 / 𝑥]𝜑
6		nfv 1947	. . . . . 6 ⊢ Ⅎ𝑦 𝑤 = 𝑧
7	5, 6	nfbi 1936	. . . . 5 ⊢ Ⅎ𝑦([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧)
8		nfv 1947	. . . . 5 ⊢ Ⅎ𝑤([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧)
9		sbequ 2120	. . . . . 6 ⊢ (𝑤 = 𝑦 → ([𝑤 / 𝑥]𝜑 ↔ [𝑦 / 𝑥]𝜑))
10		equequ1 2058	. . . . . 6 ⊢ (𝑤 = 𝑦 → (𝑤 = 𝑧 ↔ 𝑦 = 𝑧))
11	9, 10	bibi12d 348	. . . . 5 ⊢ (𝑤 = 𝑦 → (([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧) ↔ ([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧)))
12	7, 8, 11	cbvalv1 2375	. . . 4 ⊢ (∀𝑤([𝑤 / 𝑥]𝜑 ↔ 𝑤 = 𝑧) ↔ ∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
13	1, 4, 12	3bitri 300	. . 3 ⊢ (∀𝑥(𝜑 ↔ 𝑥 = 𝑧) ↔ ∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
14	13	exbii 1881	. 2 ⊢ (∃𝑧∀𝑥(𝜑 ↔ 𝑥 = 𝑧) ↔ ∃𝑧∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
15		eu6 2604	. 2 ⊢ (∃!𝑥𝜑 ↔ ∃𝑧∀𝑥(𝜑 ↔ 𝑥 = 𝑧))
16		eu6 2604	. 2 ⊢ (∃!𝑦[𝑦 / 𝑥]𝜑 ↔ ∃𝑧∀𝑦([𝑦 / 𝑥]𝜑 ↔ 𝑦 = 𝑧))
17	14, 15, 16	3bitr4i 306	1 ⊢ (∃!𝑥𝜑 ↔ ∃!𝑦[𝑦 / 𝑥]𝜑)

This proof depends on syntax axioms:   ↔ wb 209  ∀wal 1568  ∃wex 1812  Ⅎwnf 1816  [wsb 2099  ∃!weu 2598

This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-10 2179  ax-11 2195  ax-12 2216

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-tru 1573  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2569  df-eu 2599

This theorem is used by:  sb8euv  2629  sb8eu  2630