MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  2eu6 Structured version   Visualization version   GIF version

Theorem 2eu6 2658
Description: Two equivalent expressions for double existential uniqueness. (Contributed by NM, 2-Feb-2005.) (Revised by Mario Carneiro, 17-Oct-2016.) (Proof shortened by Wolf Lammen, 2-Oct-2019.)
Assertion
Ref Expression
2eu6 ((∃!𝑥𝑦𝜑 ∧ ∃!𝑦𝑥𝜑) ↔ ∃𝑧𝑤𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)))
Distinct variable groups:   𝑥,𝑦,𝑧,𝑤   𝜑,𝑧,𝑤
Allowed substitution hints:   𝜑(𝑥,𝑦)

Proof of Theorem 2eu6
StepHypRef Expression
1 2eu4 2656 . 2 ((∃!𝑥𝑦𝜑 ∧ ∃!𝑦𝑥𝜑) ↔ (∃𝑥𝑦𝜑 ∧ ∃𝑧𝑤𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤))))
2 nfia1 2150 . . . . . 6 𝑥(∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → ∀𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)))
3 nfa1 2148 . . . . . . . . . . . . 13 𝑦𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤))
4 nfv 1917 . . . . . . . . . . . . 13 𝑦 𝑥 = 𝑧
5 simpl 483 . . . . . . . . . . . . . . 15 ((𝑥 = 𝑧𝑦 = 𝑤) → 𝑥 = 𝑧)
65imim2i 16 . . . . . . . . . . . . . 14 ((𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (𝜑𝑥 = 𝑧))
76sps 2178 . . . . . . . . . . . . 13 (∀𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (𝜑𝑥 = 𝑧))
83, 4, 7exlimd 2211 . . . . . . . . . . . 12 (∀𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (∃𝑦𝜑𝑥 = 𝑧))
9 ax12v 2172 . . . . . . . . . . . 12 (𝑥 = 𝑧 → (∃𝑦𝜑 → ∀𝑥(𝑥 = 𝑧 → ∃𝑦𝜑)))
108, 9syli 39 . . . . . . . . . . 11 (∀𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (∃𝑦𝜑 → ∀𝑥(𝑥 = 𝑧 → ∃𝑦𝜑)))
1110com12 32 . . . . . . . . . 10 (∃𝑦𝜑 → (∀𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → ∀𝑥(𝑥 = 𝑧 → ∃𝑦𝜑)))
1211spsd 2180 . . . . . . . . 9 (∃𝑦𝜑 → (∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → ∀𝑥(𝑥 = 𝑧 → ∃𝑦𝜑)))
13 nfs1v 2153 . . . . . . . . . . . . 13 𝑦[𝑤 / 𝑦]𝜑
14 simpr 485 . . . . . . . . . . . . . . . 16 ((𝑥 = 𝑧𝑦 = 𝑤) → 𝑦 = 𝑤)
1514imim2i 16 . . . . . . . . . . . . . . 15 ((𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (𝜑𝑦 = 𝑤))
16 sbequ1 2240 . . . . . . . . . . . . . . 15 (𝑦 = 𝑤 → (𝜑 → [𝑤 / 𝑦]𝜑))
1715, 16syli 39 . . . . . . . . . . . . . 14 ((𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (𝜑 → [𝑤 / 𝑦]𝜑))
1817sps 2178 . . . . . . . . . . . . 13 (∀𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (𝜑 → [𝑤 / 𝑦]𝜑))
193, 13, 18exlimd 2211 . . . . . . . . . . . 12 (∀𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (∃𝑦𝜑 → [𝑤 / 𝑦]𝜑))
2019imim2d 57 . . . . . . . . . . 11 (∀𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → ((𝑥 = 𝑧 → ∃𝑦𝜑) → (𝑥 = 𝑧 → [𝑤 / 𝑦]𝜑)))
2120al2imi 1818 . . . . . . . . . 10 (∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (∀𝑥(𝑥 = 𝑧 → ∃𝑦𝜑) → ∀𝑥(𝑥 = 𝑧 → [𝑤 / 𝑦]𝜑)))
22 sb6 2088 . . . . . . . . . . 11 ([𝑧 / 𝑥][𝑤 / 𝑦]𝜑 ↔ ∀𝑥(𝑥 = 𝑧 → [𝑤 / 𝑦]𝜑))
23 2sb6 2089 . . . . . . . . . . 11 ([𝑧 / 𝑥][𝑤 / 𝑦]𝜑 ↔ ∀𝑥𝑦((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑))
2422, 23bitr3i 276 . . . . . . . . . 10 (∀𝑥(𝑥 = 𝑧 → [𝑤 / 𝑦]𝜑) ↔ ∀𝑥𝑦((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑))
2521, 24syl6ib 250 . . . . . . . . 9 (∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (∀𝑥(𝑥 = 𝑧 → ∃𝑦𝜑) → ∀𝑥𝑦((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑)))
2612, 25sylcom 30 . . . . . . . 8 (∃𝑦𝜑 → (∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → ∀𝑥𝑦((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑)))
2726ancld 551 . . . . . . 7 (∃𝑦𝜑 → (∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → (∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) ∧ ∀𝑥𝑦((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑))))
28 2albiim 1893 . . . . . . 7 (∀𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)) ↔ (∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) ∧ ∀𝑥𝑦((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑)))
2927, 28syl6ibr 251 . . . . . 6 (∃𝑦𝜑 → (∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → ∀𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤))))
302, 29exlimi 2210 . . . . 5 (∃𝑥𝑦𝜑 → (∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → ∀𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤))))
31302eximdv 1922 . . . 4 (∃𝑥𝑦𝜑 → (∃𝑧𝑤𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)) → ∃𝑧𝑤𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤))))
3231imp 407 . . 3 ((∃𝑥𝑦𝜑 ∧ ∃𝑧𝑤𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤))) → ∃𝑧𝑤𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)))
33 biimpr 219 . . . . . . 7 ((𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)) → ((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑))
34332alimi 1815 . . . . . 6 (∀𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)) → ∀𝑥𝑦((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑))
35342eximi 1838 . . . . 5 (∃𝑧𝑤𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)) → ∃𝑧𝑤𝑥𝑦((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑))
36 2exsb 2358 . . . . 5 (∃𝑥𝑦𝜑 ↔ ∃𝑧𝑤𝑥𝑦((𝑥 = 𝑧𝑦 = 𝑤) → 𝜑))
3735, 36sylibr 233 . . . 4 (∃𝑧𝑤𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)) → ∃𝑥𝑦𝜑)
38 biimp 214 . . . . . 6 ((𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)) → (𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)))
39382alimi 1815 . . . . 5 (∀𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)) → ∀𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)))
40392eximi 1838 . . . 4 (∃𝑧𝑤𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)) → ∃𝑧𝑤𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤)))
4137, 40jca 512 . . 3 (∃𝑧𝑤𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)) → (∃𝑥𝑦𝜑 ∧ ∃𝑧𝑤𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤))))
4232, 41impbii 208 . 2 ((∃𝑥𝑦𝜑 ∧ ∃𝑧𝑤𝑥𝑦(𝜑 → (𝑥 = 𝑧𝑦 = 𝑤))) ↔ ∃𝑧𝑤𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)))
431, 42bitri 274 1 ((∃!𝑥𝑦𝜑 ∧ ∃!𝑦𝑥𝜑) ↔ ∃𝑧𝑤𝑥𝑦(𝜑 ↔ (𝑥 = 𝑧𝑦 = 𝑤)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 396  wal 1537  wex 1782  [wsb 2067  ∃!weu 2568
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1913  ax-6 1971  ax-7 2011  ax-10 2137  ax-11 2154  ax-12 2171
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 845  df-ex 1783  df-nf 1787  df-sb 2068  df-mo 2540  df-eu 2569
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator