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

Theorem rmoanim 3831
Description: Introduction of a conjunct into restricted "at most one" quantifier, analogous to moanim 2623. (Contributed by Alexander van der Vekens, 25-Jun-2017.) Avoid ax-10 2140 and ax-11 2157. (Revised by Gino Giotto, 24-Aug-2023.)
Hypothesis
Ref Expression
rmoanim.1 𝑥𝜑
Assertion
Ref Expression
rmoanim (∃*𝑥𝐴 (𝜑𝜓) ↔ (𝜑 → ∃*𝑥𝐴 𝜓))

Proof of Theorem rmoanim
Dummy variable 𝑦 is distinct from all other variables.
StepHypRef Expression
1 impexp 450 . . . . 5 (((𝜑𝜓) → 𝑥 = 𝑦) ↔ (𝜑 → (𝜓𝑥 = 𝑦)))
21ralbii 3092 . . . 4 (∀𝑥𝐴 ((𝜑𝜓) → 𝑥 = 𝑦) ↔ ∀𝑥𝐴 (𝜑 → (𝜓𝑥 = 𝑦)))
3 rmoanim.1 . . . . 5 𝑥𝜑
43r19.21 3140 . . . 4 (∀𝑥𝐴 (𝜑 → (𝜓𝑥 = 𝑦)) ↔ (𝜑 → ∀𝑥𝐴 (𝜓𝑥 = 𝑦)))
52, 4bitri 274 . . 3 (∀𝑥𝐴 ((𝜑𝜓) → 𝑥 = 𝑦) ↔ (𝜑 → ∀𝑥𝐴 (𝜓𝑥 = 𝑦)))
65exbii 1853 . 2 (∃𝑦𝑥𝐴 ((𝜑𝜓) → 𝑥 = 𝑦) ↔ ∃𝑦(𝜑 → ∀𝑥𝐴 (𝜓𝑥 = 𝑦)))
7 df-rmo 3073 . . 3 (∃*𝑥𝐴 (𝜑𝜓) ↔ ∃*𝑥(𝑥𝐴 ∧ (𝜑𝜓)))
8 df-mo 2541 . . 3 (∃*𝑥(𝑥𝐴 ∧ (𝜑𝜓)) ↔ ∃𝑦𝑥((𝑥𝐴 ∧ (𝜑𝜓)) → 𝑥 = 𝑦))
9 impexp 450 . . . . . 6 (((𝑥𝐴 ∧ (𝜑𝜓)) → 𝑥 = 𝑦) ↔ (𝑥𝐴 → ((𝜑𝜓) → 𝑥 = 𝑦)))
109albii 1825 . . . . 5 (∀𝑥((𝑥𝐴 ∧ (𝜑𝜓)) → 𝑥 = 𝑦) ↔ ∀𝑥(𝑥𝐴 → ((𝜑𝜓) → 𝑥 = 𝑦)))
11 df-ral 3070 . . . . 5 (∀𝑥𝐴 ((𝜑𝜓) → 𝑥 = 𝑦) ↔ ∀𝑥(𝑥𝐴 → ((𝜑𝜓) → 𝑥 = 𝑦)))
1210, 11bitr4i 277 . . . 4 (∀𝑥((𝑥𝐴 ∧ (𝜑𝜓)) → 𝑥 = 𝑦) ↔ ∀𝑥𝐴 ((𝜑𝜓) → 𝑥 = 𝑦))
1312exbii 1853 . . 3 (∃𝑦𝑥((𝑥𝐴 ∧ (𝜑𝜓)) → 𝑥 = 𝑦) ↔ ∃𝑦𝑥𝐴 ((𝜑𝜓) → 𝑥 = 𝑦))
147, 8, 133bitri 296 . 2 (∃*𝑥𝐴 (𝜑𝜓) ↔ ∃𝑦𝑥𝐴 ((𝜑𝜓) → 𝑥 = 𝑦))
15 df-rmo 3073 . . . . 5 (∃*𝑥𝐴 𝜓 ↔ ∃*𝑥(𝑥𝐴𝜓))
16 df-mo 2541 . . . . 5 (∃*𝑥(𝑥𝐴𝜓) ↔ ∃𝑦𝑥((𝑥𝐴𝜓) → 𝑥 = 𝑦))
17 impexp 450 . . . . . . . 8 (((𝑥𝐴𝜓) → 𝑥 = 𝑦) ↔ (𝑥𝐴 → (𝜓𝑥 = 𝑦)))
1817albii 1825 . . . . . . 7 (∀𝑥((𝑥𝐴𝜓) → 𝑥 = 𝑦) ↔ ∀𝑥(𝑥𝐴 → (𝜓𝑥 = 𝑦)))
19 df-ral 3070 . . . . . . 7 (∀𝑥𝐴 (𝜓𝑥 = 𝑦) ↔ ∀𝑥(𝑥𝐴 → (𝜓𝑥 = 𝑦)))
2018, 19bitr4i 277 . . . . . 6 (∀𝑥((𝑥𝐴𝜓) → 𝑥 = 𝑦) ↔ ∀𝑥𝐴 (𝜓𝑥 = 𝑦))
2120exbii 1853 . . . . 5 (∃𝑦𝑥((𝑥𝐴𝜓) → 𝑥 = 𝑦) ↔ ∃𝑦𝑥𝐴 (𝜓𝑥 = 𝑦))
2215, 16, 213bitri 296 . . . 4 (∃*𝑥𝐴 𝜓 ↔ ∃𝑦𝑥𝐴 (𝜓𝑥 = 𝑦))
2322imbi2i 335 . . 3 ((𝜑 → ∃*𝑥𝐴 𝜓) ↔ (𝜑 → ∃𝑦𝑥𝐴 (𝜓𝑥 = 𝑦)))
24 19.37v 1998 . . 3 (∃𝑦(𝜑 → ∀𝑥𝐴 (𝜓𝑥 = 𝑦)) ↔ (𝜑 → ∃𝑦𝑥𝐴 (𝜓𝑥 = 𝑦)))
2523, 24bitr4i 277 . 2 ((𝜑 → ∃*𝑥𝐴 𝜓) ↔ ∃𝑦(𝜑 → ∀𝑥𝐴 (𝜓𝑥 = 𝑦)))
266, 14, 253bitr4i 302 1 (∃*𝑥𝐴 (𝜑𝜓) ↔ (𝜑 → ∃*𝑥𝐴 𝜓))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 205  wa 395  wal 1539  wex 1785  wnf 1789  wcel 2109  ∃*wmo 2539  wral 3065  ∃*wrmo 3068
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1801  ax-4 1815  ax-5 1916  ax-6 1974  ax-7 2014  ax-12 2174
This theorem depends on definitions:  df-bi 206  df-an 396  df-ex 1786  df-nf 1790  df-mo 2541  df-ral 3070  df-rmo 3073
This theorem is referenced by:  2reu1  3834
  Copyright terms: Public domain W3C validator