Metamath Proof Explorer


Theorem sucprcreg

Description: A class is equal to its successor iff it is a proper class (assuming the Axiom of Regularity). (Contributed by NM, 9-Jul-2004) (Proof shortened by BJ, 16-Apr-2019) (Proof shortened by SN, 22-Apr-2026)

Ref Expression
Assertion sucprcreg ⊢ ¬ A ∈ V ↔ suc ⁡ A = A

Proof

Step Hyp Ref Expression
1 sucprc ⊢ ¬ A ∈ V → suc ⁡ A = A
2 elirr ⊢ ¬ A ∈ A
3 snssg ⊢ A ∈ V → A ∈ A ↔ A ⊆ A
4 2 3 mtbii ⊢ A ∈ V → ¬ A ⊆ A
5 df-suc ⊢ suc ⁡ A = A ∪ A
6 5 eqeq1i ⊢ suc ⁡ A = A ↔ A ∪ A = A
7 ssequn2 ⊢ A ⊆ A ↔ A ∪ A = A
8 6 7 sylbb2 ⊢ suc ⁡ A = A → A ⊆ A
9 4 8 nsyl3 ⊢ suc ⁡ A = A → ¬ A ∈ V
10 1 9 impbii ⊢ ¬ A ∈ V ↔ suc ⁡ A = A