Theorem eqreu 2995

Description: A condition which implies existential uniqueness. (Contributed by Mario Carneiro, 2-Oct-2015.)

Hypothesis

Ref	Expression
eqreu.1	⊢ (𝑥 = 𝐵 → (𝜑 ↔ 𝜓))

Assertion

Ref	Expression
eqreu	⊢ ((𝐵 ∈ 𝐴 ∧ 𝜓 ∧ ∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝐵)) → ∃!𝑥 ∈ 𝐴 𝜑)

Distinct variable groups:   𝑥,𝐴   𝑥,𝐵   𝜓,𝑥

Allowed substitution hint:   𝜑(𝑥)

Proof of Theorem eqreu

Step	Hyp	Ref	Expression
1		ralbiim 2665	. . . . 5 ⊢ (∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝐵) ↔ (∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝐵) ∧ ∀𝑥 ∈ 𝐴 (𝑥 = 𝐵 → 𝜑)))
2		eqreu.1	. . . . . . 7 ⊢ (𝑥 = 𝐵 → (𝜑 ↔ 𝜓))
3	2	ceqsralv 2831	. . . . . 6 ⊢ (𝐵 ∈ 𝐴 → (∀𝑥 ∈ 𝐴 (𝑥 = 𝐵 → 𝜑) ↔ 𝜓))
4	3	anbi2d 464	. . . . 5 ⊢ (𝐵 ∈ 𝐴 → ((∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝐵) ∧ ∀𝑥 ∈ 𝐴 (𝑥 = 𝐵 → 𝜑)) ↔ (∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝐵) ∧ 𝜓)))
5	1, 4	bitrid 192	. . . 4 ⊢ (𝐵 ∈ 𝐴 → (∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝐵) ↔ (∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝐵) ∧ 𝜓)))
6		reu6i 2994	. . . . 5 ⊢ ((𝐵 ∈ 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝐵)) → ∃!𝑥 ∈ 𝐴 𝜑)
7	6	ex 115	. . . 4 ⊢ (𝐵 ∈ 𝐴 → (∀𝑥 ∈ 𝐴 (𝜑 ↔ 𝑥 = 𝐵) → ∃!𝑥 ∈ 𝐴 𝜑))
8	5, 7	sylbird 170	. . 3 ⊢ (𝐵 ∈ 𝐴 → ((∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝐵) ∧ 𝜓) → ∃!𝑥 ∈ 𝐴 𝜑))
9	8	3impib 1225	. 2 ⊢ ((𝐵 ∈ 𝐴 ∧ ∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝐵) ∧ 𝜓) → ∃!𝑥 ∈ 𝐴 𝜑)
10	9	3com23 1233	1 ⊢ ((𝐵 ∈ 𝐴 ∧ 𝜓 ∧ ∀𝑥 ∈ 𝐴 (𝜑 → 𝑥 = 𝐵)) → ∃!𝑥 ∈ 𝐴 𝜑)

Syntax hints:   → wi 4   ∧ wa 104   ↔ wb 105   ∧ w3a 1002   = wceq 1395   ∈ wcel 2200  ∀wral 2508  ∃!wreu 2510

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 714  ax-5 1493  ax-7 1494  ax-gen 1495  ax-ie1 1539  ax-ie2 1540  ax-8 1550  ax-10 1551  ax-11 1552  ax-i12 1553  ax-bndl 1555  ax-4 1556  ax-17 1572  ax-i9 1576  ax-ial 1580  ax-i5r 1581  ax-ext 2211

This theorem depends on definitions:  df-bi 117  df-3an 1004  df-tru 1398  df-nf 1507  df-sb 1809  df-eu 2080  df-clab 2216  df-cleq 2222  df-clel 2225  df-nfc 2361  df-ral 2513  df-rex 2514  df-reu 2515  df-v 2801

This theorem is referenced by: (None)