Theorem konigthlem 9390

Description: Lemma for konigth 9391. (Contributed by Mario Carneiro, 22-Feb-2013.)

Hypotheses

Ref	Expression
konigth.1	|- A e. _V
konigth.2	|- S = U_ i e. A ( M ` i )
konigth.3	|- P = X_ i e. A ( N ` i )
konigth.4	|- D = ( i e. A |-> ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) )
konigth.5	|- E = ( i e. A |-> ( e ` i ) )

Assertion

Ref	Expression
konigthlem	|- ( A. i e. A ( M ` i ) ~< ( N ` i ) -> S ~< P )

Distinct variable groups:   A, a, e, f, i   D, a, e   E, a, i   M, a, f   N, a, e, f   P, a, e, f   S, a, e, f

Allowed substitution hints:   D( f, i)   P( i)   S( i)   E( e, f)   M( e, i)   N( i)

Proof of Theorem konigthlem

Step	Hyp	Ref	Expression
1		fvex 6201	. . . . . . . . 9 |- ( M ` i ) e. _V
2		fvex 6201	. . . . . . . . . . 11 |- ( ( f ` a ) ` i ) e. _V
3		eqid 2622	. . . . . . . . . . 11 |- ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) = ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) )
4	2, 3	fnmpti 6022	. . . . . . . . . 10 |- ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) Fn ( M ` i )
5	1	mptex 6486	. . . . . . . . . . . 12 |- ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) e. _V
6		konigth.4	. . . . . . . . . . . . 13 |- D = ( i e. A |-> ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) )
7	6	fvmpt2 6291	. . . . . . . . . . . 12 |- ( ( i e. A /\ ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) e. _V ) -> ( D ` i ) = ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) )
8	5, 7	mpan2 707	. . . . . . . . . . 11 |- ( i e. A -> ( D ` i ) = ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) )
9	8	fneq1d 5981	. . . . . . . . . 10 |- ( i e. A -> ( ( D ` i ) Fn ( M ` i ) <-> ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) Fn ( M ` i ) ) )
10	4, 9	mpbiri 248	. . . . . . . . 9 |- ( i e. A -> ( D ` i ) Fn ( M ` i ) )
11		fnrndomg 9358	. . . . . . . . 9 |- ( ( M ` i ) e. _V -> ( ( D ` i ) Fn ( M ` i ) -> ran ( D ` i ) ~<_ ( M ` i ) ) )
12	1, 10, 11	mpsyl 68	. . . . . . . 8 |- ( i e. A -> ran ( D ` i ) ~<_ ( M ` i ) )
13		domsdomtr 8095	. . . . . . . 8 |- ( ( ran ( D ` i ) ~<_ ( M ` i ) /\ ( M ` i ) ~< ( N ` i ) ) -> ran ( D ` i ) ~< ( N ` i ) )
14	12, 13	sylan 488	. . . . . . 7 |- ( ( i e. A /\ ( M ` i ) ~< ( N ` i ) ) -> ran ( D ` i ) ~< ( N ` i ) )
15		sdomdif 8108	. . . . . . 7 |- ( ran ( D ` i ) ~< ( N ` i ) -> ( ( N ` i ) \ ran ( D ` i ) ) =/= (/) )
16	14, 15	syl 17	. . . . . 6 |- ( ( i e. A /\ ( M ` i ) ~< ( N ` i ) ) -> ( ( N ` i ) \ ran ( D ` i ) ) =/= (/) )
17	16	ralimiaa 2951	. . . . 5 |- ( A. i e. A ( M ` i ) ~< ( N ` i ) -> A. i e. A ( ( N ` i ) \ ran ( D ` i ) ) =/= (/) )
18		konigth.1	. . . . . 6 |- A e. _V
19		fvex 6201	. . . . . . 7 |- ( N ` i ) e. _V
20		difss 3737	. . . . . . 7 |- ( ( N ` i ) \ ran ( D ` i ) ) C_ ( N ` i )
21	19, 20	ssexi 4803	. . . . . 6 |- ( ( N ` i ) \ ran ( D ` i ) ) e. _V
22	18, 21	ac6c5 9304	. . . . 5 |- ( A. i e. A ( ( N ` i ) \ ran ( D ` i ) ) =/= (/) -> E. e A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) )
23		equid 1939	. . . . . . 7 |- f = f
24		eldifi 3732	. . . . . . . . . . . . 13 |- ( ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( e ` i ) e. ( N ` i ) )
25		fvex 6201	. . . . . . . . . . . . . . 15 |- ( e ` i ) e. _V
26		konigth.5	. . . . . . . . . . . . . . . 16 |- E = ( i e. A |-> ( e ` i ) )
27	26	fvmpt2 6291	. . . . . . . . . . . . . . 15 |- ( ( i e. A /\ ( e ` i ) e. _V ) -> ( E ` i ) = ( e ` i ) )
28	25, 27	mpan2 707	. . . . . . . . . . . . . 14 |- ( i e. A -> ( E ` i ) = ( e ` i ) )
29	28	eleq1d 2686	. . . . . . . . . . . . 13 |- ( i e. A -> ( ( E ` i ) e. ( N ` i ) <-> ( e ` i ) e. ( N ` i ) ) )
30	24, 29	syl5ibr 236	. . . . . . . . . . . 12 |- ( i e. A -> ( ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( E ` i ) e. ( N ` i ) ) )
31	30	ralimia 2950	. . . . . . . . . . 11 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> A. i e. A ( E ` i ) e. ( N ` i ) )
32	25, 26	fnmpti 6022	. . . . . . . . . . 11 |- E Fn A
33	31, 32	jctil 560	. . . . . . . . . 10 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( E Fn A /\ A. i e. A ( E ` i ) e. ( N ` i ) ) )
34	18	mptex 6486	. . . . . . . . . . . 12 |- ( i e. A |-> ( e ` i ) ) e. _V
35	26, 34	eqeltri 2697	. . . . . . . . . . 11 |- E e. _V
36	35	elixp 7915	. . . . . . . . . 10 |- ( E e. X_ i e. A ( N ` i ) <-> ( E Fn A /\ A. i e. A ( E ` i ) e. ( N ` i ) ) )
37	33, 36	sylibr 224	. . . . . . . . 9 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> E e. X_ i e. A ( N ` i ) )
38		konigth.3	. . . . . . . . 9 |- P = X_ i e. A ( N ` i )
39	37, 38	syl6eleqr 2712	. . . . . . . 8 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> E e. P )
40		foelrn 6378	. . . . . . . . . 10 |- ( ( f : S -onto-> P /\ E e. P ) -> E. a e. S E = ( f ` a ) )
41	40	expcom 451	. . . . . . . . 9 |- ( E e. P -> ( f : S -onto-> P -> E. a e. S E = ( f ` a ) ) )
42		konigth.2	. . . . . . . . . . . . . . 15 |- S = U_ i e. A ( M ` i )
43	42	eleq2i 2693	. . . . . . . . . . . . . 14 |- ( a e. S <-> a e. U_ i e. A ( M ` i ) )
44		eliun 4524	. . . . . . . . . . . . . 14 |- ( a e. U_ i e. A ( M ` i ) <-> E. i e. A a e. ( M ` i ) )
45	43, 44	bitri 264	. . . . . . . . . . . . 13 |- ( a e. S <-> E. i e. A a e. ( M ` i ) )
46		nfra1 2941	. . . . . . . . . . . . . . 15 |- F/ i A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) )
47		nfv 1843	. . . . . . . . . . . . . . 15 |- F/ i E = ( f ` a )
48	46, 47	nfan 1828	. . . . . . . . . . . . . 14 |- F/ i ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) )
49		nfv 1843	. . . . . . . . . . . . . 14 |- F/ i -. f = f
50	28	ad2antrl 764	. . . . . . . . . . . . . . . . . . . 20 |- ( ( E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> ( E ` i ) = ( e ` i ) )
51		fveq1 6190	. . . . . . . . . . . . . . . . . . . . 21 |- ( E = ( f ` a ) -> ( E ` i ) = ( ( f ` a ) ` i ) )
52	8	fveq1d 6193	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( i e. A -> ( ( D ` i ) ` a ) = ( ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) ` a ) )
53	3	fvmpt2 6291	. . . . . . . . . . . . . . . . . . . . . . . 24 |- ( ( a e. ( M ` i ) /\ ( ( f ` a ) ` i ) e. _V ) -> ( ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) ` a ) = ( ( f ` a ) ` i ) )
54	2, 53	mpan2 707	. . . . . . . . . . . . . . . . . . . . . . 23 |- ( a e. ( M ` i ) -> ( ( a e. ( M ` i ) |-> ( ( f ` a ) ` i ) ) ` a ) = ( ( f ` a ) ` i ) )
55	52, 54	sylan9eq 2676	. . . . . . . . . . . . . . . . . . . . . 22 |- ( ( i e. A /\ a e. ( M ` i ) ) -> ( ( D ` i ) ` a ) = ( ( f ` a ) ` i ) )
56	55	eqcomd 2628	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( i e. A /\ a e. ( M ` i ) ) -> ( ( f ` a ) ` i ) = ( ( D ` i ) ` a ) )
57	51, 56	sylan9eq 2676	. . . . . . . . . . . . . . . . . . . 20 |- ( ( E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> ( E ` i ) = ( ( D ` i ) ` a ) )
58	50, 57	eqtr3d 2658	. . . . . . . . . . . . . . . . . . 19 |- ( ( E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> ( e ` i ) = ( ( D ` i ) ` a ) )
59		fnfvelrn 6356	. . . . . . . . . . . . . . . . . . . . 21 |- ( ( ( D ` i ) Fn ( M ` i ) /\ a e. ( M ` i ) ) -> ( ( D ` i ) ` a ) e. ran ( D ` i ) )
60	10, 59	sylan 488	. . . . . . . . . . . . . . . . . . . 20 |- ( ( i e. A /\ a e. ( M ` i ) ) -> ( ( D ` i ) ` a ) e. ran ( D ` i ) )
61	60	adantl 482	. . . . . . . . . . . . . . . . . . 19 |- ( ( E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> ( ( D ` i ) ` a ) e. ran ( D ` i ) )
62	58, 61	eqeltrd 2701	. . . . . . . . . . . . . . . . . 18 |- ( ( E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> ( e ` i ) e. ran ( D ` i ) )
63	62	3adant1 1079	. . . . . . . . . . . . . . . . 17 |- ( ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> ( e ` i ) e. ran ( D ` i ) )
64		simp1 1061	. . . . . . . . . . . . . . . . . 18 |- ( ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) )
65		simp3l 1089	. . . . . . . . . . . . . . . . . 18 |- ( ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> i e. A )
66		rsp 2929	. . . . . . . . . . . . . . . . . . 19 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( i e. A -> ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) ) )
67		eldifn 3733	. . . . . . . . . . . . . . . . . . 19 |- ( ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> -. ( e ` i ) e. ran ( D ` i ) )
68	66, 67	syl6 35	. . . . . . . . . . . . . . . . . 18 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( i e. A -> -. ( e ` i ) e. ran ( D ` i ) ) )
69	64, 65, 68	sylc 65	. . . . . . . . . . . . . . . . 17 |- ( ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> -. ( e ` i ) e. ran ( D ` i ) )
70	63, 69	pm2.21dd 186	. . . . . . . . . . . . . . . 16 |- ( ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) /\ ( i e. A /\ a e. ( M ` i ) ) ) -> -. f = f )
71	70	3expia 1267	. . . . . . . . . . . . . . 15 |- ( ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) ) -> ( ( i e. A /\ a e. ( M ` i ) ) -> -. f = f ) )
72	71	expd 452	. . . . . . . . . . . . . 14 |- ( ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) ) -> ( i e. A -> ( a e. ( M ` i ) -> -. f = f ) ) )
73	48, 49, 72	rexlimd 3026	. . . . . . . . . . . . 13 |- ( ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) ) -> ( E. i e. A a e. ( M ` i ) -> -. f = f ) )
74	45, 73	syl5bi 232	. . . . . . . . . . . 12 |- ( ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) /\ E = ( f ` a ) ) -> ( a e. S -> -. f = f ) )
75	74	ex 450	. . . . . . . . . . 11 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( E = ( f ` a ) -> ( a e. S -> -. f = f ) ) )
76	75	com23 86	. . . . . . . . . 10 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( a e. S -> ( E = ( f ` a ) -> -. f = f ) ) )
77	76	rexlimdv 3030	. . . . . . . . 9 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( E. a e. S E = ( f ` a ) -> -. f = f ) )
78	41, 77	syl9r 78	. . . . . . . 8 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( E e. P -> ( f : S -onto-> P -> -. f = f ) ) )
79	39, 78	mpd 15	. . . . . . 7 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> ( f : S -onto-> P -> -. f = f ) )
80	23, 79	mt2i 132	. . . . . 6 |- ( A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> -. f : S -onto-> P )
81	80	exlimiv 1858	. . . . 5 |- ( E. e A. i e. A ( e ` i ) e. ( ( N ` i ) \ ran ( D ` i ) ) -> -. f : S -onto-> P )
82	17, 22, 81	3syl 18	. . . 4 |- ( A. i e. A ( M ` i ) ~< ( N ` i ) -> -. f : S -onto-> P )
83	82	nexdv 1864	. . 3 |- ( A. i e. A ( M ` i ) ~< ( N ` i ) -> -. E. f f : S -onto-> P )
84	1	0dom 8090	. . . . . . . 8 |- (/) ~<_ ( M ` i )
85		domsdomtr 8095	. . . . . . . 8 |- ( ( (/) ~<_ ( M ` i ) /\ ( M ` i ) ~< ( N ` i ) ) -> (/) ~< ( N ` i ) )
86	84, 85	mpan 706	. . . . . . 7 |- ( ( M ` i ) ~< ( N ` i ) -> (/) ~< ( N ` i ) )
87	19	0sdom 8091	. . . . . . 7 |- ( (/) ~< ( N ` i ) <-> ( N ` i ) =/= (/) )
88	86, 87	sylib 208	. . . . . 6 |- ( ( M ` i ) ~< ( N ` i ) -> ( N ` i ) =/= (/) )
89	88	ralimi 2952	. . . . 5 |- ( A. i e. A ( M ` i ) ~< ( N ` i ) -> A. i e. A ( N ` i ) =/= (/) )
90	38	neeq1i 2858	. . . . . 6 |- ( P =/= (/) <-> X_ i e. A ( N ` i ) =/= (/) )
91	19	rgenw 2924	. . . . . . . . 9 |- A. i e. A ( N ` i ) e. _V
92		ixpexg 7932	. . . . . . . . 9 |- ( A. i e. A ( N ` i ) e. _V -> X_ i e. A ( N ` i ) e. _V )
93	91, 92	ax-mp 5	. . . . . . . 8 |- X_ i e. A ( N ` i ) e. _V
94	38, 93	eqeltri 2697	. . . . . . 7 |- P e. _V
95	94	0sdom 8091	. . . . . 6 |- ( (/) ~< P <-> P =/= (/) )
96	18, 19	ac9 9305	. . . . . 6 |- ( A. i e. A ( N ` i ) =/= (/) <-> X_ i e. A ( N ` i ) =/= (/) )
97	90, 95, 96	3bitr4i 292	. . . . 5 |- ( (/) ~< P <-> A. i e. A ( N ` i ) =/= (/) )
98	89, 97	sylibr 224	. . . 4 |- ( A. i e. A ( M ` i ) ~< ( N ` i ) -> (/) ~< P )
99	18, 1	iunex 7147	. . . . . . 7 |- U_ i e. A ( M ` i ) e. _V
100	42, 99	eqeltri 2697	. . . . . 6 |- S e. _V
101		domtri 9378	. . . . . 6 |- ( ( P e. _V /\ S e. _V ) -> ( P ~<_ S <-> -. S ~< P ) )
102	94, 100, 101	mp2an 708	. . . . 5 |- ( P ~<_ S <-> -. S ~< P )
103	102	biimpri 218	. . . 4 |- ( -. S ~< P -> P ~<_ S )
104		fodomr 8111	. . . 4 |- ( ( (/) ~< P /\ P ~<_ S ) -> E. f f : S -onto-> P )
105	98, 103, 104	syl2an 494	. . 3 |- ( ( A. i e. A ( M ` i ) ~< ( N ` i ) /\ -. S ~< P ) -> E. f f : S -onto-> P )
106	83, 105	mtand 691	. 2 |- ( A. i e. A ( M ` i ) ~< ( N ` i ) -> -. -. S ~< P )
107	106	notnotrd 128	1 |- ( A. i e. A ( M ` i ) ~< ( N ` i ) -> S ~< P )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 196   /\ wa 384   /\ w3a 1037   = wceq 1483   E.wex 1704   e. wcel 1990   =/= wne 2794   A.wral 2912   E.wrex 2913   _Vcvv 3200   \ cdif 3571   (/)c0 3915   U_ciun 4520   class class class wbr 4653   |-> cmpt 4729   ran crn 5115   Fn wfn 5883   -onto->wfo 5886   ` cfv 5888   X_cixp 7908   ~<_ cdom 7953   ~< csdm 7954

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-ac2 9285

This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-1st 7168  df-2nd 7169  df-wrecs 7407  df-recs 7468  df-er 7742  df-map 7859  df-ixp 7909  df-en 7956  df-dom 7957  df-sdom 7958  df-card 8765  df-acn 8768  df-ac 8939

This theorem is referenced by:  konigth  9391