Theorem onfununi 6790

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 6388	. . . . . . . . . 10 |- ( S C_ On -> Ord U. S )
2	1	ad2antrr 720	. . . . . . . . 9 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> Ord U. S )
3		nelneq 2533	. . . . . . . . . . . . . . . 16 |- ( ( x e. S /\ -. U. S e. S ) -> -. x = U. S )
4		elssuni 4111	. . . . . . . . . . . . . . . . . . . 20 |- ( x e. S -> x C_ U. S )
5	4	adantl 463	. . . . . . . . . . . . . . . . . . 19 |- ( ( S C_ On /\ x e. S ) -> x C_ U. S )
6		ssel 3340	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( S C_ On -> ( x e. S -> x e. On ) )
7		eloni 4718	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( x e. On -> Ord x )
8	6, 7	syl6 33	. . . . . . . . . . . . . . . . . . . . . 22 |- ( S C_ On -> ( x e. S -> Ord x ) )
9	8	imp 429	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( S C_ On /\ x e. S ) -> Ord x )
10		ordsseleq 4737	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( Ord x /\ Ord U. S ) -> ( x C_ U. S <-> ( x e. U. S \/ x = U. S ) ) )
11	9, 1, 10	syl2an 474	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( S C_ On /\ x e. S ) /\ S C_ On ) -> ( x C_ U. S <-> ( x e. U. S \/ x = U. S ) ) )
12	11	anabss1 805	. . . . . . . . . . . . . . . . . . 19 |- ( ( S C_ On /\ x e. S ) -> ( x C_ U. S <-> ( x e. U. S \/ x = U. S ) ) )
13	5, 12	mpbid 210	. . . . . . . . . . . . . . . . . 18 |- ( ( S C_ On /\ x e. S ) -> ( x e. U. S \/ x = U. S ) )
14	13	ord 377	. . . . . . . . . . . . . . . . 17 |- ( ( S C_ On /\ x e. S ) -> ( -. x e. U. S -> x = U. S ) )
15	14	con1d 124	. . . . . . . . . . . . . . . 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 604	. . . . . . . . . . . . . 14 |- ( S C_ On -> ( x e. S -> ( x e. S -> ( -. U. S e. S -> x e. U. S ) ) ) )
18	17	pm2.43d 48	. . . . . . . . . . . . 13 |- ( S C_ On -> ( x e. S -> ( -. U. S e. S -> x e. U. S ) ) )
19	18	com23 78	. . . . . . . . . . . 12 |- ( S C_ On -> ( -. U. S e. S -> ( x e. S -> x e. U. S ) ) )
20	19	imp 429	. . . . . . . . . . 11 |- ( ( S C_ On /\ -. U. S e. S ) -> ( x e. S -> x e. U. S ) )
21	20	ssrdv 3352	. . . . . . . . . 10 |- ( ( S C_ On /\ -. U. S e. S ) -> S C_ U. S )
22		ssn0 3660	. . . . . . . . . 10 |- ( ( S C_ U. S /\ S =/= (/) ) -> U. S =/= (/) )
23	21, 22	sylan 468	. . . . . . . . 9 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> U. S =/= (/) )
24	21	unissd 4105	. . . . . . . . . . 11 |- ( ( S C_ On /\ -. U. S e. S ) -> U. S C_ U. U. S )
25		orduniss 4802	. . . . . . . . . . . . 13 |- ( Ord U. S -> U. U. S C_ U. S )
26	1, 25	syl 16	. . . . . . . . . . . 12 |- ( S C_ On -> U. U. S C_ U. S )
27	26	adantr 462	. . . . . . . . . . 11 |- ( ( S C_ On /\ -. U. S e. S ) -> U. U. S C_ U. S )
28	24, 27	eqssd 3363	. . . . . . . . . 10 |- ( ( S C_ On /\ -. U. S e. S ) -> U. S = U. U. S )
29	28	adantr 462	. . . . . . . . 9 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> U. S = U. U. S )
30		df-lim 4713	. . . . . . . . 9 |- ( Lim U. S <-> ( Ord U. S /\ U. S =/= (/) /\ U. S = U. U. S ) )
31	2, 23, 29, 30	syl3anbrc 1167	. . . . . . . 8 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> Lim U. S )
32	31	an32s 797	. . . . . . 7 |- ( ( ( S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> Lim U. S )
33	32	3adantl1 1139	. . . . . 6 |- ( ( ( S e. T /\ S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> Lim U. S )
34		ssonuni 6389	. . . . . . . . . 10 |- ( S e. T -> ( S C_ On -> U. S e. On ) )
35		limeq 4720	. . . . . . . . . . . 12 |- ( y = U. S -> ( Lim y <-> Lim U. S ) )
36		fveq2 5681	. . . . . . . . . . . . 13 |- ( y = U. S -> ( F ` y ) = ( F ` U. S ) )
37		iuneq1 4174	. . . . . . . . . . . . 13 |- ( y = U. S -> U_ x e. y ( F ` x ) = U_ x e. U. S ( F ` x ) )
38	36, 37	eqeq12d 2449	. . . . . . . . . . . 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 320	. . . . . . . . . . 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 3021	. . . . . . . . . 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 429	. . . . . . . 8 |- ( ( S e. T /\ S C_ On ) -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
44	43	3adant3 1003	. . . . . . 7 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
45	44	adantr 462	. . . . . 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 4085	. . . . . . . . . . . 12 |- ( x e. U. S <-> E. y e. S x e. y )
48		ssel 3340	. . . . . . . . . . . . . . . . . 18 |- ( S C_ On -> ( y e. S -> y e. On ) )
49	48	anim1d 561	. . . . . . . . . . . . . . . . 17 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> ( y e. On /\ x e. y ) ) )
50		onelon 4733	. . . . . . . . . . . . . . . . 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 465	. . . . . . . . . . . . . . . 16 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> y e. On ) )
53		eloni 4718	. . . . . . . . . . . . . . . . . 18 |- ( y e. On -> Ord y )
54	48, 53	syl6 33	. . . . . . . . . . . . . . . . 17 |- ( S C_ On -> ( y e. S -> Ord y ) )
55		ordelss 4724	. . . . . . . . . . . . . . . . . 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 478	. . . . . . . . . . . . . . . 16 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> x C_ y ) )
58	51, 52, 57	3jcad 1164	. . . . . . . . . . . . . . 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	exp3a 436	. . . . . . . . . . . . 13 |- ( S C_ On -> ( y e. S -> ( x e. y -> ( F ` x ) C_ ( F ` y ) ) ) )
62	61	reximdvai 2818	. . . . . . . . . . . 12 |- ( S C_ On -> ( E. y e. S x e. y -> E. y e. S ( F ` x ) C_ ( F ` y ) ) )
63	47, 62	syl5bi 217	. . . . . . . . . . 11 |- ( S C_ On -> ( x e. U. S -> E. y e. S ( F ` x ) C_ ( F ` y ) ) )
64		ssiun 4202	. . . . . . . . . . 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 2790	. . . . . . . . 9 |- ( S C_ On -> A. x e. U. S ( F ` x ) C_ U_ y e. S ( F ` y ) )
67		iunss 4201	. . . . . . . . 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 212	. . . . . . . 8 |- ( S C_ On -> U_ x e. U. S ( F ` x ) C_ U_ y e. S ( F ` y ) )
69		fveq2 5681	. . . . . . . . 9 |- ( y = x -> ( F ` y ) = ( F ` x ) )
70	69	cbviunv 4199	. . . . . . . 8 |- U_ y e. S ( F ` y ) = U_ x e. S ( F ` x )
71	68, 70	syl6sseq 3392	. . . . . . 7 |- ( S C_ On -> U_ x e. U. S ( F ` x ) C_ U_ x e. S ( F ` x ) )
72	71	3ad2ant2 1005	. . . . . 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 462	. . . . 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 3380	. . . 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 434	. . 3 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( -. U. S e. S -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) ) )
76		fveq2 5681	. . . 4 |- ( x = U. S -> ( F ` x ) = ( F ` U. S ) )
77	76	ssiun2s 4204	. . 3 |- ( U. S e. S -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) )
78	75, 77	pm2.61d2 160	. 2 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) )
79	34	imp 429	. . . . . 6 |- ( ( S e. T /\ S C_ On ) -> U. S e. On )
80	79	3adant3 1003	. . . . 5 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> U. S e. On )
81	6	3ad2ant2 1005	. . . . . 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 530	. . . . 5 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( x e. S -> ( x e. On /\ x C_ U. S ) ) )
84		sseq2 3368	. . . . . . . 8 |- ( y = U. S -> ( x C_ y <-> x C_ U. S ) )
85	84	anbi2d 698	. . . . . . 7 |- ( y = U. S -> ( ( x e. On /\ x C_ y ) <-> ( x e. On /\ x C_ U. S ) ) )
86	36	sseq2d 3374	. . . . . . 7 |- ( y = U. S -> ( ( F ` x ) C_ ( F ` y ) <-> ( F ` x ) C_ ( F ` U. S ) ) )
87	85, 86	imbi12d 320	. . . . . 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 1186	. . . . . . 7 |- ( ( y e. On /\ x e. On /\ x C_ y ) -> ( F ` x ) C_ ( F ` y ) )
89	88	3expib 1185	. . . . . 6 |- ( y e. On -> ( ( x e. On /\ x C_ y ) -> ( F ` x ) C_ ( F ` y ) ) )
90	87, 89	vtoclga 3027	. . . . 5 |- ( U. S e. On -> ( ( x e. On /\ x C_ U. S ) -> ( F ` x ) C_ ( F ` U. S ) ) )
91	80, 83, 90	sylsyld 56	. . . 4 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( x e. S -> ( F ` x ) C_ ( F ` U. S ) ) )
92	91	ralrimiv 2790	. . 3 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> A. x e. S ( F ` x ) C_ ( F ` U. S ) )
93		iunss 4201	. . 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 212	. 2 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> U_ x e. S ( F ` x ) C_ ( F ` U. S ) )
95	78, 94	eqssd 3363	1 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( F ` U. S ) = U_ x e. S ( F ` x ) )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 184   \/ wo 368   /\ wa 369   /\ w3a 960   = wceq 1364   e. wcel 1757   =/= wne 2598   A.wral 2707   E.wrex 2708   C_ wss 3318   (/)c0 3627   U.cuni 4081   U_ciun 4161   Ord word 4707   Oncon0 4708   Lim wlim 4709   ` cfv 5408

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1596  ax-4 1607  ax-5 1671  ax-6 1709  ax-7 1729  ax-8 1759  ax-9 1761  ax-10 1776  ax-11 1781  ax-12 1793  ax-13 1944  ax-ext 2416  ax-sep 4403  ax-nul 4411  ax-pr 4521  ax-un 6363

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 961  df-3an 962  df-tru 1367  df-ex 1592  df-nf 1595  df-sb 1702  df-eu 2260  df-mo 2261  df-clab 2422  df-cleq 2428  df-clel 2431  df-nfc 2560  df-ne 2600  df-ral 2712  df-rex 2713  df-rab 2716  df-v 2966  df-sbc 3178  df-dif 3321  df-un 3323  df-in 3325  df-ss 3332  df-pss 3334  df-nul 3628  df-if 3782  df-sn 3868  df-pr 3870  df-tp 3872  df-op 3874  df-uni 4082  df-iun 4163  df-br 4283  df-opab 4341  df-tr 4376  df-eprel 4621  df-po 4630  df-so 4631  df-fr 4668  df-we 4670  df-ord 4711  df-on 4712  df-lim 4713  df-iota 5371  df-fv 5416

This theorem is referenced by:  onovuni  6791