Theorem 2eu1 2649

Description: Double existential uniqueness. This theorem shows a condition under which a "naive" definition matches the correct one. Usage of this theorem is discouraged because it depends on ax-13 2375. Use the weaker 2eu1v 2650 when possible. (Contributed by NM, 3-Dec-2001.) (Proof shortened by Wolf Lammen, 23-Apr-2023.) (New usage is discouraged.)

Assertion

Ref	Expression
2eu1	⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 ↔ (∃!𝑥∃𝑦𝜑 ∧ ∃!𝑦∃𝑥𝜑)))

Proof of Theorem 2eu1

Step	Hyp	Ref	Expression
1		2eu2ex 2641	. . . . 5 ⊢ (∃!𝑥∃!𝑦𝜑 → ∃𝑥∃𝑦𝜑)
2		moeu 2581	. . . . . . . 8 ⊢ (∃*𝑦𝜑 ↔ (∃𝑦𝜑 → ∃!𝑦𝜑))
3	2	albii 1816	. . . . . . 7 ⊢ (∀𝑥∃*𝑦𝜑 ↔ ∀𝑥(∃𝑦𝜑 → ∃!𝑦𝜑))
4		euim 2615	. . . . . . 7 ⊢ ((∃𝑥∃𝑦𝜑 ∧ ∀𝑥(∃𝑦𝜑 → ∃!𝑦𝜑)) → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑))
5	3, 4	sylan2b 594	. . . . . 6 ⊢ ((∃𝑥∃𝑦𝜑 ∧ ∀𝑥∃*𝑦𝜑) → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑))
6	5	ex 412	. . . . 5 ⊢ (∃𝑥∃𝑦𝜑 → (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑)))
7	1, 6	syl 17	. . . 4 ⊢ (∃!𝑥∃!𝑦𝜑 → (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑)))
8	7	pm2.43b 55	. . 3 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑))
9		2euswap 2643	. . . 4 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃𝑦𝜑 → ∃!𝑦∃𝑥𝜑))
10	8, 9	syld 47	. . 3 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → ∃!𝑦∃𝑥𝜑))
11	8, 10	jcad 512	. 2 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → (∃!𝑥∃𝑦𝜑 ∧ ∃!𝑦∃𝑥𝜑)))
12		2exeu 2644	. 2 ⊢ ((∃!𝑥∃𝑦𝜑 ∧ ∃!𝑦∃𝑥𝜑) → ∃!𝑥∃!𝑦𝜑)
13	11, 12	impbid1 225	1 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 ↔ (∃!𝑥∃𝑦𝜑 ∧ ∃!𝑦∃𝑥𝜑)))

Syntax hints:   → wi 4   ↔ wb 206   ∧ wa 395  ∀wal 1535  ∃wex 1776  ∃*wmo 2536  ∃!weu 2566

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1792  ax-4 1806  ax-5 1908  ax-6 1965  ax-7 2005  ax-10 2139  ax-11 2155  ax-12 2175  ax-13 2375

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-tru 1540  df-ex 1777  df-nf 1781  df-mo 2538  df-eu 2567

This theorem is referenced by:  2eu2  2651  2eu3  2652