Theorem onfununi 7065

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 6623	. . . . . . . . . 10 |- ( S C_ On -> Ord U. S )
2	1	ad2antrr 730	. . . . . . . . 9 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> Ord U. S )
3		nelneq 2539	. . . . . . . . . . . . . . . 16 |- ( ( x e. S /\ -. U. S e. S ) -> -. x = U. S )
4		elssuni 4245	. . . . . . . . . . . . . . . . . . . 20 |- ( x e. S -> x C_ U. S )
5	4	adantl 467	. . . . . . . . . . . . . . . . . . 19 |- ( ( S C_ On /\ x e. S ) -> x C_ U. S )
6		ssel 3458	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( S C_ On -> ( x e. S -> x e. On ) )
7		eloni 5449	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( x e. On -> Ord x )
8	6, 7	syl6 34	. . . . . . . . . . . . . . . . . . . . . 22 |- ( S C_ On -> ( x e. S -> Ord x ) )
9	8	imp 430	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( S C_ On /\ x e. S ) -> Ord x )
10		ordsseleq 5468	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( Ord x /\ Ord U. S ) -> ( x C_ U. S <-> ( x e. U. S \/ x = U. S ) ) )
11	9, 1, 10	syl2an 479	. . . . . . . . . . . . . . . . . . . 20 |- ( ( ( S C_ On /\ x e. S ) /\ S C_ On ) -> ( x C_ U. S <-> ( x e. U. S \/ x = U. S ) ) )
12	11	anabss1 821	. . . . . . . . . . . . . . . . . . 19 |- ( ( S C_ On /\ x e. S ) -> ( x C_ U. S <-> ( x e. U. S \/ x = U. S ) ) )
13	5, 12	mpbid 213	. . . . . . . . . . . . . . . . . 18 |- ( ( S C_ On /\ x e. S ) -> ( x e. U. S \/ x = U. S ) )
14	13	ord 378	. . . . . . . . . . . . . . . . 17 |- ( ( S C_ On /\ x e. S ) -> ( -. x e. U. S -> x = U. S ) )
15	14	con1d 127	. . . . . . . . . . . . . . . 16 |- ( ( S C_ On /\ x e. S ) -> ( -. x = U. S -> x e. U. S ) )
16	3, 15	syl5 33	. . . . . . . . . . . . . . 15 |- ( ( S C_ On /\ x e. S ) -> ( ( x e. S /\ -. U. S e. S ) -> x e. U. S ) )
17	16	exp4b 610	. . . . . . . . . . . . . 14 |- ( S C_ On -> ( x e. S -> ( x e. S -> ( -. U. S e. S -> x e. U. S ) ) ) )
18	17	pm2.43d 50	. . . . . . . . . . . . 13 |- ( S C_ On -> ( x e. S -> ( -. U. S e. S -> x e. U. S ) ) )
19	18	com23 81	. . . . . . . . . . . 12 |- ( S C_ On -> ( -. U. S e. S -> ( x e. S -> x e. U. S ) ) )
20	19	imp 430	. . . . . . . . . . 11 |- ( ( S C_ On /\ -. U. S e. S ) -> ( x e. S -> x e. U. S ) )
21	20	ssrdv 3470	. . . . . . . . . 10 |- ( ( S C_ On /\ -. U. S e. S ) -> S C_ U. S )
22		ssn0 3795	. . . . . . . . . 10 |- ( ( S C_ U. S /\ S =/= (/) ) -> U. S =/= (/) )
23	21, 22	sylan 473	. . . . . . . . 9 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> U. S =/= (/) )
24	21	unissd 4240	. . . . . . . . . . 11 |- ( ( S C_ On /\ -. U. S e. S ) -> U. S C_ U. U. S )
25		orduniss 5533	. . . . . . . . . . . . 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 466	. . . . . . . . . . 11 |- ( ( S C_ On /\ -. U. S e. S ) -> U. U. S C_ U. S )
28	24, 27	eqssd 3481	. . . . . . . . . 10 |- ( ( S C_ On /\ -. U. S e. S ) -> U. S = U. U. S )
29	28	adantr 466	. . . . . . . . 9 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> U. S = U. U. S )
30		df-lim 5444	. . . . . . . . 9 |- ( Lim U. S <-> ( Ord U. S /\ U. S =/= (/) /\ U. S = U. U. S ) )
31	2, 23, 29, 30	syl3anbrc 1189	. . . . . . . 8 |- ( ( ( S C_ On /\ -. U. S e. S ) /\ S =/= (/) ) -> Lim U. S )
32	31	an32s 811	. . . . . . 7 |- ( ( ( S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> Lim U. S )
33	32	3adantl1 1161	. . . . . 6 |- ( ( ( S e. T /\ S C_ On /\ S =/= (/) ) /\ -. U. S e. S ) -> Lim U. S )
34		ssonuni 6624	. . . . . . . . . 10 |- ( S e. T -> ( S C_ On -> U. S e. On ) )
35		limeq 5451	. . . . . . . . . . . 12 |- ( y = U. S -> ( Lim y <-> Lim U. S ) )
36		fveq2 5878	. . . . . . . . . . . . 13 |- ( y = U. S -> ( F ` y ) = ( F ` U. S ) )
37		iuneq1 4310	. . . . . . . . . . . . 13 |- ( y = U. S -> U_ x e. y ( F ` x ) = U_ x e. U. S ( F ` x ) )
38	36, 37	eqeq12d 2444	. . . . . . . . . . . 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 321	. . . . . . . . . . 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 3139	. . . . . . . . . 10 |- ( U. S e. On -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
42	34, 41	syl6 34	. . . . . . . . 9 |- ( S e. T -> ( S C_ On -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) ) )
43	42	imp 430	. . . . . . . 8 |- ( ( S e. T /\ S C_ On ) -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
44	43	3adant3 1025	. . . . . . 7 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( Lim U. S -> ( F ` U. S ) = U_ x e. U. S ( F ` x ) ) )
45	44	adantr 466	. . . . . 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 4220	. . . . . . . . . . . 12 |- ( x e. U. S <-> E. y e. S x e. y )
48		ssel 3458	. . . . . . . . . . . . . . . . . 18 |- ( S C_ On -> ( y e. S -> y e. On ) )
49	48	anim1d 566	. . . . . . . . . . . . . . . . 17 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> ( y e. On /\ x e. y ) ) )
50		onelon 5464	. . . . . . . . . . . . . . . . 17 |- ( ( y e. On /\ x e. y ) -> x e. On )
51	49, 50	syl6 34	. . . . . . . . . . . . . . . 16 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> x e. On ) )
52	48	adantrd 469	. . . . . . . . . . . . . . . 16 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> y e. On ) )
53		eloni 5449	. . . . . . . . . . . . . . . . . 18 |- ( y e. On -> Ord y )
54	48, 53	syl6 34	. . . . . . . . . . . . . . . . 17 |- ( S C_ On -> ( y e. S -> Ord y ) )
55		ordelss 5455	. . . . . . . . . . . . . . . . . 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 483	. . . . . . . . . . . . . . . 16 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> x C_ y ) )
58	51, 52, 57	3jcad 1186	. . . . . . . . . . . . . . 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 34	. . . . . . . . . . . . . 14 |- ( S C_ On -> ( ( y e. S /\ x e. y ) -> ( F ` x ) C_ ( F ` y ) ) )
61	60	expd 437	. . . . . . . . . . . . 13 |- ( S C_ On -> ( y e. S -> ( x e. y -> ( F ` x ) C_ ( F ` y ) ) ) )
62	61	reximdvai 2897	. . . . . . . . . . . 12 |- ( S C_ On -> ( E. y e. S x e. y -> E. y e. S ( F ` x ) C_ ( F ` y ) ) )
63	47, 62	syl5bi 220	. . . . . . . . . . 11 |- ( S C_ On -> ( x e. U. S -> E. y e. S ( F ` x ) C_ ( F ` y ) ) )
64		ssiun 4338	. . . . . . . . . . 11 |- ( E. y e. S ( F ` x ) C_ ( F ` y ) -> ( F ` x ) C_ U_ y e. S ( F ` y ) )
65	63, 64	syl6 34	. . . . . . . . . 10 |- ( S C_ On -> ( x e. U. S -> ( F ` x ) C_ U_ y e. S ( F ` y ) ) )
66	65	ralrimiv 2837	. . . . . . . . 9 |- ( S C_ On -> A. x e. U. S ( F ` x ) C_ U_ y e. S ( F ` y ) )
67		iunss 4337	. . . . . . . . 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 215	. . . . . . . 8 |- ( S C_ On -> U_ x e. U. S ( F ` x ) C_ U_ y e. S ( F ` y ) )
69		fveq2 5878	. . . . . . . . 9 |- ( y = x -> ( F ` y ) = ( F ` x ) )
70	69	cbviunv 4335	. . . . . . . 8 |- U_ y e. S ( F ` y ) = U_ x e. S ( F ` x )
71	68, 70	syl6sseq 3510	. . . . . . 7 |- ( S C_ On -> U_ x e. U. S ( F ` x ) C_ U_ x e. S ( F ` x ) )
72	71	3ad2ant2 1027	. . . . . 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 466	. . . . 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 3498	. . . 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 435	. . 3 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( -. U. S e. S -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) ) )
76		fveq2 5878	. . . 4 |- ( x = U. S -> ( F ` x ) = ( F ` U. S ) )
77	76	ssiun2s 4340	. . 3 |- ( U. S e. S -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) )
78	75, 77	pm2.61d2 163	. 2 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( F ` U. S ) C_ U_ x e. S ( F ` x ) )
79	34	imp 430	. . . . . 6 |- ( ( S e. T /\ S C_ On ) -> U. S e. On )
80	79	3adant3 1025	. . . . 5 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> U. S e. On )
81	6	3ad2ant2 1027	. . . . . 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 535	. . . . 5 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( x e. S -> ( x e. On /\ x C_ U. S ) ) )
84		sseq2 3486	. . . . . . . 8 |- ( y = U. S -> ( x C_ y <-> x C_ U. S ) )
85	84	anbi2d 708	. . . . . . 7 |- ( y = U. S -> ( ( x e. On /\ x C_ y ) <-> ( x e. On /\ x C_ U. S ) ) )
86	36	sseq2d 3492	. . . . . . 7 |- ( y = U. S -> ( ( F ` x ) C_ ( F ` y ) <-> ( F ` x ) C_ ( F ` U. S ) ) )
87	85, 86	imbi12d 321	. . . . . 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 1209	. . . . . . 7 |- ( ( y e. On /\ x e. On /\ x C_ y ) -> ( F ` x ) C_ ( F ` y ) )
89	88	3expib 1208	. . . . . 6 |- ( y e. On -> ( ( x e. On /\ x C_ y ) -> ( F ` x ) C_ ( F ` y ) ) )
90	87, 89	vtoclga 3145	. . . . 5 |- ( U. S e. On -> ( ( x e. On /\ x C_ U. S ) -> ( F ` x ) C_ ( F ` U. S ) ) )
91	80, 83, 90	sylsyld 58	. . . 4 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( x e. S -> ( F ` x ) C_ ( F ` U. S ) ) )
92	91	ralrimiv 2837	. . 3 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> A. x e. S ( F ` x ) C_ ( F ` U. S ) )
93		iunss 4337	. . 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 215	. 2 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> U_ x e. S ( F ` x ) C_ ( F ` U. S ) )
95	78, 94	eqssd 3481	1 |- ( ( S e. T /\ S C_ On /\ S =/= (/) ) -> ( F ` U. S ) = U_ x e. S ( F ` x ) )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 187   \/ wo 369   /\ wa 370   /\ w3a 982   = wceq 1437   e. wcel 1868   =/= wne 2618   A.wral 2775   E.wrex 2776   C_ wss 3436   (/)c0 3761   U.cuni 4216   U_ciun 4296   Ord word 5438   Oncon0 5439   Lim wlim 5440   ` cfv 5598

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1665  ax-4 1678  ax-5 1748  ax-6 1794  ax-7 1839  ax-8 1870  ax-9 1872  ax-10 1887  ax-11 1892  ax-12 1905  ax-13 2053  ax-ext 2400  ax-sep 4543  ax-nul 4552  ax-pr 4657  ax-un 6594

This theorem depends on definitions:  df-bi 188  df-or 371  df-an 372  df-3or 983  df-3an 984  df-tru 1440  df-ex 1660  df-nf 1664  df-sb 1787  df-eu 2269  df-mo 2270  df-clab 2408  df-cleq 2414  df-clel 2417  df-nfc 2572  df-ne 2620  df-ral 2780  df-rex 2781  df-rab 2784  df-v 3083  df-sbc 3300  df-dif 3439  df-un 3441  df-in 3443  df-ss 3450  df-pss 3452  df-nul 3762  df-if 3910  df-sn 3997  df-pr 3999  df-tp 4001  df-op 4003  df-uni 4217  df-iun 4298  df-br 4421  df-opab 4480  df-tr 4516  df-eprel 4761  df-po 4771  df-so 4772  df-fr 4809  df-we 4811  df-ord 5442  df-on 5443  df-lim 5444  df-iota 5562  df-fv 5606

This theorem is referenced by:  onovuni  7066