Metamath Proof Explorer


Theorem opelreal

Description: Ordered pair membership in class of real subset of complex numbers. (Contributed by NM, 22-Feb-1996) (New usage is discouraged.)

Ref Expression
Assertion opelreal ⊢ A 0 𝑹 ∈ ℝ ↔ A ∈ 𝑹

Proof

Step Hyp Ref Expression
1 eqid ⊢ 0 𝑹 = 0 𝑹
2 df-r ⊢ ℝ = 𝑹 × 0 𝑹
3 2 eleq2i ⊢ A 0 𝑹 ∈ ℝ ↔ A 0 𝑹 ∈ 𝑹 × 0 𝑹
4 opelxp ⊢ A 0 𝑹 ∈ 𝑹 × 0 𝑹 ↔ A ∈ 𝑹 ∧ 0 𝑹 ∈ 0 𝑹
5 0r ⊢ 0 𝑹 ∈ 𝑹
6 5 elexi ⊢ 0 𝑹 ∈ V
7 6 elsn ⊢ 0 𝑹 ∈ 0 𝑹 ↔ 0 𝑹 = 0 𝑹
8 7 anbi2i ⊢ A ∈ 𝑹 ∧ 0 𝑹 ∈ 0 𝑹 ↔ A ∈ 𝑹 ∧ 0 𝑹 = 0 𝑹
9 3 4 8 3bitri ⊢ A 0 𝑹 ∈ ℝ ↔ A ∈ 𝑹 ∧ 0 𝑹 = 0 𝑹
10 1 9 mpbiran2 ⊢ A 0 𝑹 ∈ ℝ ↔ A ∈ 𝑹