Theorem findsd 4410

Description: Principle of finite induction over the finite cardinals, using implicit substitutions. The first hypothesis ensures stratification of ph, the next four set up the substitutions, and the last two set up the base case and induction hypothesis. This version allows for an extra deduction clause that may make proving stratification simpler. Compare Theorem X.1.13 of [Rosser] p. 277. (Contributed by SF, 31-Jul-2019.)

Hypotheses

Ref	Expression
findsd.1	|- (et -> {x | ph} e. V)
findsd.2	|- (x = 0c -> (ph <-> ps))
findsd.3	|- (x = y -> (ph <-> ch))
findsd.4	|- (x = (y +o 1c) -> (ph <-> th))
findsd.5	|- (x = A -> (ph <-> ta))
findsd.6	|- (et -> ps)
findsd.7	|- ((y e. Nn /\ et) -> (ch -> th))

Assertion

Ref	Expression
findsd	|- ((A e. Nn /\ et) -> ta)

Distinct variable groups:   x,A   ch,x   ph,y   ps,x   ta,x   th,x   x,y   et,y

Allowed substitution hints:   ph(x)   ps(y)   ch(y)   th(y)   ta(y)   et(x)   A(y)   V(x,y)

Proof of Theorem findsd

Step	Hyp	Ref	Expression
1		findsd.1	. . . . 5 |- (et -> {x | ph} e. V)
2		findsd.6	. . . . . 6 |- (et -> ps)
3		0cex 4392	. . . . . . 7 |- 0c e. _V
4		findsd.2	. . . . . . 7 |- (x = 0c -> (ph <-> ps))
5	3, 4	elab 2985	. . . . . 6 |- (0c e. {x | ph} <-> ps)
6	2, 5	sylibr 203	. . . . 5 |- (et -> 0c e. {x | ph})
7		findsd.7	. . . . . . . 8 |- ((y e. Nn /\ et) -> (ch -> th))
8		vex 2862	. . . . . . . . 9 |- y e. _V
9		findsd.3	. . . . . . . . 9 |- (x = y -> (ph <-> ch))
10	8, 9	elab 2985	. . . . . . . 8 |- (y e. {x | ph} <-> ch)
11		1cex 4142	. . . . . . . . . 10 |- 1c e. _V
12	8, 11	addcex 4394	. . . . . . . . 9 |- (y +o 1c) e. _V
13		findsd.4	. . . . . . . . 9 |- (x = (y +o 1c) -> (ph <-> th))
14	12, 13	elab 2985	. . . . . . . 8 |- ((y +o 1c) e. {x | ph} <-> th)
15	7, 10, 14	3imtr4g 261	. . . . . . 7 |- ((y e. Nn /\ et) -> (y e. {x | ph} -> (y +o 1c) e. {x | ph}))
16	15	ancoms 439	. . . . . 6 |- ((et /\ y e. Nn ) -> (y e. {x | ph} -> (y +o 1c) e. {x | ph}))
17	16	ralrimiva 2697	. . . . 5 |- (et -> A.y e. Nn (y e. {x | ph} -> (y +o 1c) e. {x | ph}))
18		peano5 4409	. . . . 5 |- (({x | ph} e. V /\ 0c e. {x | ph} /\ A.y e. Nn (y e. {x | ph} -> (y +o 1c) e. {x | ph})) -> Nn C_ {x | ph})
19	1, 6, 17, 18	syl3anc 1182	. . . 4 |- (et -> Nn C_ {x | ph})
20	19	sseld 3272	. . 3 |- (et -> (A e. Nn -> A e. {x | ph}))
21	20	impcom 419	. 2 |- ((A e. Nn /\ et) -> A e. {x | ph})
22		findsd.5	. . . 4 |- (x = A -> (ph <-> ta))
23	22	elabg 2986	. . 3 |- (A e. Nn -> (A e. {x | ph} <-> ta))
24	23	adantr 451	. 2 |- ((A e. Nn /\ et) -> (A e. {x | ph} <-> ta))
25	21, 24	mpbid 201	1 |- ((A e. Nn /\ et) -> ta)

Syntax hints:   -> wi 4   <-> wb 176   /\ wa 358   = wceq 1642   e. wcel 1710  {cab 2339  A.wral 2614   C_ wss 3257  1_cc1c 4134   Nn cnnc 4373  0_cc0c 4374   +o cplc 4375

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1546  ax-5 1557  ax-17 1616  ax-9 1654  ax-8 1675  ax-6 1729  ax-7 1734  ax-11 1746  ax-12 1925  ax-ext 2334  ax-nin 4078  ax-xp 4079  ax-cnv 4080  ax-1c 4081  ax-sset 4082  ax-si 4083  ax-ins2 4084  ax-ins3 4085  ax-typlower 4086  ax-sn 4087

This theorem depends on definitions:  df-bi 177  df-or 359  df-an 360  df-3an 936  df-nan 1288  df-tru 1319  df-ex 1542  df-nf 1545  df-sb 1649  df-clab 2340  df-cleq 2346  df-clel 2349  df-nfc 2478  df-ne 2518  df-ral 2619  df-rex 2620  df-v 2861  df-sbc 3047  df-nin 3211  df-compl 3212  df-in 3213  df-un 3214  df-dif 3215  df-symdif 3216  df-ss 3259  df-nul 3551  df-if 3663  df-pw 3724  df-sn 3741  df-pr 3742  df-uni 3892  df-int 3927  df-opk 4058  df-1c 4136  df-pw1 4137  df-uni1 4138  df-xpk 4185  df-cnvk 4186  df-ins2k 4187  df-ins3k 4188  df-imak 4189  df-cok 4190  df-p6 4191  df-sik 4192  df-ssetk 4193  df-imagek 4194  df-0c 4377  df-addc 4378  df-nnc 4379

This theorem is referenced by:  finds  4411  preaddccan2  4455  addccan2nc  6265  fnfrec  6320