Metamath Proof Explorer


Theorem 2reuswap

Description: A condition allowing swap of uniqueness and existential quantifiers. (Contributed by Thierry Arnoux, 7-Apr-2017) (Revised by NM, 16-Jun-2017)

Ref Expression
Assertion 2reuswap x A * y B φ ∃! x A y B φ ∃! y B x A φ

Proof

Step Hyp Ref Expression
1 df-rmo * y B φ * y y B φ
2 1 ralbii x A * y B φ x A * y y B φ
3 df-ral x A * y y B φ x x A * y y B φ
4 moanimv * y x A y B φ x A * y y B φ
5 4 albii x * y x A y B φ x x A * y y B φ
6 3 5 bitr4i x A * y y B φ x * y x A y B φ
7 2euswapv x * y x A y B φ ∃! x y x A y B φ ∃! y x x A y B φ
8 df-reu ∃! x A y B φ ∃! x x A y B φ
9 r19.42v y B x A φ x A y B φ
10 df-rex y B x A φ y y B x A φ
11 9 10 bitr3i x A y B φ y y B x A φ
12 an12 y B x A φ x A y B φ
13 12 exbii y y B x A φ y x A y B φ
14 11 13 bitri x A y B φ y x A y B φ
15 14 eubii ∃! x x A y B φ ∃! x y x A y B φ
16 8 15 bitri ∃! x A y B φ ∃! x y x A y B φ
17 df-reu ∃! y B x A φ ∃! y y B x A φ
18 r19.42v x A y B φ y B x A φ
19 df-rex x A y B φ x x A y B φ
20 18 19 bitr3i y B x A φ x x A y B φ
21 20 eubii ∃! y y B x A φ ∃! y x x A y B φ
22 17 21 bitri ∃! y B x A φ ∃! y x x A y B φ
23 7 16 22 3imtr4g x * y x A y B φ ∃! x A y B φ ∃! y B x A φ
24 6 23 sylbi x A * y y B φ ∃! x A y B φ ∃! y B x A φ
25 2 24 sylbi x A * y B φ ∃! x A y B φ ∃! y B x A φ