Theorem mob2 2772

Description: Consequence of "at most one." (Contributed by NM, 2-Jan-2015.)

Hypothesis

Ref	Expression
moi2.1	⊢ (𝑥 = 𝐴 → (𝜑 ↔ 𝜓))

Assertion

Ref	Expression
mob2	⊢ ((𝐴 ∈ 𝐵 ∧ ∃*𝑥𝜑 ∧ 𝜑) → (𝑥 = 𝐴 ↔ 𝜓))

Distinct variable groups:   𝑥,𝐴   𝜓,𝑥

Allowed substitution hints:   𝜑(𝑥)   𝐵(𝑥)

Proof of Theorem mob2

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		simp3 940	. . 3 ⊢ ((𝐴 ∈ 𝐵 ∧ ∃*𝑥𝜑 ∧ 𝜑) → 𝜑)
2		moi2.1	. . 3 ⊢ (𝑥 = 𝐴 → (𝜑 ↔ 𝜓))
3	1, 2	syl5ibcom 153	. 2 ⊢ ((𝐴 ∈ 𝐵 ∧ ∃*𝑥𝜑 ∧ 𝜑) → (𝑥 = 𝐴 → 𝜓))
4		nfs1v 1856	. . . . . . . 8 ⊢ Ⅎ𝑥[𝑦 / 𝑥]𝜑
5		sbequ12 1694	. . . . . . . 8 ⊢ (𝑥 = 𝑦 → (𝜑 ↔ [𝑦 / 𝑥]𝜑))
6	4, 5	mo4f 2001	. . . . . . 7 ⊢ (∃*𝑥𝜑 ↔ ∀𝑥∀𝑦((𝜑 ∧ [𝑦 / 𝑥]𝜑) → 𝑥 = 𝑦))
7		sp 1441	. . . . . . 7 ⊢ (∀𝑥∀𝑦((𝜑 ∧ [𝑦 / 𝑥]𝜑) → 𝑥 = 𝑦) → ∀𝑦((𝜑 ∧ [𝑦 / 𝑥]𝜑) → 𝑥 = 𝑦))
8	6, 7	sylbi 119	. . . . . 6 ⊢ (∃*𝑥𝜑 → ∀𝑦((𝜑 ∧ [𝑦 / 𝑥]𝜑) → 𝑥 = 𝑦))
9		nfv 1461	. . . . . . . . . 10 ⊢ Ⅎ𝑥𝜓
10	9, 2	sbhypf 2648	. . . . . . . . 9 ⊢ (𝑦 = 𝐴 → ([𝑦 / 𝑥]𝜑 ↔ 𝜓))
11	10	anbi2d 451	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → ((𝜑 ∧ [𝑦 / 𝑥]𝜑) ↔ (𝜑 ∧ 𝜓)))
12		eqeq2 2090	. . . . . . . 8 ⊢ (𝑦 = 𝐴 → (𝑥 = 𝑦 ↔ 𝑥 = 𝐴))
13	11, 12	imbi12d 232	. . . . . . 7 ⊢ (𝑦 = 𝐴 → (((𝜑 ∧ [𝑦 / 𝑥]𝜑) → 𝑥 = 𝑦) ↔ ((𝜑 ∧ 𝜓) → 𝑥 = 𝐴)))
14	13	spcgv 2685	. . . . . 6 ⊢ (𝐴 ∈ 𝐵 → (∀𝑦((𝜑 ∧ [𝑦 / 𝑥]𝜑) → 𝑥 = 𝑦) → ((𝜑 ∧ 𝜓) → 𝑥 = 𝐴)))
15	8, 14	syl5 32	. . . . 5 ⊢ (𝐴 ∈ 𝐵 → (∃*𝑥𝜑 → ((𝜑 ∧ 𝜓) → 𝑥 = 𝐴)))
16	15	imp 122	. . . 4 ⊢ ((𝐴 ∈ 𝐵 ∧ ∃*𝑥𝜑) → ((𝜑 ∧ 𝜓) → 𝑥 = 𝐴))
17	16	expd 254	. . 3 ⊢ ((𝐴 ∈ 𝐵 ∧ ∃*𝑥𝜑) → (𝜑 → (𝜓 → 𝑥 = 𝐴)))
18	17	3impia 1135	. 2 ⊢ ((𝐴 ∈ 𝐵 ∧ ∃*𝑥𝜑 ∧ 𝜑) → (𝜓 → 𝑥 = 𝐴))
19	3, 18	impbid 127	1 ⊢ ((𝐴 ∈ 𝐵 ∧ ∃*𝑥𝜑 ∧ 𝜑) → (𝑥 = 𝐴 ↔ 𝜓))

Syntax hints:   → wi 4   ∧ wa 102   ↔ wb 103   ∧ w3a 919  ∀wal 1282   = wceq 1284   ∈ wcel 1433  [wsb 1685  ∃*wmo 1942

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-io 662  ax-5 1376  ax-7 1377  ax-gen 1378  ax-ie1 1422  ax-ie2 1423  ax-8 1435  ax-10 1436  ax-11 1437  ax-i12 1438  ax-bndl 1439  ax-4 1440  ax-17 1459  ax-i9 1463  ax-ial 1467  ax-i5r 1468  ax-ext 2063

This theorem depends on definitions:  df-bi 115  df-3an 921  df-tru 1287  df-nf 1390  df-sb 1686  df-eu 1944  df-mo 1945  df-clab 2068  df-cleq 2074  df-clel 2077  df-nfc 2208  df-v 2603

This theorem is referenced by:  moi2  2773  mob  2774