Theorem sucprcreg 9520

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 6401	. 2 ⊢ (¬ 𝐴 ∈ V → suc 𝐴 = 𝐴)
2		elirr 9514	. . . 4 ⊢ ¬ 𝐴 ∈ 𝐴
3		snssg 4727	. . . 4 ⊢ (𝐴 ∈ V → (𝐴 ∈ 𝐴 ↔ {𝐴} ⊆ 𝐴))
4	2, 3	mtbii 326	. . 3 ⊢ (𝐴 ∈ V → ¬ {𝐴} ⊆ 𝐴)
5		df-suc 6329	. . . . 5 ⊢ suc 𝐴 = (𝐴 ∪ {𝐴})
6	5	eqeq1i 2741	. . . 4 ⊢ (suc 𝐴 = 𝐴 ↔ (𝐴 ∪ {𝐴}) = 𝐴)
7		ssequn2 4129	. . . 4 ⊢ ({𝐴} ⊆ 𝐴 ↔ (𝐴 ∪ {𝐴}) = 𝐴)
8	6, 7	sylbb2 238	. . 3 ⊢ (suc 𝐴 = 𝐴 → {𝐴} ⊆ 𝐴)
9	4, 8	nsyl3 138	. 2 ⊢ (suc 𝐴 = 𝐴 → ¬ 𝐴 ∈ V)
10	1, 9	impbii 209	1 ⊢ (¬ 𝐴 ∈ V ↔ suc 𝐴 = 𝐴)

Syntax hints:  ¬ wn 3   ↔ wb 206   = wceq 1542   ∈ wcel 2114  Vcvv 3429   ∪ cun 3887   ⊆ wss 3889  {csn 4567  suc csuc 6325

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-ext 2708  ax-sep 5231  ax-pr 5375  ax-reg 9507

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-tru 1545  df-fal 1555  df-ex 1782  df-sb 2069  df-clab 2715  df-cleq 2728  df-clel 2811  df-v 3431  df-dif 3892  df-un 3894  df-ss 3906  df-nul 4274  df-sn 4568  df-suc 6329

This theorem is referenced by: (None)