Theorem fpwwe2lem9 9081

Description: Lemma for fpwwe2 9086. Given two well-orders <. X , R >. and <. Y , S >. of parts of A, one is an initial segment of the other. (The O C_ P hypothesis is in order to break the symmetry of X and Y.) (Contributed by Mario Carneiro, 15-May-2015.)

Hypotheses

Ref	Expression
fpwwe2.1	|- W = { <. x , r >. | ( ( x C_ A /\ r C_ ( x X. x ) ) /\ ( r We x /\ A. y e. x [. ( `' r " { y } ) / u ]. ( u F ( r i^i ( u X. u ) ) ) = y ) ) }
fpwwe2.2	|- ( ph -> A e. _V )
fpwwe2.3	|- ( ( ph /\ ( x C_ A /\ r C_ ( x X. x ) /\ r We x ) ) -> ( x F r ) e. A )
fpwwe2lem9.x	|- ( ph -> X W R )
fpwwe2lem9.y	|- ( ph -> Y W S )
fpwwe2lem9.m	|- M = OrdIso ( R , X )
fpwwe2lem9.n	|- N = OrdIso ( S , Y )
fpwwe2lem9.s	|- ( ph -> dom M C_ dom N )

Assertion

Ref	Expression
fpwwe2lem9	|- ( ph -> ( X C_ Y /\ R = ( S i^i ( Y X. X ) ) ) )

Distinct variable groups:   y, u, r, x, F   X, r, u, x, y   M, r, u, x, y   N, r, u, x, y   ph, r, u, x, y   A, r, x   R, r, u, x, y   Y, r, u, x, y   S, r, u, x, y   W, r, u, x, y

Allowed substitution hints:   A( y, u)

Proof of Theorem fpwwe2lem9

Step	Hyp	Ref	Expression
1		fpwwe2lem9.x	. . . . . . . . 9 |- ( ph -> X W R )
2		fpwwe2.1	. . . . . . . . . . 11 |- W = { <. x , r >. | ( ( x C_ A /\ r C_ ( x X. x ) ) /\ ( r We x /\ A. y e. x [. ( `' r " { y } ) / u ]. ( u F ( r i^i ( u X. u ) ) ) = y ) ) }
3	2	relopabi 4964	. . . . . . . . . 10 |- Rel W
4	3	brrelexi 4880	. . . . . . . . 9 |- ( X W R -> X e. _V )
5	1, 4	syl 17	. . . . . . . 8 |- ( ph -> X e. _V )
6		fpwwe2.2	. . . . . . . . . . . 12 |- ( ph -> A e. _V )
7	2, 6	fpwwe2lem2 9075	. . . . . . . . . . 11 |- ( ph -> ( X W R <-> ( ( X C_ A /\ R C_ ( X X. X ) ) /\ ( R We X /\ A. y e. X [. ( `' R " { y } ) / u ]. ( u F ( R i^i ( u X. u ) ) ) = y ) ) ) )
8	1, 7	mpbid 215	. . . . . . . . . 10 |- ( ph -> ( ( X C_ A /\ R C_ ( X X. X ) ) /\ ( R We X /\ A. y e. X [. ( `' R " { y } ) / u ]. ( u F ( R i^i ( u X. u ) ) ) = y ) ) )
9	8	simprd 470	. . . . . . . . 9 |- ( ph -> ( R We X /\ A. y e. X [. ( `' R " { y } ) / u ]. ( u F ( R i^i ( u X. u ) ) ) = y ) )
10	9	simpld 466	. . . . . . . 8 |- ( ph -> R We X )
11		fpwwe2lem9.m	. . . . . . . . 9 |- M = OrdIso ( R , X )
12	11	oiiso 8070	. . . . . . . 8 |- ( ( X e. _V /\ R We X ) -> M Isom _E , R ( dom M , X ) )
13	5, 10, 12	syl2anc 673	. . . . . . 7 |- ( ph -> M Isom _E , R ( dom M , X ) )
14		isof1o 6234	. . . . . . 7 |- ( M Isom _E , R ( dom M , X ) -> M : dom M -1-1-onto-> X )
15	13, 14	syl 17	. . . . . 6 |- ( ph -> M : dom M -1-1-onto-> X )
16		f1ofo 5835	. . . . . 6 |- ( M : dom M -1-1-onto-> X -> M : dom M -onto-> X )
17		forn 5809	. . . . . 6 |- ( M : dom M -onto-> X -> ran M = X )
18	15, 16, 17	3syl 18	. . . . 5 |- ( ph -> ran M = X )
19		fpwwe2.3	. . . . . . 7 |- ( ( ph /\ ( x C_ A /\ r C_ ( x X. x ) /\ r We x ) ) -> ( x F r ) e. A )
20		fpwwe2lem9.y	. . . . . . 7 |- ( ph -> Y W S )
21		fpwwe2lem9.n	. . . . . . 7 |- N = OrdIso ( S , Y )
22		fpwwe2lem9.s	. . . . . . 7 |- ( ph -> dom M C_ dom N )
23	2, 6, 19, 1, 20, 11, 21, 22	fpwwe2lem8 9080	. . . . . 6 |- ( ph -> M = ( N |` dom M ) )
24	23	rneqd 5068	. . . . 5 |- ( ph -> ran M = ran ( N |` dom M ) )
25	18, 24	eqtr3d 2507	. . . 4 |- ( ph -> X = ran ( N |` dom M ) )
26		df-ima 4852	. . . 4 |- ( N " dom M ) = ran ( N |` dom M )
27	25, 26	syl6eqr 2523	. . 3 |- ( ph -> X = ( N " dom M ) )
28		imassrn 5185	. . . 4 |- ( N " dom M ) C_ ran N
29	3	brrelexi 4880	. . . . . . . 8 |- ( Y W S -> Y e. _V )
30	20, 29	syl 17	. . . . . . 7 |- ( ph -> Y e. _V )
31	2, 6	fpwwe2lem2 9075	. . . . . . . . . 10 |- ( ph -> ( Y W S <-> ( ( Y C_ A /\ S C_ ( Y X. Y ) ) /\ ( S We Y /\ A. y e. Y [. ( `' S " { y } ) / u ]. ( u F ( S i^i ( u X. u ) ) ) = y ) ) ) )
32	20, 31	mpbid 215	. . . . . . . . 9 |- ( ph -> ( ( Y C_ A /\ S C_ ( Y X. Y ) ) /\ ( S We Y /\ A. y e. Y [. ( `' S " { y } ) / u ]. ( u F ( S i^i ( u X. u ) ) ) = y ) ) )
33	32	simprd 470	. . . . . . . 8 |- ( ph -> ( S We Y /\ A. y e. Y [. ( `' S " { y } ) / u ]. ( u F ( S i^i ( u X. u ) ) ) = y ) )
34	33	simpld 466	. . . . . . 7 |- ( ph -> S We Y )
35	21	oiiso 8070	. . . . . . 7 |- ( ( Y e. _V /\ S We Y ) -> N Isom _E , S ( dom N , Y ) )
36	30, 34, 35	syl2anc 673	. . . . . 6 |- ( ph -> N Isom _E , S ( dom N , Y ) )
37		isof1o 6234	. . . . . 6 |- ( N Isom _E , S ( dom N , Y ) -> N : dom N -1-1-onto-> Y )
38	36, 37	syl 17	. . . . 5 |- ( ph -> N : dom N -1-1-onto-> Y )
39		f1ofo 5835	. . . . 5 |- ( N : dom N -1-1-onto-> Y -> N : dom N -onto-> Y )
40		forn 5809	. . . . 5 |- ( N : dom N -onto-> Y -> ran N = Y )
41	38, 39, 40	3syl 18	. . . 4 |- ( ph -> ran N = Y )
42	28, 41	syl5sseq 3466	. . 3 |- ( ph -> ( N " dom M ) C_ Y )
43	27, 42	eqsstrd 3452	. 2 |- ( ph -> X C_ Y )
44	8	simpld 466	. . . . . 6 |- ( ph -> ( X C_ A /\ R C_ ( X X. X ) ) )
45	44	simprd 470	. . . . 5 |- ( ph -> R C_ ( X X. X ) )
46		relxp 4947	. . . . 5 |- Rel ( X X. X )
47		relss 4927	. . . . 5 |- ( R C_ ( X X. X ) -> ( Rel ( X X. X ) -> Rel R ) )
48	45, 46, 47	mpisyl 21	. . . 4 |- ( ph -> Rel R )
49		inss2 3644	. . . . 5 |- ( S i^i ( Y X. X ) ) C_ ( Y X. X )
50		relxp 4947	. . . . 5 |- Rel ( Y X. X )
51		relss 4927	. . . . 5 |- ( ( S i^i ( Y X. X ) ) C_ ( Y X. X ) -> ( Rel ( Y X. X ) -> Rel ( S i^i ( Y X. X ) ) ) )
52	49, 50, 51	mp2 9	. . . 4 |- Rel ( S i^i ( Y X. X ) )
53	48, 52	jctir 547	. . 3 |- ( ph -> ( Rel R /\ Rel ( S i^i ( Y X. X ) ) ) )
54	45	ssbrd 4437	. . . . . . 7 |- ( ph -> ( x R y -> x ( X X. X ) y ) )
55		brxp 4870	. . . . . . 7 |- ( x ( X X. X ) y <-> ( x e. X /\ y e. X ) )
56	54, 55	syl6ib 234	. . . . . 6 |- ( ph -> ( x R y -> ( x e. X /\ y e. X ) ) )
57		brinxp2 4901	. . . . . . . 8 |- ( x ( S i^i ( Y X. X ) ) y <-> ( x e. Y /\ y e. X /\ x S y ) )
58		df-3an 1009	. . . . . . . 8 |- ( ( x e. Y /\ y e. X /\ x S y ) <-> ( ( x e. Y /\ y e. X ) /\ x S y ) )
59	57, 58	bitri 257	. . . . . . 7 |- ( x ( S i^i ( Y X. X ) ) y <-> ( ( x e. Y /\ y e. X ) /\ x S y ) )
60		simprll 780	. . . . . . . . . . 11 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. Y )
61		simprr 774	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x S y )
62		isocnv 6239	. . . . . . . . . . . . . . . . 17 |- ( N Isom _E , S ( dom N , Y ) -> `' N Isom S , _E ( Y , dom N ) )
63	36, 62	syl 17	. . . . . . . . . . . . . . . 16 |- ( ph -> `' N Isom S , _E ( Y , dom N ) )
64	63	adantr 472	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' N Isom S , _E ( Y , dom N ) )
65	43	adantr 472	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X C_ Y )
66		simprlr 781	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. X )
67	65, 66	sseldd 3419	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. Y )
68		isorel 6235	. . . . . . . . . . . . . . 15 |- ( ( `' N Isom S , _E ( Y , dom N ) /\ ( x e. Y /\ y e. Y ) ) -> ( x S y <-> ( `' N ` x ) _E ( `' N ` y ) ) )
69	64, 60, 67, 68	syl12anc 1290	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( x S y <-> ( `' N ` x ) _E ( `' N ` y ) ) )
70	61, 69	mpbid 215	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` x ) _E ( `' N ` y ) )
71		fvex 5889	. . . . . . . . . . . . . 14 |- ( `' N ` y ) e. _V
72	71	epelc 4752	. . . . . . . . . . . . 13 |- ( ( `' N ` x ) _E ( `' N ` y ) <-> ( `' N ` x ) e. ( `' N ` y ) )
73	70, 72	sylib 201	. . . . . . . . . . . 12 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` x ) e. ( `' N ` y ) )
74	23	adantr 472	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> M = ( N |` dom M ) )
75	74	cnveqd 5015	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M = `' ( N |` dom M ) )
76		isof1o 6234	. . . . . . . . . . . . . . . . . 18 |- ( `' N Isom S , _E ( Y , dom N ) -> `' N : Y -1-1-onto-> dom N )
77		f1ofn 5829	. . . . . . . . . . . . . . . . . 18 |- ( `' N : Y -1-1-onto-> dom N -> `' N Fn Y )
78	64, 76, 77	3syl 18	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' N Fn Y )
79		fnfun 5683	. . . . . . . . . . . . . . . . 17 |- ( `' N Fn Y -> Fun `' N )
80		funcnvres 5662	. . . . . . . . . . . . . . . . 17 |- ( Fun `' N -> `' ( N |` dom M ) = ( `' N |` ( N " dom M ) ) )
81	78, 79, 80	3syl 18	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' ( N |` dom M ) = ( `' N |` ( N " dom M ) ) )
82	75, 81	eqtrd 2505	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M = ( `' N |` ( N " dom M ) ) )
83	82	fveq1d 5881	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) = ( ( `' N |` ( N " dom M ) ) ` y ) )
84	27	adantr 472	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X = ( N " dom M ) )
85	66, 84	eleqtrd 2551	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. ( N " dom M ) )
86		fvres 5893	. . . . . . . . . . . . . . 15 |- ( y e. ( N " dom M ) -> ( ( `' N |` ( N " dom M ) ) ` y ) = ( `' N ` y ) )
87	85, 86	syl 17	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( ( `' N |` ( N " dom M ) ) ` y ) = ( `' N ` y ) )
88	83, 87	eqtrd 2505	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) = ( `' N ` y ) )
89		isocnv 6239	. . . . . . . . . . . . . . . . 17 |- ( M Isom _E , R ( dom M , X ) -> `' M Isom R , _E ( X , dom M ) )
90	13, 89	syl 17	. . . . . . . . . . . . . . . 16 |- ( ph -> `' M Isom R , _E ( X , dom M ) )
91		isof1o 6234	. . . . . . . . . . . . . . . 16 |- ( `' M Isom R , _E ( X , dom M ) -> `' M : X -1-1-onto-> dom M )
92		f1of 5828	. . . . . . . . . . . . . . . 16 |- ( `' M : X -1-1-onto-> dom M -> `' M : X --> dom M )
93	90, 91, 92	3syl 18	. . . . . . . . . . . . . . 15 |- ( ph -> `' M : X --> dom M )
94	93	adantr 472	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M : X --> dom M )
95	94, 66	ffvelrnd 6038	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) e. dom M )
96	88, 95	eqeltrrd 2550	. . . . . . . . . . . 12 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` y ) e. dom M )
97	11	oicl 8062	. . . . . . . . . . . . 13 |- Ord dom M
98		ordtr1 5473	. . . . . . . . . . . . 13 |- ( Ord dom M -> ( ( ( `' N ` x ) e. ( `' N ` y ) /\ ( `' N ` y ) e. dom M ) -> ( `' N ` x ) e. dom M ) )
99	97, 98	ax-mp 5	. . . . . . . . . . . 12 |- ( ( ( `' N ` x ) e. ( `' N ` y ) /\ ( `' N ` y ) e. dom M ) -> ( `' N ` x ) e. dom M )
100	73, 96, 99	syl2anc 673	. . . . . . . . . . 11 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` x ) e. dom M )
101		elpreima 6017	. . . . . . . . . . . 12 |- ( `' N Fn Y -> ( x e. ( `' `' N " dom M ) <-> ( x e. Y /\ ( `' N ` x ) e. dom M ) ) )
102	78, 101	syl 17	. . . . . . . . . . 11 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( x e. ( `' `' N " dom M ) <-> ( x e. Y /\ ( `' N ` x ) e. dom M ) ) )
103	60, 100, 102	mpbir2and 936	. . . . . . . . . 10 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. ( `' `' N " dom M ) )
104		imacnvcnv 5307	. . . . . . . . . . 11 |- ( `' `' N " dom M ) = ( N " dom M )
105	84, 104	syl6eqr 2523	. . . . . . . . . 10 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X = ( `' `' N " dom M ) )
106	103, 105	eleqtrrd 2552	. . . . . . . . 9 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. X )
107	106, 66	jca 541	. . . . . . . 8 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( x e. X /\ y e. X ) )
108	107	ex 441	. . . . . . 7 |- ( ph -> ( ( ( x e. Y /\ y e. X ) /\ x S y ) -> ( x e. X /\ y e. X ) ) )
109	59, 108	syl5bi 225	. . . . . 6 |- ( ph -> ( x ( S i^i ( Y X. X ) ) y -> ( x e. X /\ y e. X ) ) )
110	23	adantr 472	. . . . . . . . . . . 12 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> M = ( N |` dom M ) )
111	110	cnveqd 5015	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> `' M = `' ( N |` dom M ) )
112	111	fveq1d 5881	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( `' M ` x ) = ( `' ( N |` dom M ) ` x ) )
113	111	fveq1d 5881	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( `' M ` y ) = ( `' ( N |` dom M ) ` y ) )
114	112, 113	breq12d 4408	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( ( `' M ` x ) _E ( `' M ` y ) <-> ( `' ( N |` dom M ) ` x ) _E ( `' ( N |` dom M ) ` y ) ) )
115		isorel 6235	. . . . . . . . . 10 |- ( ( `' M Isom R , _E ( X , dom M ) /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> ( `' M ` x ) _E ( `' M ` y ) ) )
116	90, 115	sylan 479	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> ( `' M ` x ) _E ( `' M ` y ) ) )
117		eqidd 2472	. . . . . . . . . . . . 13 |- ( ph -> ( N " dom M ) = ( N " dom M ) )
118		isores3 6244	. . . . . . . . . . . . 13 |- ( ( N Isom _E , S ( dom N , Y ) /\ dom M C_ dom N /\ ( N " dom M ) = ( N " dom M ) ) -> ( N |` dom M ) Isom _E , S ( dom M , ( N " dom M ) ) )
119	36, 22, 117, 118	syl3anc 1292	. . . . . . . . . . . 12 |- ( ph -> ( N |` dom M ) Isom _E , S ( dom M , ( N " dom M ) ) )
120		isocnv 6239	. . . . . . . . . . . 12 |- ( ( N |` dom M ) Isom _E , S ( dom M , ( N " dom M ) ) -> `' ( N |` dom M ) Isom S , _E ( ( N " dom M ) , dom M ) )
121	119, 120	syl 17	. . . . . . . . . . 11 |- ( ph -> `' ( N |` dom M ) Isom S , _E ( ( N " dom M ) , dom M ) )
122	121	adantr 472	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> `' ( N |` dom M ) Isom S , _E ( ( N " dom M ) , dom M ) )
123		simprl 772	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. X )
124	27	adantr 472	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> X = ( N " dom M ) )
125	123, 124	eleqtrd 2551	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. ( N " dom M ) )
126		simprr 774	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> y e. X )
127	126, 124	eleqtrd 2551	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> y e. ( N " dom M ) )
128		isorel 6235	. . . . . . . . . 10 |- ( ( `' ( N |` dom M ) Isom S , _E ( ( N " dom M ) , dom M ) /\ ( x e. ( N " dom M ) /\ y e. ( N " dom M ) ) ) -> ( x S y <-> ( `' ( N |` dom M ) ` x ) _E ( `' ( N |` dom M ) ` y ) ) )
129	122, 125, 127, 128	syl12anc 1290	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x S y <-> ( `' ( N |` dom M ) ` x ) _E ( `' ( N |` dom M ) ` y ) ) )
130	114, 116, 129	3bitr4d 293	. . . . . . . 8 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> x S y ) )
131	43	sselda 3418	. . . . . . . . . . . 12 |- ( ( ph /\ x e. X ) -> x e. Y )
132	131	adantrr 731	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. Y )
133	132, 126	jca 541	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x e. Y /\ y e. X ) )
134	133	biantrurd 516	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x S y <-> ( ( x e. Y /\ y e. X ) /\ x S y ) ) )
135	134, 59	syl6bbr 271	. . . . . . . 8 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x S y <-> x ( S i^i ( Y X. X ) ) y ) )
136	130, 135	bitrd 261	. . . . . . 7 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> x ( S i^i ( Y X. X ) ) y ) )
137	136	ex 441	. . . . . 6 |- ( ph -> ( ( x e. X /\ y e. X ) -> ( x R y <-> x ( S i^i ( Y X. X ) ) y ) ) )
138	56, 109, 137	pm5.21ndd 361	. . . . 5 |- ( ph -> ( x R y <-> x ( S i^i ( Y X. X ) ) y ) )
139		df-br 4396	. . . . 5 |- ( x R y <-> <. x , y >. e. R )
140		df-br 4396	. . . . 5 |- ( x ( S i^i ( Y X. X ) ) y <-> <. x , y >. e. ( S i^i ( Y X. X ) ) )
141	138, 139, 140	3bitr3g 295	. . . 4 |- ( ph -> ( <. x , y >. e. R <-> <. x , y >. e. ( S i^i ( Y X. X ) ) ) )
142	141	eqrelrdv2 4939	. . 3 |- ( ( ( Rel R /\ Rel ( S i^i ( Y X. X ) ) ) /\ ph ) -> R = ( S i^i ( Y X. X ) ) )
143	53, 142	mpancom 682	. 2 |- ( ph -> R = ( S i^i ( Y X. X ) ) )
144	43, 143	jca 541	1 |- ( ph -> ( X C_ Y /\ R = ( S i^i ( Y X. X ) ) ) )

Syntax hints:   -> wi 4   <-> wb 189   /\ wa 376   /\ w3a 1007   = wceq 1452   e. wcel 1904   A.wral 2756   _Vcvv 3031   [.wsbc 3255   i^i cin 3389   C_ wss 3390   {csn 3959   <.cop 3965   class class class wbr 4395   {copab 4453   _E cep 4748   We wwe 4797   X. cxp 4837   `'ccnv 4838   dom cdm 4839   ran crn 4840   |` cres 4841   "cima 4842   Rel wrel 4844   Ord word 5429   Fun wfun 5583   Fn wfn 5584   -->wf 5585   -onto->wfo 5587   -1-1-onto->wf1o 5588   ` cfv 5589   Isom wiso 5590  (class class class)co 6308  OrdIsocoi 8042

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-rep 4508  ax-sep 4518  ax-nul 4527  ax-pow 4579  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-reu 2763  df-rmo 2764  df-rab 2765  df-v 3033  df-sbc 3256  df-csb 3350  df-dif 3393  df-un 3395  df-in 3397  df-ss 3404  df-pss 3406  df-nul 3723  df-if 3873  df-pw 3944  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-mpt 4456  df-tr 4491  df-eprel 4750  df-id 4754  df-po 4760  df-so 4761  df-fr 4798  df-se 4799  df-we 4800  df-xp 4845  df-rel 4846  df-cnv 4847  df-co 4848  df-dm 4849  df-rn 4850  df-res 4851  df-ima 4852  df-pred 5387  df-ord 5433  df-on 5434  df-lim 5435  df-suc 5436  df-iota 5553  df-fun 5591  df-fn 5592  df-f 5593  df-f1 5594  df-fo 5595  df-f1o 5596  df-fv 5597  df-isom 5598  df-riota 6270  df-ov 6311  df-wrecs 7046  df-recs 7108  df-oi 8043

This theorem is referenced by:  fpwwe2lem10  9082