Theorem euim 2647

Description: Add unique existential quantifiers to an implication. Note the reversed implication in the antecedent. (Contributed by NM, 19-Oct-2005.) (Proof shortened by Andrew Salmon, 14-Jun-2011.) (Proof shortened by Wolf Lammen, 1-Oct-2023.)

Assertion

Ref	Expression
euim	⊢ ((∃𝑥𝜑 ∧ ∀𝑥(𝜑 → 𝜓)) → (∃!𝑥𝜓 → ∃!𝑥𝜑))

Proof of Theorem euim

Step	Hyp	Ref	Expression
1		euimmo 2646	. 2 ⊢ (∀𝑥(𝜑 → 𝜓) → (∃!𝑥𝜓 → ∃*𝑥𝜑))
2		exmoeub 2610	. . 3 ⊢ (∃𝑥𝜑 → (∃*𝑥𝜑 ↔ ∃!𝑥𝜑))
3	2	biimpd 232	. 2 ⊢ (∃𝑥𝜑 → (∃*𝑥𝜑 → ∃!𝑥𝜑))
4	1, 3	sylan9r 517	1 ⊢ ((∃𝑥𝜑 ∧ ∀𝑥(𝜑 → 𝜓)) → (∃!𝑥𝜓 → ∃!𝑥𝜑))

Syntax hints:   → wi 4   ∧ wa 400  ∀wal 1561  ∃wex 1802  ∃*wmo 2567  ∃!weu 2598

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1818  ax-4 1832  ax-5 1933  ax-6 1990  ax-7 2031

This theorem depends on definitions:  df-bi 210  df-an 401  df-ex 1803  df-mo 2569  df-eu 2599

This theorem is referenced by:  2eu1  2680  2eu1v  2681  dfatcolem  47848