Theorem 2mos 2651

Description: Double "there exists at most one", using implicit substitution. (Contributed by NM, 10-Feb-2005.)

Hypothesis

Ref	Expression
2mos.1	⊢ ((𝑥 = 𝑧 ∧ 𝑦 = 𝑤) → (𝜑 ↔ 𝜓))

Assertion

Ref	Expression
2mos	⊢ (∃𝑧∃𝑤∀𝑥∀𝑦(𝜑 → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)) ↔ ∀𝑥∀𝑦∀𝑧∀𝑤((𝜑 ∧ 𝜓) → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)))

Distinct variable groups:   𝑧,𝑤,𝜑   𝑥,𝑦,𝜓   𝑥,𝑧,𝑤,𝑦

Allowed substitution hints:   𝜑(𝑥,𝑦)   𝜓(𝑧,𝑤)

Proof of Theorem 2mos

Step	Hyp	Ref	Expression
1		2mo 2650	. 2 ⊢ (∃𝑧∃𝑤∀𝑥∀𝑦(𝜑 → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)) ↔ ∀𝑥∀𝑦∀𝑧∀𝑤((𝜑 ∧ [𝑧 / 𝑥][𝑤 / 𝑦]𝜑) → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)))
2		nfv 1918	. . . . . . . . . 10 ⊢ Ⅎ𝑦 𝑥 = 𝑧
3	2	sbrim 2304	. . . . . . . . 9 ⊢ ([𝑤 / 𝑦](𝑥 = 𝑧 → 𝜑) ↔ (𝑥 = 𝑧 → [𝑤 / 𝑦]𝜑))
4		2mos.1	. . . . . . . . . . . 12 ⊢ ((𝑥 = 𝑧 ∧ 𝑦 = 𝑤) → (𝜑 ↔ 𝜓))
5	4	expcom 413	. . . . . . . . . . 11 ⊢ (𝑦 = 𝑤 → (𝑥 = 𝑧 → (𝜑 ↔ 𝜓)))
6	5	pm5.74d 272	. . . . . . . . . 10 ⊢ (𝑦 = 𝑤 → ((𝑥 = 𝑧 → 𝜑) ↔ (𝑥 = 𝑧 → 𝜓)))
7	6	sbievw 2097	. . . . . . . . 9 ⊢ ([𝑤 / 𝑦](𝑥 = 𝑧 → 𝜑) ↔ (𝑥 = 𝑧 → 𝜓))
8	3, 7	bitr3i 276	. . . . . . . 8 ⊢ ((𝑥 = 𝑧 → [𝑤 / 𝑦]𝜑) ↔ (𝑥 = 𝑧 → 𝜓))
9	8	pm5.74ri 271	. . . . . . 7 ⊢ (𝑥 = 𝑧 → ([𝑤 / 𝑦]𝜑 ↔ 𝜓))
10	9	sbievw 2097	. . . . . 6 ⊢ ([𝑧 / 𝑥][𝑤 / 𝑦]𝜑 ↔ 𝜓)
11	10	anbi2i 622	. . . . 5 ⊢ ((𝜑 ∧ [𝑧 / 𝑥][𝑤 / 𝑦]𝜑) ↔ (𝜑 ∧ 𝜓))
12	11	imbi1i 349	. . . 4 ⊢ (((𝜑 ∧ [𝑧 / 𝑥][𝑤 / 𝑦]𝜑) → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)) ↔ ((𝜑 ∧ 𝜓) → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)))
13	12	2albii 1824	. . 3 ⊢ (∀𝑧∀𝑤((𝜑 ∧ [𝑧 / 𝑥][𝑤 / 𝑦]𝜑) → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)) ↔ ∀𝑧∀𝑤((𝜑 ∧ 𝜓) → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)))
14	13	2albii 1824	. 2 ⊢ (∀𝑥∀𝑦∀𝑧∀𝑤((𝜑 ∧ [𝑧 / 𝑥][𝑤 / 𝑦]𝜑) → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)) ↔ ∀𝑥∀𝑦∀𝑧∀𝑤((𝜑 ∧ 𝜓) → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)))
15	1, 14	bitri 274	1 ⊢ (∃𝑧∃𝑤∀𝑥∀𝑦(𝜑 → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)) ↔ ∀𝑥∀𝑦∀𝑧∀𝑤((𝜑 ∧ 𝜓) → (𝑥 = 𝑧 ∧ 𝑦 = 𝑤)))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 395  ∀wal 1537  ∃wex 1783  [wsb 2068

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1799  ax-4 1813  ax-5 1914  ax-6 1972  ax-7 2012  ax-10 2139  ax-11 2156  ax-12 2173

This theorem depends on definitions:  df-bi 206  df-an 396  df-or 844  df-tru 1542  df-ex 1784  df-nf 1788  df-sb 2069  df-mo 2540

This theorem is referenced by: (None)