Theorem 2eu1 2644

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 2369. Use the weaker 2eu1v 2645 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 2637	. . . . 5 ⊢ (∃!𝑥∃!𝑦𝜑 → ∃𝑥∃𝑦𝜑)
2		moeu 2575	. . . . . . . 8 ⊢ (∃*𝑦𝜑 ↔ (∃𝑦𝜑 → ∃!𝑦𝜑))
3	2	albii 1819	. . . . . . 7 ⊢ (∀𝑥∃*𝑦𝜑 ↔ ∀𝑥(∃𝑦𝜑 → ∃!𝑦𝜑))
4		euim 2611	. . . . . . 7 ⊢ ((∃𝑥∃𝑦𝜑 ∧ ∀𝑥(∃𝑦𝜑 → ∃!𝑦𝜑)) → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑))
5	3, 4	sylan2b 592	. . . . . 6 ⊢ ((∃𝑥∃𝑦𝜑 ∧ ∀𝑥∃*𝑦𝜑) → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑))
6	5	ex 411	. . . . 5 ⊢ (∃𝑥∃𝑦𝜑 → (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑)))
7	1, 6	syl 17	. . . 4 ⊢ (∃!𝑥∃!𝑦𝜑 → (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑)))
8	7	pm2.43b 55	. . 3 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → ∃!𝑥∃𝑦𝜑))
9		2euswap 2639	. . . 4 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃𝑦𝜑 → ∃!𝑦∃𝑥𝜑))
10	8, 9	syld 47	. . 3 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → ∃!𝑦∃𝑥𝜑))
11	8, 10	jcad 511	. 2 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 → (∃!𝑥∃𝑦𝜑 ∧ ∃!𝑦∃𝑥𝜑)))
12		2exeu 2640	. 2 ⊢ ((∃!𝑥∃𝑦𝜑 ∧ ∃!𝑦∃𝑥𝜑) → ∃!𝑥∃!𝑦𝜑)
13	11, 12	impbid1 224	1 ⊢ (∀𝑥∃*𝑦𝜑 → (∃!𝑥∃!𝑦𝜑 ↔ (∃!𝑥∃𝑦𝜑 ∧ ∃!𝑦∃𝑥𝜑)))

Syntax hints:   → wi 4   ↔ wb 205   ∧ wa 394  ∀wal 1537  ∃wex 1779  ∃*wmo 2530  ∃!weu 2560

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1911  ax-6 1969  ax-7 2009  ax-10 2135  ax-11 2152  ax-12 2169  ax-13 2369

This theorem depends on definitions:  df-bi 206  df-an 395  df-or 844  df-tru 1542  df-ex 1780  df-nf 1784  df-mo 2532  df-eu 2561

This theorem is referenced by:  2eu2  2646  2eu3  2647