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

Theorem 2reuswapdc 2939
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 2461 . . 3 (∃*𝑦𝐵 𝜑 ↔ ∃*𝑦(𝑦𝐵𝜑))
21ralbii 2481 . 2 (∀𝑥𝐴 ∃*𝑦𝐵 𝜑 ↔ ∀𝑥𝐴 ∃*𝑦(𝑦𝐵𝜑))
3 df-ral 2458 . . . 4 (∀𝑥𝐴 ∃*𝑦(𝑦𝐵𝜑) ↔ ∀𝑥(𝑥𝐴 → ∃*𝑦(𝑦𝐵𝜑)))
4 moanimv 2099 . . . . 5 (∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) ↔ (𝑥𝐴 → ∃*𝑦(𝑦𝐵𝜑)))
54albii 1468 . . . 4 (∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) ↔ ∀𝑥(𝑥𝐴 → ∃*𝑦(𝑦𝐵𝜑)))
63, 5bitr4i 187 . . 3 (∀𝑥𝐴 ∃*𝑦(𝑦𝐵𝜑) ↔ ∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
7 df-reu 2460 . . . . . 6 (∃!𝑥𝐴𝑦𝐵 𝜑 ↔ ∃!𝑥(𝑥𝐴 ∧ ∃𝑦𝐵 𝜑))
8 r19.42v 2632 . . . . . . . . 9 (∃𝑦𝐵 (𝑥𝐴𝜑) ↔ (𝑥𝐴 ∧ ∃𝑦𝐵 𝜑))
9 df-rex 2459 . . . . . . . . 9 (∃𝑦𝐵 (𝑥𝐴𝜑) ↔ ∃𝑦(𝑦𝐵 ∧ (𝑥𝐴𝜑)))
108, 9bitr3i 186 . . . . . . . 8 ((𝑥𝐴 ∧ ∃𝑦𝐵 𝜑) ↔ ∃𝑦(𝑦𝐵 ∧ (𝑥𝐴𝜑)))
11 an12 561 . . . . . . . . 9 ((𝑦𝐵 ∧ (𝑥𝐴𝜑)) ↔ (𝑥𝐴 ∧ (𝑦𝐵𝜑)))
1211exbii 1603 . . . . . . . 8 (∃𝑦(𝑦𝐵 ∧ (𝑥𝐴𝜑)) ↔ ∃𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
1310, 12bitri 184 . . . . . . 7 ((𝑥𝐴 ∧ ∃𝑦𝐵 𝜑) ↔ ∃𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
1413eubii 2033 . . . . . 6 (∃!𝑥(𝑥𝐴 ∧ ∃𝑦𝐵 𝜑) ↔ ∃!𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
157, 14bitri 184 . . . . 5 (∃!𝑥𝐴𝑦𝐵 𝜑 ↔ ∃!𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
16 2euswapdc 2115 . . . . 5 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∃!𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))))
1715, 16syl7bi 165 . . . 4 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))))
18 df-reu 2460 . . . . . 6 (∃!𝑦𝐵𝑥𝐴 𝜑 ↔ ∃!𝑦(𝑦𝐵 ∧ ∃𝑥𝐴 𝜑))
19 r19.42v 2632 . . . . . . . 8 (∃𝑥𝐴 (𝑦𝐵𝜑) ↔ (𝑦𝐵 ∧ ∃𝑥𝐴 𝜑))
20 df-rex 2459 . . . . . . . 8 (∃𝑥𝐴 (𝑦𝐵𝜑) ↔ ∃𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
2119, 20bitr3i 186 . . . . . . 7 ((𝑦𝐵 ∧ ∃𝑥𝐴 𝜑) ↔ ∃𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
2221eubii 2033 . . . . . 6 (∃!𝑦(𝑦𝐵 ∧ ∃𝑥𝐴 𝜑) ↔ ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
2318, 22bitri 184 . . . . 5 (∃!𝑦𝐵𝑥𝐴 𝜑 ↔ ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑)))
2423imbi2i 226 . . . 4 ((∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝐵𝑥𝐴 𝜑) ↔ (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝑥(𝑥𝐴 ∧ (𝑦𝐵𝜑))))
2517, 24syl6ibr 162 . . 3 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥∃*𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝐵𝑥𝐴 𝜑)))
266, 25biimtrid 152 . 2 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥𝐴 ∃*𝑦(𝑦𝐵𝜑) → (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝐵𝑥𝐴 𝜑)))
272, 26biimtrid 152 1 (DECID𝑥𝑦(𝑥𝐴 ∧ (𝑦𝐵𝜑)) → (∀𝑥𝐴 ∃*𝑦𝐵 𝜑 → (∃!𝑥𝐴𝑦𝐵 𝜑 → ∃!𝑦𝐵𝑥𝐴 𝜑)))
Colors of variables: wff set class
Syntax hints:  wi 4  wa 104  DECID wdc 834  wal 1351  wex 1490  ∃!weu 2024  ∃*wmo 2025  wcel 2146  wral 2453  wrex 2454  ∃!wreu 2455  ∃*wrmo 2456
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 614  ax-in2 615  ax-io 709  ax-5 1445  ax-7 1446  ax-gen 1447  ax-ie1 1491  ax-ie2 1492  ax-8 1502  ax-10 1503  ax-11 1504  ax-i12 1505  ax-bndl 1507  ax-4 1508  ax-17 1524  ax-i9 1528  ax-ial 1532  ax-i5r 1533
This theorem depends on definitions:  df-bi 117  df-dc 835  df-tru 1356  df-nf 1459  df-sb 1761  df-eu 2027  df-mo 2028  df-ral 2458  df-rex 2459  df-reu 2460  df-rmo 2461
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator