Theorem moop2 5490

Description: "At most one" property of an ordered pair. (Contributed by NM, 11-Apr-2004.) (Revised by Mario Carneiro, 26-Apr-2015.)

Hypothesis

Ref	Expression
moop2.1	⊢ 𝐵 ∈ V

Assertion

Ref	Expression
moop2	⊢ ∃*𝑥 𝐴 = ⟨𝐵, 𝑥⟩

Distinct variable group:   𝑥,𝐴

Allowed substitution hint:   𝐵(𝑥)

Proof of Theorem moop2

Dummy variable 𝑦 is distinct from all other variables.

Step	Hyp	Ref	Expression
1		eqtr2 2787	. . . 4 ⊢ ((𝐴 = ⟨𝐵, 𝑥⟩ ∧ 𝐴 = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩) → ⟨𝐵, 𝑥⟩ = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩)
2		moop2.1	. . . . . 6 ⊢ 𝐵 ∈ V
3		vex 3462	. . . . . 6 ⊢ 𝑥 ∈ V
4	2, 3	opth 5463	. . . . 5 ⊢ (⟨𝐵, 𝑥⟩ = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩ ↔ (𝐵 = ⦋𝑦 / 𝑥⦌𝐵 ∧ 𝑥 = 𝑦))
5	4	simprbi 503	. . . 4 ⊢ (⟨𝐵, 𝑥⟩ = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩ → 𝑥 = 𝑦)
6	1, 5	syl 18	. . 3 ⊢ ((𝐴 = ⟨𝐵, 𝑥⟩ ∧ 𝐴 = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩) → 𝑥 = 𝑦)
7	6	gen2 1829	. 2 ⊢ ∀𝑥∀𝑦((𝐴 = ⟨𝐵, 𝑥⟩ ∧ 𝐴 = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩) → 𝑥 = 𝑦)
8		nfcsb1v 3880	. . . . 5 ⊢ Ⅎ𝑥⦋𝑦 / 𝑥⦌𝐵
9		nfcv 2928	. . . . 5 ⊢ Ⅎ𝑥𝑦
10	8, 9	nfop 4859	. . . 4 ⊢ Ⅎ𝑥⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩
11	10	nfeq2 2945	. . 3 ⊢ Ⅎ𝑥 𝐴 = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩
12		csbeq1a 3870	. . . . 5 ⊢ (𝑥 = 𝑦 → 𝐵 = ⦋𝑦 / 𝑥⦌𝐵)
13		id 23	. . . . 5 ⊢ (𝑥 = 𝑦 → 𝑥 = 𝑦)
14	12, 13	opeq12d 4851	. . . 4 ⊢ (𝑥 = 𝑦 → ⟨𝐵, 𝑥⟩ = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩)
15	14	eqeq2d 2777	. . 3 ⊢ (𝑥 = 𝑦 → (𝐴 = ⟨𝐵, 𝑥⟩ ↔ 𝐴 = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩))
16	11, 15	mo4f 2598	. 2 ⊢ (∃*𝑥 𝐴 = ⟨𝐵, 𝑥⟩ ↔ ∀𝑥∀𝑦((𝐴 = ⟨𝐵, 𝑥⟩ ∧ 𝐴 = ⟨⦋𝑦 / 𝑥⦌𝐵, 𝑦⟩) → 𝑥 = 𝑦))
17	7, 16	mpbir 234	1 ⊢ ∃*𝑥 𝐴 = ⟨𝐵, 𝑥⟩

This proof depends on syntax axioms:   → wi 4   ∧ wa 401  ∀wal 1568   = wceq 1570   ∈ wcel 2146  ∃*wmo 2568  Vcvv 3458  ⦋csb 3856  ⟨cop 4600

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-8 2148  ax-9 2156  ax-10 2179  ax-11 2195  ax-12 2216  ax-ext 2738  ax-sep 5262  ax-pr 5409

This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2570  df-clab 2745  df-cleq 2758  df-clel 2841  df-nfc 2915  df-rab 3420  df-v 3460  df-sbc 3748  df-csb 3857  df-dif 3911  df-un 3913  df-ss 3925  df-nul 4290  df-if 4493  df-sn 4595  df-pr 4597  df-op 4601

This theorem is used by:  euop2  5500