Theorem reu7 3695

Description: Restricted uniqueness using implicit substitution. (Contributed by NM, 24-Oct-2006.)

Hypothesis

Ref	Expression
rmo4.1	⊢ (𝑥 = 𝑦 → (𝜑 ↔ 𝜓))

Assertion

Ref	Expression
reu7	⊢ (∃!𝑥 ∈ 𝐴 𝜑 ↔ (∃𝑥 ∈ 𝐴 𝜑 ∧ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝜓 → 𝑥 = 𝑦)))

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

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

Proof of Theorem reu7

Dummy variable 𝑧 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		reu3 3690	. 2 ⊢ (∃!𝑥 ∈ 𝐴 𝜑 ↔ (∃𝑥 ∈ 𝐴 𝜑 ∧ ∃𝑧 ∈ 𝐴 ∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝑧)))
2		rmo4.1	. . . . . . 7 ⊢ (𝑥 = 𝑦 → (𝜑 ↔ 𝜓))
3		equequ1 2045	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (𝑥 = 𝑧 ↔ 𝑦 = 𝑧))
4		equcom 2038	. . . . . . . 8 ⊢ (𝑦 = 𝑧 ↔ 𝑧 = 𝑦)
5	3, 4	bitrdi 289	. . . . . . 7 ⊢ (𝑥 = 𝑦 → (𝑥 = 𝑧 ↔ 𝑧 = 𝑦))
6	2, 5	imbi12d 346	. . . . . 6 ⊢ (𝑥 = 𝑦 → ((𝜑 → 𝑥 = 𝑧) ↔ (𝜓 → 𝑧 = 𝑦)))
7	6	cbvralvw 3240	. . . . 5 ⊢ (∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝑧) ↔ ∀𝑦 ∈ 𝐴 (𝜓 → 𝑧 = 𝑦))
8	7	rexbii 3109	. . . 4 ⊢ (∃𝑧 ∈ 𝐴 ∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝑧) ↔ ∃𝑧 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝜓 → 𝑧 = 𝑦))
9		equequ1 2045	. . . . . . 7 ⊢ (𝑧 = 𝑥 → (𝑧 = 𝑦 ↔ 𝑥 = 𝑦))
10	9	imbi2d 342	. . . . . 6 ⊢ (𝑧 = 𝑥 → ((𝜓 → 𝑧 = 𝑦) ↔ (𝜓 → 𝑥 = 𝑦)))
11	10	ralbidv 3185	. . . . 5 ⊢ (𝑧 = 𝑥 → (∀𝑦 ∈ 𝐴 (𝜓 → 𝑧 = 𝑦) ↔ ∀𝑦 ∈ 𝐴 (𝜓 → 𝑥 = 𝑦)))
12	11	cbvrexvw 3241	. . . 4 ⊢ (∃𝑧 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝜓 → 𝑧 = 𝑦) ↔ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝜓 → 𝑥 = 𝑦))
13	8, 12	bitri 277	. . 3 ⊢ (∃𝑧 ∈ 𝐴 ∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝑧) ↔ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝜓 → 𝑥 = 𝑦))
14	13	anbi2i 632	. 2 ⊢ ((∃𝑥 ∈ 𝐴 𝜑 ∧ ∃𝑧 ∈ 𝐴 ∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝑧)) ↔ (∃𝑥 ∈ 𝐴 𝜑 ∧ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝜓 → 𝑥 = 𝑦)))
15	1, 14	bitri 277	1 ⊢ (∃!𝑥 ∈ 𝐴 𝜑 ↔ (∃𝑥 ∈ 𝐴 𝜑 ∧ ∃𝑥 ∈ 𝐴 ∀𝑦 ∈ 𝐴 (𝜓 → 𝑥 = 𝑦)))

Syntax hints:   → wi 4   ↔ wb 208   ∧ wa 399  ∀wral 3076  ∃wrex 3086  ∃!wreu 3365

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1815  ax-4 1829  ax-5 1930  ax-6 1987  ax-7 2028  ax-8 2144  ax-10 2175  ax-12 2212

This theorem depends on definitions:  df-bi 209  df-an 400  df-or 859  df-ex 1800  df-nf 1804  df-sb 2091  df-mo 2566  df-eu 2596  df-clel 2837  df-ral 3077  df-rex 3087  df-rmo 3367  df-reu 3368

This theorem is referenced by:  cshwrepswhash1  17138