Metamath Proof Explorer


Theorem 2oconcl

Description: Closure of the pair swapping function on 2o . (Contributed by Mario Carneiro, 27-Sep-2015)

Ref Expression
Assertion 2oconcl ⊢ A ∈ 2 𝑜 → 1 𝑜 ∖ A ∈ 2 𝑜

Proof

Step Hyp Ref Expression
1 elpri ⊢ A ∈ ∅ 1 𝑜 → A = ∅ ∨ A = 1 𝑜
2 difeq2 ⊢ A = ∅ → 1 𝑜 ∖ A = 1 𝑜 ∖ ∅
3 dif0 ⊢ 1 𝑜 ∖ ∅ = 1 𝑜
4 2 3 eqtrdi ⊢ A = ∅ → 1 𝑜 ∖ A = 1 𝑜
5 difeq2 ⊢ A = 1 𝑜 → 1 𝑜 ∖ A = 1 𝑜 ∖ 1 𝑜
6 difid ⊢ 1 𝑜 ∖ 1 𝑜 = ∅
7 5 6 eqtrdi ⊢ A = 1 𝑜 → 1 𝑜 ∖ A = ∅
8 4 7 orim12i ⊢ A = ∅ ∨ A = 1 𝑜 → 1 𝑜 ∖ A = 1 𝑜 ∨ 1 𝑜 ∖ A = ∅
9 8 orcomd ⊢ A = ∅ ∨ A = 1 𝑜 → 1 𝑜 ∖ A = ∅ ∨ 1 𝑜 ∖ A = 1 𝑜
10 1 9 syl ⊢ A ∈ ∅ 1 𝑜 → 1 𝑜 ∖ A = ∅ ∨ 1 𝑜 ∖ A = 1 𝑜
11 1on ⊢ 1 𝑜 ∈ On
12 difexg ⊢ 1 𝑜 ∈ On → 1 𝑜 ∖ A ∈ V
13 11 12 ax-mp ⊢ 1 𝑜 ∖ A ∈ V
14 13 elpr ⊢ 1 𝑜 ∖ A ∈ ∅ 1 𝑜 ↔ 1 𝑜 ∖ A = ∅ ∨ 1 𝑜 ∖ A = 1 𝑜
15 10 14 sylibr ⊢ A ∈ ∅ 1 𝑜 → 1 𝑜 ∖ A ∈ ∅ 1 𝑜
16 df2o3 ⊢ 2 𝑜 = ∅ 1 𝑜
17 15 16 eleqtrrdi ⊢ A ∈ ∅ 1 𝑜 → 1 𝑜 ∖ A ∈ 2 𝑜
18 17 16 eleq2s ⊢ A ∈ 2 𝑜 → 1 𝑜 ∖ A ∈ 2 𝑜