Theorem tfrcllemssrecs 6561

Description: Lemma for tfrcl 6573. The union of functions acceptable for tfrcl 6573 is a subset of recs. (Contributed by Jim Kingdon, 25-Mar-2022.)

Hypotheses

Ref	Expression
tfrcllemssrecs.1	|- A = { f | E. x e. X ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) }
tfrcllemssrecs.x	|- ( ph -> Ord X )

Assertion

Ref	Expression
tfrcllemssrecs	|- ( ph -> U. A C_ recs ( G ) )

Distinct variable groups:   f, G, x, y   x, X   ph, f

Allowed substitution hints:   ph( x, y)   A( x, y, f)   S( x, y, f)   X( y, f)

Proof of Theorem tfrcllemssrecs

Step	Hyp	Ref	Expression
1		tfrcllemssrecs.1	. . . 4 |- A = { f | E. x e. X ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) }
2		tfrcllemssrecs.x	. . . . . 6 |- ( ph -> Ord X )
3		ordsson 4596	. . . . . 6 |- ( Ord X -> X C_ On )
4		ssrexv 3293	. . . . . 6 |- ( X C_ On -> ( E. x e. X ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) -> E. x e. On ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) ) )
5	2, 3, 4	3syl 17	. . . . 5 |- ( ph -> ( E. x e. X ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) -> E. x e. On ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) ) )
6	5	ss2abdv 3301	. . . 4 |- ( ph -> { f | E. x e. X ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) } C_ { f | E. x e. On ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) } )
7	1, 6	eqsstrid 3274	. . 3 |- ( ph -> A C_ { f | E. x e. On ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) } )
8	7	unissd 3922	. 2 |- ( ph -> U. A C_ U. { f | E. x e. On ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) } )
9		ffn 5489	. . . . . . 7 |- ( f : x --> S -> f Fn x )
10	9	anim1i 340	. . . . . 6 |- ( ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) -> ( f Fn x /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) )
11	10	reximi 2630	. . . . 5 |- ( E. x e. On ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) -> E. x e. On ( f Fn x /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) )
12	11	ss2abi 3300	. . . 4 |- { f | E. x e. On ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) } C_ { f | E. x e. On ( f Fn x /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) }
13	12	unissi 3921	. . 3 |- U. { f | E. x e. On ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) } C_ U. { f | E. x e. On ( f Fn x /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) }
14		df-recs 6514	. . 3 |- recs ( G ) = U. { f | E. x e. On ( f Fn x /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) }
15	13, 14	sseqtrri 3263	. 2 |- U. { f | E. x e. On ( f : x --> S /\ A. y e. x ( f ` y ) = ( G ` ( f |` y ) ) ) } C_ recs ( G )
16	8, 15	sstrdi 3240	1 |- ( ph -> U. A C_ recs ( G ) )

Syntax hints:   -> wi 4   /\ wa 104   = wceq 1398   {cab 2217   A.wral 2511   E.wrex 2512   C_ wss 3201   U.cuni 3898   Ord word 4465   Oncon0 4466   |` cres 4733   Fn wfn 5328   -->wf 5329   ` cfv 5333  recscrecs 6513

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 717  ax-5 1496  ax-7 1497  ax-gen 1498  ax-ie1 1542  ax-ie2 1543  ax-8 1553  ax-10 1554  ax-11 1555  ax-i12 1556  ax-bndl 1558  ax-4 1559  ax-17 1575  ax-i9 1579  ax-ial 1583  ax-i5r 1584  ax-ext 2213

This theorem depends on definitions:  df-bi 117  df-3an 1007  df-tru 1401  df-nf 1510  df-sb 1811  df-clab 2218  df-cleq 2224  df-clel 2227  df-nfc 2364  df-ral 2516  df-rex 2517  df-v 2805  df-in 3207  df-ss 3214  df-uni 3899  df-tr 4193  df-iord 4469  df-on 4471  df-f 5337  df-recs 6514

This theorem is referenced by:  tfrcllembfn  6566  tfrcllemubacc  6568  tfrcllemres  6571