Metamath Proof Explorer


Theorem bj-elsngl

Description: Characterization of the elements of the singletonization of a class. (Contributed by BJ, 6-Oct-2018)

Ref Expression
Assertion bj-elsngl ⊢ A ∈ sngl B ↔ ∃ x ∈ B A = x

Proof

Step Hyp Ref Expression
1 dfclel ⊢ A ∈ sngl B ↔ ∃ y y = A ∧ y ∈ sngl B
2 df-bj-sngl ⊢ sngl B = y | ∃ x ∈ B y = x
3 2 eqabri ⊢ y ∈ sngl B ↔ ∃ x ∈ B y = x
4 3 anbi2i ⊢ y = A ∧ y ∈ sngl B ↔ y = A ∧ ∃ x ∈ B y = x
5 4 exbii ⊢ ∃ y y = A ∧ y ∈ sngl B ↔ ∃ y y = A ∧ ∃ x ∈ B y = x
6 r19.42v ⊢ ∃ x ∈ B y = A ∧ y = x ↔ y = A ∧ ∃ x ∈ B y = x
7 6 bicomi ⊢ y = A ∧ ∃ x ∈ B y = x ↔ ∃ x ∈ B y = A ∧ y = x
8 7 exbii ⊢ ∃ y y = A ∧ ∃ x ∈ B y = x ↔ ∃ y ∃ x ∈ B y = A ∧ y = x
9 rexcom4 ⊢ ∃ x ∈ B ∃ y y = A ∧ y = x ↔ ∃ y ∃ x ∈ B y = A ∧ y = x
10 9 bicomi ⊢ ∃ y ∃ x ∈ B y = A ∧ y = x ↔ ∃ x ∈ B ∃ y y = A ∧ y = x
11 eqcom ⊢ A = x ↔ x = A
12 vsnex ⊢ x ∈ V
13 12 eqvinc ⊢ x = A ↔ ∃ y y = x ∧ y = A
14 exancom ⊢ ∃ y y = x ∧ y = A ↔ ∃ y y = A ∧ y = x
15 11 13 14 3bitri ⊢ A = x ↔ ∃ y y = A ∧ y = x
16 15 bicomi ⊢ ∃ y y = A ∧ y = x ↔ A = x
17 16 rexbii ⊢ ∃ x ∈ B ∃ y y = A ∧ y = x ↔ ∃ x ∈ B A = x
18 8 10 17 3bitri ⊢ ∃ y y = A ∧ ∃ x ∈ B y = x ↔ ∃ x ∈ B A = x
19 1 5 18 3bitri ⊢ A ∈ sngl B ↔ ∃ x ∈ B A = x