Theorem findsd 4411

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 4393	. . . . . . 7 |- 0c e. _V
4		findsd.2	. . . . . . 7 |- (x = 0c -> (ph <-> ps))
5	3, 4	elab 2986	. . . . . 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 2863	. . . . . . . . 9 |- y e. _V
9		findsd.3	. . . . . . . . 9 |- (x = y -> (ph <-> ch))
10	8, 9	elab 2986	. . . . . . . 8 |- (y e. {x | ph} <-> ch)
11		1cex 4143	. . . . . . . . . 10 |- 1c e. _V
12	8, 11	addcex 4395	. . . . . . . . 9 |- (y +o 1c) e. _V
13		findsd.4	. . . . . . . . 9 |- (x = (y +o 1c) -> (ph <-> th))
14	12, 13	elab 2986	. . . . . . . 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 2698	. . . . 5 |- (et -> A.y e. Nn (y e. {x | ph} -> (y +o 1c) e. {x | ph}))
18		peano5 4410	. . . . 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 3273	. . 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 2987	. . 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 2615   C_ wss 3258  1_cc1c 4135   Nn cnnc 4374  0_cc0c 4375   +o cplc 4376

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 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 4079  ax-xp 4080  ax-cnv 4081  ax-1c 4082  ax-sset 4083  ax-si 4084  ax-ins2 4085  ax-ins3 4086  ax-typlower 4087  ax-sn 4088

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 2479  df-ne 2519  df-ral 2620  df-rex 2621  df-v 2862  df-sbc 3048  df-nin 3212  df-compl 3213  df-in 3214  df-un 3215  df-dif 3216  df-symdif 3217  df-ss 3260  df-nul 3552  df-if 3664  df-pw 3725  df-sn 3742  df-pr 3743  df-uni 3893  df-int 3928  df-opk 4059  df-1c 4137  df-pw1 4138  df-uni1 4139  df-xpk 4186  df-cnvk 4187  df-ins2k 4188  df-ins3k 4189  df-imak 4190  df-cok 4191  df-p6 4192  df-sik 4193  df-ssetk 4194  df-imagek 4195  df-0c 4378  df-addc 4379  df-nnc 4380

This theorem is referenced by:  finds  4412  preaddccan2  4456  addccan2nc  6266  fnfrec  6321