Theorem sucprcreg 9569

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.)

Assertion

Ref	Expression
sucprcreg	⊢ (¬ 𝐴 ∈ V ↔ suc 𝐴 = 𝐴)

Proof of Theorem sucprcreg

Step	Hyp	Ref	Expression
1		sucprc 6441	. 2 ⊢ (¬ 𝐴 ∈ V → suc 𝐴 = 𝐴)
2		elirr 9563	. . . 4 ⊢ ¬ 𝐴 ∈ 𝐴
3		snssg 4750	. . . 4 ⊢ (𝐴 ∈ V → (𝐴 ∈ 𝐴 ↔ {𝐴} ⊆ 𝐴))
4	2, 3	mtbii 329	. . 3 ⊢ (𝐴 ∈ V → ¬ {𝐴} ⊆ 𝐴)
5		df-suc 6368	. . . . 5 ⊢ suc 𝐴 = (𝐴 ∪ {𝐴})
6	5	eqeq1i 2768	. . . 4 ⊢ (suc 𝐴 = 𝐴 ↔ (𝐴 ∪ {𝐴}) = 𝐴)
7		ssequn2 4143	. . . 4 ⊢ ({𝐴} ⊆ 𝐴 ↔ (𝐴 ∪ {𝐴}) = 𝐴)
8	6, 7	sylbb2 241	. . 3 ⊢ (suc 𝐴 = 𝐴 → {𝐴} ⊆ 𝐴)
9	4, 8	nsyl3 139	. 2 ⊢ (suc 𝐴 = 𝐴 → ¬ 𝐴 ∈ V)
10	1, 9	impbii 212	1 ⊢ (¬ 𝐴 ∈ V ↔ suc 𝐴 = 𝐴)

Syntax hints:  ¬ wn 3   ↔ wb 209   = wceq 1570   ∈ wcel 2143  Vcvv 3455   ∪ cun 3904   ⊆ wss 3906  {csn 4590  suc csuc 6364

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-ext 2735  ax-sep 5258  ax-reg 9555

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-tru 1573  df-fal 1583  df-ex 1810  df-sb 2097  df-clab 2742  df-cleq 2755  df-clel 2838  df-v 3457  df-dif 3909  df-un 3911  df-ss 3923  df-nul 4288  df-sn 4591  df-suc 6368

This theorem is referenced by: (None)