ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  2reuswapdc GIF version

Theorem 2reuswapdc 2794
Description: A condition allowing swap of uniqueness and existential quantifiers. (Contributed by Thierry Arnoux, 7-Apr-2017.) (Revised by NM, 16-Jun-2017.)
Assertion
Ref Expression
2reuswapdc (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥𝐴 ∃*𝑦𝐵 𝜑 → (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝐵𝑥𝐴 𝜑)))
Distinct variable groups:   𝑥,𝑦,𝐴   𝑥,𝐵
Allowed substitution hints:   𝜑(𝑥,𝑦)   𝐵(𝑦)

Proof of Theorem 2reuswapdc
StepHypRef Expression
1 df-rmo 2356 . . 3 (∃*𝑦𝐵 𝜑 ↔ ∃*𝑦(𝑦𝐵𝜑))
21ralbii 2372 . 2 (∀𝑥𝐴 ∃*𝑦𝐵 𝜑 ↔ ∀𝑥𝐴 ∃*𝑦(𝑦𝐵𝜑))
3 df-ral 2353 . . . 4 (∀𝑥𝐴 ∃*𝑦(𝑦𝐵𝜑) ↔ ∀𝑥(𝑥𝐴 → ∃*𝑦(𝑦𝐵𝜑)))
4 moanimv 2016 . . . . 5 (∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) ↔ (𝑥𝐴 → ∃*𝑦(𝑦𝐵𝜑)))
54albii 1399 . . . 4 (∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) ↔ ∀𝑥(𝑥𝐴 → ∃*𝑦(𝑦𝐵𝜑)))
63, 5bitr4i 185 . . 3 (∀𝑥𝐴 ∃*𝑦(𝑦𝐵𝜑) ↔ ∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
7 df-reu 2355 . . . . . 6 (∃!𝑥𝐴𝑦𝐵 𝜑 ↔ ∃!𝑥(𝑥𝐴 ∧ ∃𝑦𝐵 𝜑))
8 r19.42v 2511 . . . . . . . . 9 (∃𝑦𝐵 (𝑥𝐴𝜑) ↔ (𝑥𝐴 ∧ ∃𝑦𝐵 𝜑))
9 df-rex 2354 . . . . . . . . 9 (∃𝑦𝐵 (𝑥𝐴𝜑) ↔ ∃𝑦(𝑦𝐵 ∧ (𝑥𝐴𝜑)))
108, 9bitr3i 184 . . . . . . . 8 ((𝑥𝐴 ∧ ∃𝑦𝐵 𝜑) ↔ ∃𝑦(𝑦𝐵 ∧ (𝑥𝐴𝜑)))
11 an12 525 . . . . . . . . 9 ((𝑦𝐵 ∧ (𝑥𝐴𝜑)) ↔ (𝑥𝐴 ∧ (𝑦𝐵𝜑)))
1211exbii 1536 . . . . . . . 8 (∃𝑦(𝑦𝐵 ∧ (𝑥𝐴𝜑)) ↔ ∃𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
1310, 12bitri 182 . . . . . . 7 ((𝑥𝐴 ∧ ∃𝑦𝐵 𝜑) ↔ ∃𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
1413eubii 1950 . . . . . 6 (∃!𝑥(𝑥𝐴 ∧ ∃𝑦𝐵 𝜑) ↔ ∃!𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
157, 14bitri 182 . . . . 5 (∃!𝑥𝐴𝑦𝐵 𝜑 ↔ ∃!𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
16 2euswapdc 2032 . . . . 5 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∃!𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))))
1715, 16syl7bi 163 . . . 4 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))))
18 df-reu 2355 . . . . . 6 (∃!𝑦𝐵𝑥𝐴 𝜑 ↔ ∃!𝑦(𝑦𝐵 ∧ ∃𝑥𝐴 𝜑))
19 r19.42v 2511 . . . . . . . 8 (∃𝑥𝐴 (𝑦𝐵𝜑) ↔ (𝑦𝐵 ∧ ∃𝑥𝐴 𝜑))
20 df-rex 2354 . . . . . . . 8 (∃𝑥𝐴 (𝑦𝐵𝜑) ↔ ∃𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
2119, 20bitr3i 184 . . . . . . 7 ((𝑦𝐵 ∧ ∃𝑥𝐴 𝜑) ↔ ∃𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
2221eubii 1950 . . . . . 6 (∃!𝑦(𝑦𝐵 ∧ ∃𝑥𝐴 𝜑) ↔ ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
2318, 22bitri 182 . . . . 5 (∃!𝑦𝐵𝑥𝐴 𝜑 ↔ ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
2423imbi2i 224 . . . 4 ((∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝐵𝑥𝐴 𝜑) ↔ (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑))))
2517, 24syl6ibr 160 . . 3 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝐵𝑥𝐴 𝜑)))
266, 25syl5bi 150 . 2 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥𝐴 ∃*𝑦(𝑦𝐵𝜑) → (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝐵𝑥𝐴 𝜑)))
272, 26syl5bi 150 1 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥𝐴 ∃*𝑦𝐵 𝜑 → (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝐵𝑥𝐴 𝜑)))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 102  DECID wdc 775  wal 1282  wex 1421  wcel 1433  ∃!weu 1941  ∃*wmo 1942  wral 2348  wrex 2349  ∃!wreu 2350  ∃*wrmo 2351
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 576  ax-in2 577  ax-io 662  ax-5 1376  ax-7 1377  ax-gen 1378  ax-ie1 1422  ax-ie2 1423  ax-8 1435  ax-10 1436  ax-11 1437  ax-i12 1438  ax-bndl 1439  ax-4 1440  ax-17 1459  ax-i9 1463  ax-ial 1467  ax-i5r 1468
This theorem depends on definitions:  df-bi 115  df-dc 776  df-tru 1287  df-nf 1390  df-sb 1686  df-eu 1944  df-mo 1945  df-ral 2353  df-rex 2354  df-reu 2355  df-rmo 2356
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator