Theorem speano5 13131

Description: Version of peano5 4507 when A is assumed to be a set, allowing a proof from the core axioms of CZF. (Contributed by BJ, 19-Nov-2019.) (Proof modification is discouraged.)

Assertion

Ref	Expression
speano5	|- ( ( A e. V /\ (/) e. A /\ A. x e. om ( x e. A -> suc x e. A ) ) -> om C_ A )

Distinct variable group:   x, A

Allowed substitution hint:   V( x)

Proof of Theorem speano5

Step	Hyp	Ref	Expression
1		bj-omex 13129	. . . 4 |- om e. _V
2		bj-inex 13094	. . . 4 |- ( ( om e. _V /\ A e. V ) -> ( om i^i A ) e. _V )
3	1, 2	mpan 420	. . 3 |- ( A e. V -> ( om i^i A ) e. _V )
4		peano5set 13127	. . 3 |- ( ( om i^i A ) e. _V -> ( ( (/) e. A /\ A. x e. om ( x e. A -> suc x e. A ) ) -> om C_ A ) )
5	3, 4	syl 14	. 2 |- ( A e. V -> ( ( (/) e. A /\ A. x e. om ( x e. A -> suc x e. A ) ) -> om C_ A ) )
6	5	3impib 1179	1 |- ( ( A e. V /\ (/) e. A /\ A. x e. om ( x e. A -> suc x e. A ) ) -> om C_ A )

Syntax hints:   -> wi 4   /\ wa 103   /\ w3a 962   e. wcel 1480   A.wral 2414   _Vcvv 2681   i^i cin 3065   C_ wss 3066   (/)c0 3358   suc csuc 4282   omcom 4499

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 603  ax-in2 604  ax-io 698  ax-5 1423  ax-7 1424  ax-gen 1425  ax-ie1 1469  ax-ie2 1470  ax-8 1482  ax-10 1483  ax-11 1484  ax-i12 1485  ax-bndl 1486  ax-4 1487  ax-13 1491  ax-14 1492  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2119  ax-nul 4049  ax-pr 4126  ax-un 4350  ax-bd0 13000  ax-bdan 13002  ax-bdor 13003  ax-bdex 13006  ax-bdeq 13007  ax-bdel 13008  ax-bdsb 13009  ax-bdsep 13071  ax-infvn 13128

This theorem depends on definitions:  df-bi 116  df-3an 964  df-tru 1334  df-nf 1437  df-sb 1736  df-clab 2124  df-cleq 2130  df-clel 2133  df-nfc 2268  df-ral 2419  df-rex 2420  df-rab 2423  df-v 2683  df-dif 3068  df-un 3070  df-in 3072  df-ss 3079  df-nul 3359  df-sn 3528  df-pr 3529  df-uni 3732  df-int 3767  df-suc 4288  df-iom 4500  df-bdc 13028  df-bj-ind 13114

This theorem is referenced by:  findset  13132