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 φ