Theorem fpwwe2lem9 9019

Description: Lemma for fpwwe2 9024. 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 5118	. . . . . . . . . 10 |- Rel W
4	3	brrelexi 5030	. . . . . . . . 9 |- ( X W R -> X e. _V )
5	1, 4	syl 16	. . . . . . . 8 |- ( ph -> X e. _V )
6		fpwwe2.2	. . . . . . . . . . . 12 |- ( ph -> A e. _V )
7	2, 6	fpwwe2lem2 9013	. . . . . . . . . . 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 210	. . . . . . . . . 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 463	. . . . . . . . 9 |- ( ph -> ( R We X /\ A. y e. X [. ( `' R " { y } ) / u ]. ( u F ( R i^i ( u X. u ) ) ) = y ) )
10	9	simpld 459	. . . . . . . 8 |- ( ph -> R We X )
11		fpwwe2lem9.m	. . . . . . . . 9 |- M = OrdIso ( R , X )
12	11	oiiso 7965	. . . . . . . 8 |- ( ( X e. _V /\ R We X ) -> M Isom _E , R ( dom M , X ) )
13	5, 10, 12	syl2anc 661	. . . . . . 7 |- ( ph -> M Isom _E , R ( dom M , X ) )
14		isof1o 6206	. . . . . . 7 |- ( M Isom _E , R ( dom M , X ) -> M : dom M -1-1-onto-> X )
15	13, 14	syl 16	. . . . . 6 |- ( ph -> M : dom M -1-1-onto-> X )
16		f1ofo 5813	. . . . . 6 |- ( M : dom M -1-1-onto-> X -> M : dom M -onto-> X )
17		forn 5788	. . . . . 6 |- ( M : dom M -onto-> X -> ran M = X )
18	15, 16, 17	3syl 20	. . . . 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 9018	. . . . . 6 |- ( ph -> M = ( N |` dom M ) )
24	23	rneqd 5220	. . . . 5 |- ( ph -> ran M = ran ( N |` dom M ) )
25	18, 24	eqtr3d 2486	. . . 4 |- ( ph -> X = ran ( N |` dom M ) )
26		df-ima 5002	. . . 4 |- ( N " dom M ) = ran ( N |` dom M )
27	25, 26	syl6eqr 2502	. . 3 |- ( ph -> X = ( N " dom M ) )
28		imassrn 5338	. . . 4 |- ( N " dom M ) C_ ran N
29	3	brrelexi 5030	. . . . . . . 8 |- ( Y W S -> Y e. _V )
30	20, 29	syl 16	. . . . . . 7 |- ( ph -> Y e. _V )
31	2, 6	fpwwe2lem2 9013	. . . . . . . . . 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 210	. . . . . . . . 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 463	. . . . . . . 8 |- ( ph -> ( S We Y /\ A. y e. Y [. ( `' S " { y } ) / u ]. ( u F ( S i^i ( u X. u ) ) ) = y ) )
34	33	simpld 459	. . . . . . 7 |- ( ph -> S We Y )
35	21	oiiso 7965	. . . . . . 7 |- ( ( Y e. _V /\ S We Y ) -> N Isom _E , S ( dom N , Y ) )
36	30, 34, 35	syl2anc 661	. . . . . 6 |- ( ph -> N Isom _E , S ( dom N , Y ) )
37		isof1o 6206	. . . . . 6 |- ( N Isom _E , S ( dom N , Y ) -> N : dom N -1-1-onto-> Y )
38	36, 37	syl 16	. . . . 5 |- ( ph -> N : dom N -1-1-onto-> Y )
39		f1ofo 5813	. . . . 5 |- ( N : dom N -1-1-onto-> Y -> N : dom N -onto-> Y )
40		forn 5788	. . . . 5 |- ( N : dom N -onto-> Y -> ran N = Y )
41	38, 39, 40	3syl 20	. . . 4 |- ( ph -> ran N = Y )
42	28, 41	syl5sseq 3537	. . 3 |- ( ph -> ( N " dom M ) C_ Y )
43	27, 42	eqsstrd 3523	. 2 |- ( ph -> X C_ Y )
44	8	simpld 459	. . . . . 6 |- ( ph -> ( X C_ A /\ R C_ ( X X. X ) ) )
45	44	simprd 463	. . . . 5 |- ( ph -> R C_ ( X X. X ) )
46		relxp 5100	. . . . 5 |- Rel ( X X. X )
47		relss 5080	. . . . 5 |- ( R C_ ( X X. X ) -> ( Rel ( X X. X ) -> Rel R ) )
48	45, 46, 47	mpisyl 18	. . . 4 |- ( ph -> Rel R )
49		inss2 3704	. . . . 5 |- ( S i^i ( Y X. X ) ) C_ ( Y X. X )
50		relxp 5100	. . . . 5 |- Rel ( Y X. X )
51		relss 5080	. . . . 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 538	. . 3 |- ( ph -> ( Rel R /\ Rel ( S i^i ( Y X. X ) ) ) )
54	45	ssbrd 4478	. . . . . . 7 |- ( ph -> ( x R y -> x ( X X. X ) y ) )
55		brxp 5020	. . . . . . 7 |- ( x ( X X. X ) y <-> ( x e. X /\ y e. X ) )
56	54, 55	syl6ib 226	. . . . . 6 |- ( ph -> ( x R y -> ( x e. X /\ y e. X ) ) )
57		brinxp2 5051	. . . . . . . 8 |- ( x ( S i^i ( Y X. X ) ) y <-> ( x e. Y /\ y e. X /\ x S y ) )
58		df-3an 976	. . . . . . . 8 |- ( ( x e. Y /\ y e. X /\ x S y ) <-> ( ( x e. Y /\ y e. X ) /\ x S y ) )
59	57, 58	bitri 249	. . . . . . 7 |- ( x ( S i^i ( Y X. X ) ) y <-> ( ( x e. Y /\ y e. X ) /\ x S y ) )
60		simprll 763	. . . . . . . . . . 11 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. Y )
61		simprr 757	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x S y )
62		isocnv 6211	. . . . . . . . . . . . . . . . 17 |- ( N Isom _E , S ( dom N , Y ) -> `' N Isom S , _E ( Y , dom N ) )
63	36, 62	syl 16	. . . . . . . . . . . . . . . 16 |- ( ph -> `' N Isom S , _E ( Y , dom N ) )
64	63	adantr 465	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' N Isom S , _E ( Y , dom N ) )
65	43	adantr 465	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X C_ Y )
66		simprlr 764	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. X )
67	65, 66	sseldd 3490	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. Y )
68		isorel 6207	. . . . . . . . . . . . . . 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 1227	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( x S y <-> ( `' N ` x ) _E ( `' N ` y ) ) )
70	61, 69	mpbid 210	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` x ) _E ( `' N ` y ) )
71		fvex 5866	. . . . . . . . . . . . . 14 |- ( `' N ` y ) e. _V
72	71	epelc 4783	. . . . . . . . . . . . 13 |- ( ( `' N ` x ) _E ( `' N ` y ) <-> ( `' N ` x ) e. ( `' N ` y ) )
73	70, 72	sylib 196	. . . . . . . . . . . 12 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` x ) e. ( `' N ` y ) )
74	23	adantr 465	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> M = ( N |` dom M ) )
75	74	cnveqd 5168	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M = `' ( N |` dom M ) )
76		isof1o 6206	. . . . . . . . . . . . . . . . . 18 |- ( `' N Isom S , _E ( Y , dom N ) -> `' N : Y -1-1-onto-> dom N )
77		f1ofn 5807	. . . . . . . . . . . . . . . . . 18 |- ( `' N : Y -1-1-onto-> dom N -> `' N Fn Y )
78	64, 76, 77	3syl 20	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' N Fn Y )
79		fnfun 5668	. . . . . . . . . . . . . . . . 17 |- ( `' N Fn Y -> Fun `' N )
80		funcnvres 5647	. . . . . . . . . . . . . . . . 17 |- ( Fun `' N -> `' ( N |` dom M ) = ( `' N |` ( N " dom M ) ) )
81	78, 79, 80	3syl 20	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' ( N |` dom M ) = ( `' N |` ( N " dom M ) ) )
82	75, 81	eqtrd 2484	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M = ( `' N |` ( N " dom M ) ) )
83	82	fveq1d 5858	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) = ( ( `' N |` ( N " dom M ) ) ` y ) )
84	27	adantr 465	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X = ( N " dom M ) )
85	66, 84	eleqtrd 2533	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. ( N " dom M ) )
86		fvres 5870	. . . . . . . . . . . . . . 15 |- ( y e. ( N " dom M ) -> ( ( `' N |` ( N " dom M ) ) ` y ) = ( `' N ` y ) )
87	85, 86	syl 16	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( ( `' N |` ( N " dom M ) ) ` y ) = ( `' N ` y ) )
88	83, 87	eqtrd 2484	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) = ( `' N ` y ) )
89		isocnv 6211	. . . . . . . . . . . . . . . . 17 |- ( M Isom _E , R ( dom M , X ) -> `' M Isom R , _E ( X , dom M ) )
90	13, 89	syl 16	. . . . . . . . . . . . . . . 16 |- ( ph -> `' M Isom R , _E ( X , dom M ) )
91		isof1o 6206	. . . . . . . . . . . . . . . 16 |- ( `' M Isom R , _E ( X , dom M ) -> `' M : X -1-1-onto-> dom M )
92		f1of 5806	. . . . . . . . . . . . . . . 16 |- ( `' M : X -1-1-onto-> dom M -> `' M : X --> dom M )
93	90, 91, 92	3syl 20	. . . . . . . . . . . . . . 15 |- ( ph -> `' M : X --> dom M )
94	93	adantr 465	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M : X --> dom M )
95	94, 66	ffvelrnd 6017	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) e. dom M )
96	88, 95	eqeltrrd 2532	. . . . . . . . . . . 12 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` y ) e. dom M )
97	11	oicl 7957	. . . . . . . . . . . . 13 |- Ord dom M
98		ordtr1 4911	. . . . . . . . . . . . 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 661	. . . . . . . . . . 11 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` x ) e. dom M )
101		elpreima 5992	. . . . . . . . . . . 12 |- ( `' N Fn Y -> ( x e. ( `' `' N " dom M ) <-> ( x e. Y /\ ( `' N ` x ) e. dom M ) ) )
102	78, 101	syl 16	. . . . . . . . . . 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 922	. . . . . . . . . 10 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. ( `' `' N " dom M ) )
104		imacnvcnv 5462	. . . . . . . . . . 11 |- ( `' `' N " dom M ) = ( N " dom M )
105	84, 104	syl6eqr 2502	. . . . . . . . . 10 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X = ( `' `' N " dom M ) )
106	103, 105	eleqtrrd 2534	. . . . . . . . 9 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. X )
107	106, 66	jca 532	. . . . . . . 8 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( x e. X /\ y e. X ) )
108	107	ex 434	. . . . . . 7 |- ( ph -> ( ( ( x e. Y /\ y e. X ) /\ x S y ) -> ( x e. X /\ y e. X ) ) )
109	59, 108	syl5bi 217	. . . . . 6 |- ( ph -> ( x ( S i^i ( Y X. X ) ) y -> ( x e. X /\ y e. X ) ) )
110	23	adantr 465	. . . . . . . . . . . 12 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> M = ( N |` dom M ) )
111	110	cnveqd 5168	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> `' M = `' ( N |` dom M ) )
112	111	fveq1d 5858	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( `' M ` x ) = ( `' ( N |` dom M ) ` x ) )
113	111	fveq1d 5858	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( `' M ` y ) = ( `' ( N |` dom M ) ` y ) )
114	112, 113	breq12d 4450	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( ( `' M ` x ) _E ( `' M ` y ) <-> ( `' ( N |` dom M ) ` x ) _E ( `' ( N |` dom M ) ` y ) ) )
115		isorel 6207	. . . . . . . . . 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 471	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> ( `' M ` x ) _E ( `' M ` y ) ) )
117		eqidd 2444	. . . . . . . . . . . . 13 |- ( ph -> ( N " dom M ) = ( N " dom M ) )
118		isores3 6216	. . . . . . . . . . . . 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 1229	. . . . . . . . . . . 12 |- ( ph -> ( N |` dom M ) Isom _E , S ( dom M , ( N " dom M ) ) )
120		isocnv 6211	. . . . . . . . . . . 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 16	. . . . . . . . . . 11 |- ( ph -> `' ( N |` dom M ) Isom S , _E ( ( N " dom M ) , dom M ) )
122	121	adantr 465	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> `' ( N |` dom M ) Isom S , _E ( ( N " dom M ) , dom M ) )
123		simprl 756	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. X )
124	27	adantr 465	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> X = ( N " dom M ) )
125	123, 124	eleqtrd 2533	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. ( N " dom M ) )
126		simprr 757	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> y e. X )
127	126, 124	eleqtrd 2533	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> y e. ( N " dom M ) )
128		isorel 6207	. . . . . . . . . 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 1227	. . . . . . . . 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 285	. . . . . . . 8 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> x S y ) )
131	43	sselda 3489	. . . . . . . . . . . 12 |- ( ( ph /\ x e. X ) -> x e. Y )
132	131	adantrr 716	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. Y )
133	132, 126	jca 532	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x e. Y /\ y e. X ) )
134	133	biantrurd 508	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x S y <-> ( ( x e. Y /\ y e. X ) /\ x S y ) ) )
135	134, 59	syl6bbr 263	. . . . . . . 8 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x S y <-> x ( S i^i ( Y X. X ) ) y ) )
136	130, 135	bitrd 253	. . . . . . 7 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> x ( S i^i ( Y X. X ) ) y ) )
137	136	ex 434	. . . . . 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 354	. . . . 5 |- ( ph -> ( x R y <-> x ( S i^i ( Y X. X ) ) y ) )
139		df-br 4438	. . . . 5 |- ( x R y <-> <. x , y >. e. R )
140		df-br 4438	. . . . 5 |- ( x ( S i^i ( Y X. X ) ) y <-> <. x , y >. e. ( S i^i ( Y X. X ) ) )
141	138, 139, 140	3bitr3g 287	. . . 4 |- ( ph -> ( <. x , y >. e. R <-> <. x , y >. e. ( S i^i ( Y X. X ) ) ) )
142	141	eqrelrdv2 5092	. . 3 |- ( ( ( Rel R /\ Rel ( S i^i ( Y X. X ) ) ) /\ ph ) -> R = ( S i^i ( Y X. X ) ) )
143	53, 142	mpancom 669	. 2 |- ( ph -> R = ( S i^i ( Y X. X ) ) )
144	43, 143	jca 532	1 |- ( ph -> ( X C_ Y /\ R = ( S i^i ( Y X. X ) ) ) )

Syntax hints:   -> wi 4   <-> wb 184   /\ wa 369   /\ w3a 974   = wceq 1383   e. wcel 1804   A.wral 2793   _Vcvv 3095   [.wsbc 3313   i^i cin 3460   C_ wss 3461   {csn 4014   <.cop 4020   class class class wbr 4437   {copab 4494   _E cep 4779   We wwe 4827   Ord word 4867   X. cxp 4987   `'ccnv 4988   dom cdm 4989   ran crn 4990   |` cres 4991   "cima 4992   Rel wrel 4994   Fun wfun 5572   Fn wfn 5573   -->wf 5574   -onto->wfo 5576   -1-1-onto->wf1o 5577   ` cfv 5578   Isom wiso 5579  (class class class)co 6281  OrdIsocoi 7937

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1605  ax-4 1618  ax-5 1691  ax-6 1734  ax-7 1776  ax-8 1806  ax-9 1808  ax-10 1823  ax-11 1828  ax-12 1840  ax-13 1985  ax-ext 2421  ax-rep 4548  ax-sep 4558  ax-nul 4566  ax-pow 4615  ax-pr 4676  ax-un 6577

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 975  df-3an 976  df-tru 1386  df-ex 1600  df-nf 1604  df-sb 1727  df-eu 2272  df-mo 2273  df-clab 2429  df-cleq 2435  df-clel 2438  df-nfc 2593  df-ne 2640  df-ral 2798  df-rex 2799  df-reu 2800  df-rmo 2801  df-rab 2802  df-v 3097  df-sbc 3314  df-csb 3421  df-dif 3464  df-un 3466  df-in 3468  df-ss 3475  df-pss 3477  df-nul 3771  df-if 3927  df-pw 3999  df-sn 4015  df-pr 4017  df-tp 4019  df-op 4021  df-uni 4235  df-iun 4317  df-br 4438  df-opab 4496  df-mpt 4497  df-tr 4531  df-eprel 4781  df-id 4785  df-po 4790  df-so 4791  df-fr 4828  df-se 4829  df-we 4830  df-ord 4871  df-on 4872  df-lim 4873  df-suc 4874  df-xp 4995  df-rel 4996  df-cnv 4997  df-co 4998  df-dm 4999  df-rn 5000  df-res 5001  df-ima 5002  df-iota 5541  df-fun 5580  df-fn 5581  df-f 5582  df-f1 5583  df-fo 5584  df-f1o 5585  df-fv 5586  df-isom 5587  df-riota 6242  df-ov 6284  df-recs 7044  df-oi 7938

This theorem is referenced by:  fpwwe2lem10  9020