Theorem onfununi 7078

Description: A property of functions on ordinal numbers. Generalization of Theorem Schema 8E of [Enderton] p. 218. (Contributed by Eric Schmidt, 26-May-2009.)

Hypotheses

Ref	Expression
onfununi.1	|- ( Lim y -> ( F ` y ) = U_ x e. y ( F ` x ) )
onfununi.2	|- ( ( x e. On /\ y e. On /\ x C_ y ) -> ( F ` x ) C_ ( F ` y ) )

Assertion

Ref	Expression
onfununi	|- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( F ` U. S ) = U_ x e. S ( F ` x ) )

Distinct variable groups:   x, y, S   x, F, y   x, T

Allowed substitution hint:   T( y)

Proof of Theorem onfununi

Step	Hyp	Ref	Expression
1		ssorduni 6631	. . . . . . . . . 10 |- ( S C_ On -> Ord U. S )
2	1	ad2antrr 740	. . . . . . . . 9 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> Ord U. S )
3		nelneq 2573	. . . . . . . . . . . . . . . 16 |- ( ( x e. S /\ -. U. S e. S ) -> -. x = U. S )
4		elssuni 4219	. . . . . . . . . . . . . . . . . . . 20 |- ( x e. S -> x C_ U. S )
5	4	adantl 473	. . . . . . . . . . . . . . . . . . 19 |- ( ( S C_ On /\ x e. S ) -> x C_ U. S )
6		ssel 3412	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( S C_ On -> ( x e. S -> x e. On ) )
7		eloni 5440	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( x e. On -> Ord x )
8	6, 7	syl6 33	. . . . . . . . . . . . . . . . . . . . . 22 |- ( S C_ On -> ( x e. S -> Ord x ) )
9	8	imp 436	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( S C_ On /\ x e. S ) -> Ord x )
10		ordsseleq 5459	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( Ord x /\ Ord U. S ) -> ( x C_ U. S <-> ( x e. U. S \/ x = U. S ) ) )
11	9, 1, 10	syl2an 485	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( S C_ On /\ x e. S ) /\ S C_ On ) -> ( x C_ U. S <-> ( x e. U. S \/ x = U. S ) ) )
12	11	anabss1 830	. . . . . . . . . . . . . . . . . . 19 |- ( ( S C_ On /\ x e. S ) -> ( x C_ U. S <-> ( x e. U. S \/ x = U. S ) ) )
13	5, 12	mpbid 215	. . . . . . . . . . . . . . . . . 18 |- ( ( S C_ On /\ x e. S ) -> ( x e. U. S \/ x = U. S ) )
14	13	ord 384	. . . . . . . . . . . . . . . . 17 |- ( ( S C_ On /\ x e. S ) -> ( -. x e. U. S -> x = U. S ) )
15	14	con1d 129	. . . . . . . . . . . . . . . 16 |- ( ( S C_ On /\ x e. S ) -> ( -. x = U. S -> x e. U. S ) )
16	3, 15	syl5 32	. . . . . . . . . . . . . . 15 |- ( ( S C_ On /\ x e. S ) -> ( ( x e. S /\ -. U. S e. S ) -> x e. U. S ) )
17	16	exp4b 618	. . . . . . . . . . . . . 14 |- ( S C_ On -> ( x e. S -> ( x e. S -> ( -. U. S e. S -> x e. U. S ) ) ) )
18	17	pm2.43d 49	. . . . . . . . . . . . 13 |- ( S C_ On -> ( x e. S -> ( -. U. S e. S -> x e. U. S ) ) )
19	18	com23 80	. . . . . . . . . . . 12 |- ( S C_ On -> ( -. U. S e. S -> ( x e. S -> x e. U. S ) ) )
20	19	imp 436	. . . . . . . . . . 11 |- ( ( S C_ On /\ -. U. S e. S ) -> ( x e. S -> x e. U. S ) )
21	20	ssrdv 3424	. . . . . . . . . 10 |- ( ( S C_ On /\ -. U. S e. S ) -> S C_ U. S )
22		ssn0 3770	. . . . . . . . . 10 |- ( ( S C_ U. S /\ S =/= (/) ) -> U. S =/= (/) )
23	21, 22	sylan 479	. . . . . . . . 9 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> U. S =/= (/) )
24	21	unissd 4214	. . . . . . . . . . 11 |- ( ( S C_ On /\ -. U. S e. S ) -> U. S C_ U. U. S )
25		orduniss 5524	. . . . . . . . . . . . 13 |- ( Ord U. S -> U. U. S C_ U. S )
26	1, 25	syl 17	. . . . . . . . . . . 12 |- ( S C_ On -> U. U. S C_ U. S )
27	26	adantr 472	. . . . . . . . . . 11 |- ( ( S C_ On /\ -. U. S e. S ) -> U. U. S C_ U. S )
28	24, 27	eqssd 3435	. . . . . . . . . 10 |- ( ( S C_ On /\ -. U. S e. S ) -> U. S = U. U. S )
29	28	adantr 472	. . . . . . . . 9 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> U. S = U. U. S )
30		df-lim 5435	. . . . . . . . 9 |- ( Lim U. S <-> ( Ord U. S /\ U. S =/= (/) /\ U. S = U. U. S ) )
31	2, 23, 29, 30	syl3anbrc 1214	. . . . . . . 8 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> Lim U. S )
32	31	an32s 821	. . . . . . 7 |- ( ( ( S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> Lim U. S )
33	32	3adantl1 1186	. . . . . 6 |- ( ( ( S e. T /\ S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> Lim U. S )
34		ssonuni 6632	. . . . . . . . . 10 |- ( S e. T -> ( S C_ On -> U. S e. On ) )
35		limeq 5442	. . . . . . . . . . . 12 |- ( y = U. S -> ( Lim y <-> Lim U. S ) )
36		fveq2 5879	. . . . . . . . . . . . 13 |- ( y = U. S -> ( F ` y ) = ( F ` U. S ) )
37		iuneq1 4283	. . . . . . . . . . . . 13 |- ( y = U. S -> U_ x e. y ( F ` x ) = U_ x e. U. S ( F ` x ) )
38	36, 37	eqeq12d 2486	. . . . . . . . . . . 12 |- ( y = U. S -> ( ( F ` y ) = U_ x e. y ( F ` x ) <-> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
39	35, 38	imbi12d 327	. . . . . . . . . . 11 |- ( y = U. S -> ( ( Lim y -> ( F ` y ) = U_ x e. y ( F ` x ) ) <-> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) ) )
40		onfununi.1	. . . . . . . . . . 11 |- ( Lim y -> ( F ` y ) = U_ x e. y ( F ` x ) )
41	39, 40	vtoclg 3093	. . . . . . . . . 10 |- ( U. S e. On -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
42	34, 41	syl6 33	. . . . . . . . 9 |- ( S e. T -> ( S C_ On -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) ) )
43	42	imp 436	. . . . . . . 8 |- ( ( S e. T /\ S C_ On ) -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
44	43	3adant3 1050	. . . . . . 7 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
45	44	adantr 472	. . . . . 6 |- ( ( ( S e. T /\ S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
46	33, 45	mpd 15	. . . . 5 |- ( ( ( S e. T /\ S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) )
47		eluni2 4194	. . . . . . . . . . . 12 |- ( x e. U. S <-> E. y e. S x e. y )
48		ssel 3412	. . . . . . . . . . . . . . . . . 18 |- ( S C_ On -> ( y e. S -> y e. On ) )
49	48	anim1d 574	. . . . . . . . . . . . . . . . 17 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> ( y e. On /\ x e. y ) ) )
50		onelon 5455	. . . . . . . . . . . . . . . . 17 |- ( ( y e. On /\ x e. y ) -> x e. On )
51	49, 50	syl6 33	. . . . . . . . . . . . . . . 16 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> x e. On ) )
52	48	adantrd 475	. . . . . . . . . . . . . . . 16 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> y e. On ) )
53		eloni 5440	. . . . . . . . . . . . . . . . . 18 |- ( y e. On -> Ord y )
54	48, 53	syl6 33	. . . . . . . . . . . . . . . . 17 |- ( S C_ On -> ( y e. S -> Ord y ) )
55		ordelss 5446	. . . . . . . . . . . . . . . . . 18 |- ( ( Ord y /\ x e. y ) -> x C_ y )
56	55	a1i 11	. . . . . . . . . . . . . . . . 17 |- ( S C_ On -> ( ( Ord y /\ x e. y ) -> x C_ y ) )
57	54, 56	syland 489	. . . . . . . . . . . . . . . 16 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> x C_ y ) )
58	51, 52, 57	3jcad 1211	. . . . . . . . . . . . . . 15 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> ( x e. On /\ y e. On /\ x C_ y ) ) )
59		onfununi.2	. . . . . . . . . . . . . . 15 |- ( ( x e. On /\ y e. On /\ x C_ y ) -> ( F ` x ) C_ ( F ` y ) )
60	58, 59	syl6 33	. . . . . . . . . . . . . 14 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> ( F ` x ) C_ ( F ` y ) ) )
61	60	expd 443	. . . . . . . . . . . . 13 |- ( S C_ On -> ( y e. S -> ( x e. y -> ( F ` x ) C_ ( F ` y ) ) ) )
62	61	reximdvai 2856	. . . . . . . . . . . 12 |- ( S C_ On -> ( E. y e. S x e. y -> E. y e. S ( F ` x ) C_ ( F ` y ) ) )
63	47, 62	syl5bi 225	. . . . . . . . . . 11 |- ( S C_ On -> ( x e. U. S -> E. y e. S ( F ` x ) C_ ( F ` y ) ) )
64		ssiun 4311	. . . . . . . . . . 11 |- ( E. y e. S ( F ` x ) C_ ( F ` y ) -> ( F ` x ) C_ U_ y e. S ( F ` y ) )
65	63, 64	syl6 33	. . . . . . . . . 10 |- ( S C_ On -> ( x e. U. S -> ( F ` x ) C_ U_ y e. S ( F ` y ) ) )
66	65	ralrimiv 2808	. . . . . . . . 9 |- ( S C_ On -> A. x e. U. S ( F ` x ) C_ U_ y e. S ( F ` y ) )
67		iunss 4310	. . . . . . . . 9 |- ( U_ x e. U. S ( F ` x ) C_ U_ y e. S ( F ` y ) <-> A. x e. U. S ( F ` x ) C_ U_ y e. S ( F ` y ) )
68	66, 67	sylibr 217	. . . . . . . 8 |- ( S C_ On -> U_ x e. U. S ( F ` x ) C_ U_ y e. S ( F ` y ) )
69		fveq2 5879	. . . . . . . . 9 |- ( y = x -> ( F ` y ) = ( F ` x ) )
70	69	cbviunv 4308	. . . . . . . 8 |- U_ y e. S ( F ` y ) = U_ x e. S ( F ` x )
71	68, 70	syl6sseq 3464	. . . . . . 7 |- ( S C_ On -> U_ x e. U. S ( F ` x ) C_ U_ x e. S ( F ` x ) )
72	71	3ad2ant2 1052	. . . . . 6 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> U_ x e. U. S ( F ` x ) C_ U_ x e. S ( F ` x ) )
73	72	adantr 472	. . . . 5 |- ( ( ( S e. T /\ S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> U_ x e. U. S ( F ` x ) C_ U_ x e. S ( F ` x ) )
74	46, 73	eqsstrd 3452	. . . 4 |- ( ( ( S e. T /\ S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) )
75	74	ex 441	. . 3 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( -. U. S e. S -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) ) )
76		fveq2 5879	. . . 4 |- ( x = U. S -> ( F ` x ) = ( F ` U. S ) )
77	76	ssiun2s 4313	. . 3 |- ( U. S e. S -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) )
78	75, 77	pm2.61d2 165	. 2 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) )
79	34	imp 436	. . . . . 6 |- ( ( S e. T /\ S C_ On ) -> U. S e. On )
80	79	3adant3 1050	. . . . 5 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> U. S e. On )
81	6	3ad2ant2 1052	. . . . . 6 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( x e. S -> x e. On ) )
82	4	a1i 11	. . . . . 6 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( x e. S -> x C_ U. S ) )
83	81, 82	jcad 542	. . . . 5 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( x e. S -> ( x e. On /\ x C_ U. S ) ) )
84		sseq2 3440	. . . . . . . 8 |- ( y = U. S -> ( x C_ y <-> x C_ U. S ) )
85	84	anbi2d 718	. . . . . . 7 |- ( y = U. S -> ( ( x e. On /\ x C_ y ) <-> ( x e. On /\ x C_ U. S ) ) )
86	36	sseq2d 3446	. . . . . . 7 |- ( y = U. S -> ( ( F ` x ) C_ ( F ` y ) <-> ( F ` x ) C_ ( F ` U. S ) ) )
87	85, 86	imbi12d 327	. . . . . 6 |- ( y = U. S -> ( ( ( x e. On /\ x C_ y ) -> ( F ` x ) C_ ( F ` y ) ) <-> ( ( x e. On /\ x C_ U. S ) -> ( F ` x ) C_ ( F ` U. S ) ) ) )
88	59	3com12 1235	. . . . . . 7 |- ( ( y e. On /\ x e. On /\ x C_ y ) -> ( F ` x ) C_ ( F ` y ) )
89	88	3expib 1234	. . . . . 6 |- ( y e. On -> ( ( x e. On /\ x C_ y ) -> ( F ` x ) C_ ( F ` y ) ) )
90	87, 89	vtoclga 3099	. . . . 5 |- ( U. S e. On -> ( ( x e. On /\ x C_ U. S ) -> ( F ` x ) C_ ( F ` U. S ) ) )
91	80, 83, 90	sylsyld 57	. . . 4 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( x e. S -> ( F ` x ) C_ ( F ` U. S ) ) )
92	91	ralrimiv 2808	. . 3 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> A. x e. S ( F ` x ) C_ ( F ` U. S ) )
93		iunss 4310	. . 3 |- ( U_ x e. S ( F ` x ) C_ ( F ` U. S ) <-> A. x e. S ( F ` x ) C_ ( F ` U. S ) )
94	92, 93	sylibr 217	. 2 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> U_ x e. S ( F ` x ) C_ ( F ` U. S ) )
95	78, 94	eqssd 3435	1 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( F ` U. S ) = U_ x e. S ( F ` x ) )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 189   \/ wo 375   /\ wa 376   /\ w3a 1007   = wceq 1452   e. wcel 1904   =/= wne 2641   A.wral 2756   E.wrex 2757   C_ wss 3390   (/)c0 3722   U.cuni 4190   U_ciun 4269   Ord word 5429   Oncon0 5430   Lim wlim 5431   ` cfv 5589

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1677  ax-4 1690  ax-5 1766  ax-6 1813  ax-7 1859  ax-8 1906  ax-9 1913  ax-10 1932  ax-11 1937  ax-12 1950  ax-13 2104  ax-ext 2451  ax-sep 4518  ax-nul 4527  ax-pr 4639  ax-un 6602

This theorem depends on definitions:  df-bi 190  df-or 377  df-an 378  df-3or 1008  df-3an 1009  df-tru 1455  df-ex 1672  df-nf 1676  df-sb 1806  df-eu 2323  df-mo 2324  df-clab 2458  df-cleq 2464  df-clel 2467  df-nfc 2601  df-ne 2643  df-ral 2761  df-rex 2762  df-rab 2765  df-v 3033  df-sbc 3256  df-dif 3393  df-un 3395  df-in 3397  df-ss 3404  df-pss 3406  df-nul 3723  df-if 3873  df-sn 3960  df-pr 3962  df-tp 3964  df-op 3966  df-uni 4191  df-iun 4271  df-br 4396  df-opab 4455  df-tr 4491  df-eprel 4750  df-po 4760  df-so 4761  df-fr 4798  df-we 4800  df-ord 5433  df-on 5434  df-lim 5435  df-iota 5553  df-fv 5597

This theorem is referenced by:  onovuni  7079