Metamath Proof Explorer


Theorem copsex2t

Description: Closed theorem form of copsex2g . (Contributed by NM, 17-Feb-2013)

Ref Expression
Assertion copsex2t ⊢ ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ ∧ A ∈ V ∧ B ∈ W → ∃ x ∃ y A B = x y ∧ φ ↔ ψ

Proof

Step Hyp Ref Expression
1 nfa1 ⊢ Ⅎ x ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ
2 nfe1 ⊢ Ⅎ x ∃ x ∃ y A B = x y ∧ φ
3 nfv ⊢ Ⅎ x ψ
4 2 3 nfbi ⊢ Ⅎ x ∃ x ∃ y A B = x y ∧ φ ↔ ψ
5 nfa2 ⊢ Ⅎ y ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ
6 nfe1 ⊢ Ⅎ y ∃ y A B = x y ∧ φ
7 6 nfex ⊢ Ⅎ y ∃ x ∃ y A B = x y ∧ φ
8 nfv ⊢ Ⅎ y ψ
9 7 8 nfbi ⊢ Ⅎ y ∃ x ∃ y A B = x y ∧ φ ↔ ψ
10 opeq12 ⊢ x = A ∧ y = B → x y = A B
11 copsexgw ⊢ A B = x y → φ ↔ ∃ x ∃ y A B = x y ∧ φ
12 11 eqcoms ⊢ x y = A B → φ ↔ ∃ x ∃ y A B = x y ∧ φ
13 10 12 syl ⊢ x = A ∧ y = B → φ ↔ ∃ x ∃ y A B = x y ∧ φ
14 13 adantl ⊢ ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ ∧ x = A ∧ y = B → φ ↔ ∃ x ∃ y A B = x y ∧ φ
15 2sp ⊢ ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ → x = A ∧ y = B → φ ↔ ψ
16 15 imp ⊢ ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ ∧ x = A ∧ y = B → φ ↔ ψ
17 14 16 bitr3d ⊢ ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ ∧ x = A ∧ y = B → ∃ x ∃ y A B = x y ∧ φ ↔ ψ
18 17 ex ⊢ ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ → x = A ∧ y = B → ∃ x ∃ y A B = x y ∧ φ ↔ ψ
19 5 9 18 exlimd ⊢ ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ → ∃ y x = A ∧ y = B → ∃ x ∃ y A B = x y ∧ φ ↔ ψ
20 1 4 19 exlimd ⊢ ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ → ∃ x ∃ y x = A ∧ y = B → ∃ x ∃ y A B = x y ∧ φ ↔ ψ
21 elisset ⊢ A ∈ V → ∃ x x = A
22 elisset ⊢ B ∈ W → ∃ y y = B
23 21 22 anim12i ⊢ A ∈ V ∧ B ∈ W → ∃ x x = A ∧ ∃ y y = B
24 exdistrv ⊢ ∃ x ∃ y x = A ∧ y = B ↔ ∃ x x = A ∧ ∃ y y = B
25 23 24 sylibr ⊢ A ∈ V ∧ B ∈ W → ∃ x ∃ y x = A ∧ y = B
26 20 25 impel ⊢ ∀ x ∀ y x = A ∧ y = B → φ ↔ ψ ∧ A ∈ V ∧ B ∈ W → ∃ x ∃ y A B = x y ∧ φ ↔ ψ