Proof of Theorem opprc1b
| Step | Hyp | Ref
| Expression |
| 1 | | opprc1 2510 |
. . 3
⊢ (¬ A ∈ V
→ 〈A, B〉 = {∅,
{B}}) |
| 2 | | 0ex 2724 |
. . . 4
⊢ ∅ ∈
V |
| 3 | 2 | prid1 2462 |
. . 3
⊢ ∅ ∈ {∅, {B}} |
| 4 | 1, 3 | syl5eleqr 1562 |
. 2
⊢ (¬ A ∈ V
→ ∅ ∈
〈A,
B〉) |
| 5 | | opeq1 2499 |
. . . . . 6
⊢ (x = A →
〈x,
B〉 =
〈A,
B〉) |
| 6 | 5 | eleq2d 1548 |
. . . . 5
⊢ (x = A →
(∅ ∈ 〈x, B〉 ↔ ∅ ∈ 〈A, B〉)) |
| 7 | 6 | negbid 614 |
. . . 4
⊢ (x = A →
(¬ ∅ ∈
〈x,
B〉 ↔
¬ ∅ ∈
〈A,
B〉)) |
| 8 | | visset 1820 |
. . . . . . . . 9
⊢ x ∈
V |
| 9 | 8 | snnz 2470 |
. . . . . . . 8
⊢ {x} ≠ ∅ |
| 10 | | df-ne 1594 |
. . . . . . . 8
⊢ ({x} ≠ ∅ ↔
¬ {x} = ∅) |
| 11 | 9, 10 | mpbi 189 |
. . . . . . 7
⊢ ¬ {x} = ∅ |
| 12 | | eqcom 1484 |
. . . . . . 7
⊢ ({x} = ∅ ↔
∅ = {x}) |
| 13 | 11, 12 | mtbi 191 |
. . . . . 6
⊢ ¬ ∅ = {x} |
| 14 | 8 | prnz 2471 |
. . . . . . . 8
⊢ {x, B} ≠ ∅ |
| 15 | | df-ne 1594 |
. . . . . . . 8
⊢ ({x, B} ≠ ∅ ↔ ¬ {x, B} = ∅) |
| 16 | 14, 15 | mpbi 189 |
. . . . . . 7
⊢ ¬ {x, B} = ∅ |
| 17 | | eqcom 1484 |
. . . . . . 7
⊢ ({x, B} = ∅ ↔ ∅ =
{x, B}) |
| 18 | 16, 17 | mtbi 191 |
. . . . . 6
⊢ ¬ ∅ = {x,
B} |
| 19 | 13, 18 | pm3.2ni 583 |
. . . . 5
⊢ ¬ (∅ = {x} ⋁ ∅ = {x, B}) |
| 20 | 2 | elop 2797 |
. . . . 5
⊢ (∅ ∈ 〈x, B〉 ↔ (∅ = {x} ⋁ ∅ = {x, B})) |
| 21 | 19, 20 | mtbir 192 |
. . . 4
⊢ ¬ ∅ ∈ 〈x, B〉 |
| 22 | 7, 21 | vtoclg 1854 |
. . 3
⊢ (A ∈ V
→ ¬ ∅ ∈ 〈A, B〉) |
| 23 | 22 | con2i 97 |
. 2
⊢ (∅ ∈ 〈A, B〉 → ¬
A ∈
V) |
| 24 | 4, 23 | impbi 157 |
1
⊢ (¬ A ∈ V
↔ ∅ ∈
〈A,
B〉) |