Theorem sucidg 4513

Description: Part of Proposition 7.23 of [TakeutiZaring] p. 41 (generalized). (Contributed by NM, 25-Mar-1995.) (Proof shortened by Scott Fenton, 20-Feb-2012.)

Assertion

Ref	Expression
sucidg	|- ( A e. V -> A e. suc A )

Proof of Theorem sucidg

Step	Hyp	Ref	Expression
1		eqid 2231	. . 3 |- A = A
2	1	olci 739	. 2 |- ( A e. A \/ A = A )
3		elsucg 4501	. 2 |- ( A e. V -> ( A e. suc A <-> ( A e. A \/ A = A ) ) )
4	2, 3	mpbiri 168	1 |- ( A e. V -> A e. suc A )

Syntax hints:   -> wi 4   \/ wo 715   = wceq 1397   e. wcel 2202   suc csuc 4462

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 716  ax-5 1495  ax-7 1496  ax-gen 1497  ax-ie1 1541  ax-ie2 1542  ax-8 1552  ax-10 1553  ax-11 1554  ax-i12 1555  ax-bndl 1557  ax-4 1558  ax-17 1574  ax-i9 1578  ax-ial 1582  ax-i5r 1583  ax-ext 2213

This theorem depends on definitions:  df-bi 117  df-tru 1400  df-nf 1509  df-sb 1811  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2363  df-v 2804  df-un 3204  df-sn 3675  df-suc 4468

This theorem is referenced by:  sucid  4514  nsuceq0g  4515  trsuc  4519  sucssel  4521  ordsucg  4600  sucunielr  4608  suc11g  4655  nlimsucg  4664  peano2b  4713  omsinds  4720  nnpredlt  4722  frecsuclem  6571  phplem4dom  7047  phplem4on  7053  dif1en  7067  fin0  7073  fin0or  7074  fidcenumlemrks  7151  bj-peano4  16550