Theorem sucidVD 45054

Description: A set belongs to its successor. The following User's Proof is a Virtual Deduction proof completed automatically by the tools program completeusersproof.cmd, which invokes Mel L. O'Cat's mmj2 and Norm Megill's Metamath Proof Assistant. sucid 6399 is sucidVD 45054 without virtual deductions and was automatically derived from sucidVD 45054.

h1::	⊢ 𝐴 ∈ V
2:1:	⊢ 𝐴 ∈ {𝐴}
3:2:	⊢ 𝐴 ∈ (𝐴 ∪ {𝐴})
4::	⊢ suc 𝐴 = (𝐴 ∪ {𝐴})
qed:3,4:	⊢ 𝐴 ∈ suc 𝐴

(Contributed by Alan Sare, 18-Feb-2012.) (Proof modification is discouraged.) (New usage is discouraged.)

Hypothesis

Ref	Expression
sucidVD.1	⊢ 𝐴 ∈ V

Assertion

Ref	Expression
sucidVD	⊢ 𝐴 ∈ suc 𝐴

Proof of Theorem sucidVD

Step	Hyp	Ref	Expression
1		sucidVD.1	. . . 4 ⊢ 𝐴 ∈ V
2	1	snid 4617	. . 3 ⊢ 𝐴 ∈ {𝐴}
3		elun2 4133	. . 3 ⊢ (𝐴 ∈ {𝐴} → 𝐴 ∈ (𝐴 ∪ {𝐴}))
4	2, 3	e0a 44954	. 2 ⊢ 𝐴 ∈ (𝐴 ∪ {𝐴})
5		df-suc 6321	. 2 ⊢ suc 𝐴 = (𝐴 ∪ {𝐴})
6	4, 5	eleqtrri 2833	1 ⊢ 𝐴 ∈ suc 𝐴

Syntax hints:   ∈ wcel 2113  Vcvv 3438   ∪ cun 3897  {csn 4578  suc csuc 6317

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1968  ax-7 2009  ax-8 2115  ax-9 2123  ax-ext 2706

This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-tru 1544  df-ex 1781  df-sb 2068  df-clab 2713  df-cleq 2726  df-clel 2809  df-v 3440  df-un 3904  df-ss 3916  df-sn 4579  df-suc 6321

This theorem is referenced by: (None)