Theorem fpwwe2lem9 9063

Description: Lemma for fpwwe2 9068. 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 4959	. . . . . . . . . 10 |- Rel W
4	3	brrelexi 4875	. . . . . . . . 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 9057	. . . . . . . . . . 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 214	. . . . . . . . . 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 465	. . . . . . . . 9 |- ( ph -> ( R We X /\ A. y e. X [. ( `' R " { y } ) / u ]. ( u F ( R i^i ( u X. u ) ) ) = y ) )
10	9	simpld 461	. . . . . . . 8 |- ( ph -> R We X )
11		fpwwe2lem9.m	. . . . . . . . 9 |- M = OrdIso ( R , X )
12	11	oiiso 8052	. . . . . . . 8 |- ( ( X e. _V /\ R We X ) -> M Isom _E , R ( dom M , X ) )
13	5, 10, 12	syl2anc 667	. . . . . . 7 |- ( ph -> M Isom _E , R ( dom M , X ) )
14		isof1o 6216	. . . . . . 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 5821	. . . . . 6 |- ( M : dom M -1-1-onto-> X -> M : dom M -onto-> X )
17		forn 5796	. . . . . 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 9062	. . . . . 6 |- ( ph -> M = ( N |` dom M ) )
24	23	rneqd 5062	. . . . 5 |- ( ph -> ran M = ran ( N |` dom M ) )
25	18, 24	eqtr3d 2487	. . . 4 |- ( ph -> X = ran ( N |` dom M ) )
26		df-ima 4847	. . . 4 |- ( N " dom M ) = ran ( N |` dom M )
27	25, 26	syl6eqr 2503	. . 3 |- ( ph -> X = ( N " dom M ) )
28		imassrn 5179	. . . 4 |- ( N " dom M ) C_ ran N
29	3	brrelexi 4875	. . . . . . . 8 |- ( Y W S -> Y e. _V )
30	20, 29	syl 17	. . . . . . 7 |- ( ph -> Y e. _V )
31	2, 6	fpwwe2lem2 9057	. . . . . . . . . 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 214	. . . . . . . . 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 465	. . . . . . . 8 |- ( ph -> ( S We Y /\ A. y e. Y [. ( `' S " { y } ) / u ]. ( u F ( S i^i ( u X. u ) ) ) = y ) )
34	33	simpld 461	. . . . . . 7 |- ( ph -> S We Y )
35	21	oiiso 8052	. . . . . . 7 |- ( ( Y e. _V /\ S We Y ) -> N Isom _E , S ( dom N , Y ) )
36	30, 34, 35	syl2anc 667	. . . . . 6 |- ( ph -> N Isom _E , S ( dom N , Y ) )
37		isof1o 6216	. . . . . 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 5821	. . . . 5 |- ( N : dom N -1-1-onto-> Y -> N : dom N -onto-> Y )
40		forn 5796	. . . . 5 |- ( N : dom N -onto-> Y -> ran N = Y )
41	38, 39, 40	3syl 18	. . . 4 |- ( ph -> ran N = Y )
42	28, 41	syl5sseq 3480	. . 3 |- ( ph -> ( N " dom M ) C_ Y )
43	27, 42	eqsstrd 3466	. 2 |- ( ph -> X C_ Y )
44	8	simpld 461	. . . . . 6 |- ( ph -> ( X C_ A /\ R C_ ( X X. X ) ) )
45	44	simprd 465	. . . . 5 |- ( ph -> R C_ ( X X. X ) )
46		relxp 4942	. . . . 5 |- Rel ( X X. X )
47		relss 4922	. . . . 5 |- ( R C_ ( X X. X ) -> ( Rel ( X X. X ) -> Rel R ) )
48	45, 46, 47	mpisyl 21	. . . 4 |- ( ph -> Rel R )
49		inss2 3653	. . . . 5 |- ( S i^i ( Y X. X ) ) C_ ( Y X. X )
50		relxp 4942	. . . . 5 |- Rel ( Y X. X )
51		relss 4922	. . . . 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 541	. . 3 |- ( ph -> ( Rel R /\ Rel ( S i^i ( Y X. X ) ) ) )
54	45	ssbrd 4444	. . . . . . 7 |- ( ph -> ( x R y -> x ( X X. X ) y ) )
55		brxp 4865	. . . . . . 7 |- ( x ( X X. X ) y <-> ( x e. X /\ y e. X ) )
56	54, 55	syl6ib 230	. . . . . 6 |- ( ph -> ( x R y -> ( x e. X /\ y e. X ) ) )
57		brinxp2 4896	. . . . . . . 8 |- ( x ( S i^i ( Y X. X ) ) y <-> ( x e. Y /\ y e. X /\ x S y ) )
58		df-3an 987	. . . . . . . 8 |- ( ( x e. Y /\ y e. X /\ x S y ) <-> ( ( x e. Y /\ y e. X ) /\ x S y ) )
59	57, 58	bitri 253	. . . . . . 7 |- ( x ( S i^i ( Y X. X ) ) y <-> ( ( x e. Y /\ y e. X ) /\ x S y ) )
60		simprll 772	. . . . . . . . . . 11 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. Y )
61		simprr 766	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x S y )
62		isocnv 6221	. . . . . . . . . . . . . . . . 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 467	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' N Isom S , _E ( Y , dom N ) )
65	43	adantr 467	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X C_ Y )
66		simprlr 773	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. X )
67	65, 66	sseldd 3433	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. Y )
68		isorel 6217	. . . . . . . . . . . . . . 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 1266	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( x S y <-> ( `' N ` x ) _E ( `' N ` y ) ) )
70	61, 69	mpbid 214	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` x ) _E ( `' N ` y ) )
71		fvex 5875	. . . . . . . . . . . . . 14 |- ( `' N ` y ) e. _V
72	71	epelc 4747	. . . . . . . . . . . . 13 |- ( ( `' N ` x ) _E ( `' N ` y ) <-> ( `' N ` x ) e. ( `' N ` y ) )
73	70, 72	sylib 200	. . . . . . . . . . . 12 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` x ) e. ( `' N ` y ) )
74	23	adantr 467	. . . . . . . . . . . . . . . . 17 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> M = ( N |` dom M ) )
75	74	cnveqd 5010	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M = `' ( N |` dom M ) )
76		isof1o 6216	. . . . . . . . . . . . . . . . . 18 |- ( `' N Isom S , _E ( Y , dom N ) -> `' N : Y -1-1-onto-> dom N )
77		f1ofn 5815	. . . . . . . . . . . . . . . . . 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 5673	. . . . . . . . . . . . . . . . 17 |- ( `' N Fn Y -> Fun `' N )
80		funcnvres 5652	. . . . . . . . . . . . . . . . 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 2485	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M = ( `' N |` ( N " dom M ) ) )
83	82	fveq1d 5867	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) = ( ( `' N |` ( N " dom M ) ) ` y ) )
84	27	adantr 467	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X = ( N " dom M ) )
85	66, 84	eleqtrd 2531	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. ( N " dom M ) )
86		fvres 5879	. . . . . . . . . . . . . . 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 2485	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) = ( `' N ` y ) )
89		isocnv 6221	. . . . . . . . . . . . . . . . 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 6216	. . . . . . . . . . . . . . . 16 |- ( `' M Isom R , _E ( X , dom M ) -> `' M : X -1-1-onto-> dom M )
92		f1of 5814	. . . . . . . . . . . . . . . 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 467	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M : X --> dom M )
95	94, 66	ffvelrnd 6023	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) e. dom M )
96	88, 95	eqeltrrd 2530	. . . . . . . . . . . 12 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` y ) e. dom M )
97	11	oicl 8044	. . . . . . . . . . . . 13 |- Ord dom M
98		ordtr1 5466	. . . . . . . . . . . . 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 667	. . . . . . . . . . 11 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` x ) e. dom M )
101		elpreima 6002	. . . . . . . . . . . 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 933	. . . . . . . . . 10 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. ( `' `' N " dom M ) )
104		imacnvcnv 5300	. . . . . . . . . . 11 |- ( `' `' N " dom M ) = ( N " dom M )
105	84, 104	syl6eqr 2503	. . . . . . . . . 10 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X = ( `' `' N " dom M ) )
106	103, 105	eleqtrrd 2532	. . . . . . . . 9 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. X )
107	106, 66	jca 535	. . . . . . . 8 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( x e. X /\ y e. X ) )
108	107	ex 436	. . . . . . 7 |- ( ph -> ( ( ( x e. Y /\ y e. X ) /\ x S y ) -> ( x e. X /\ y e. X ) ) )
109	59, 108	syl5bi 221	. . . . . 6 |- ( ph -> ( x ( S i^i ( Y X. X ) ) y -> ( x e. X /\ y e. X ) ) )
110	23	adantr 467	. . . . . . . . . . . 12 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> M = ( N |` dom M ) )
111	110	cnveqd 5010	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> `' M = `' ( N |` dom M ) )
112	111	fveq1d 5867	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( `' M ` x ) = ( `' ( N |` dom M ) ` x ) )
113	111	fveq1d 5867	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( `' M ` y ) = ( `' ( N |` dom M ) ` y ) )
114	112, 113	breq12d 4415	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( ( `' M ` x ) _E ( `' M ` y ) <-> ( `' ( N |` dom M ) ` x ) _E ( `' ( N |` dom M ) ` y ) ) )
115		isorel 6217	. . . . . . . . . 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 474	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> ( `' M ` x ) _E ( `' M ` y ) ) )
117		eqidd 2452	. . . . . . . . . . . . 13 |- ( ph -> ( N " dom M ) = ( N " dom M ) )
118		isores3 6226	. . . . . . . . . . . . 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 1268	. . . . . . . . . . . 12 |- ( ph -> ( N |` dom M ) Isom _E , S ( dom M , ( N " dom M ) ) )
120		isocnv 6221	. . . . . . . . . . . 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 467	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> `' ( N |` dom M ) Isom S , _E ( ( N " dom M ) , dom M ) )
123		simprl 764	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. X )
124	27	adantr 467	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> X = ( N " dom M ) )
125	123, 124	eleqtrd 2531	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. ( N " dom M ) )
126		simprr 766	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> y e. X )
127	126, 124	eleqtrd 2531	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> y e. ( N " dom M ) )
128		isorel 6217	. . . . . . . . . 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 1266	. . . . . . . . 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 289	. . . . . . . 8 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> x S y ) )
131	43	sselda 3432	. . . . . . . . . . . 12 |- ( ( ph /\ x e. X ) -> x e. Y )
132	131	adantrr 723	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. Y )
133	132, 126	jca 535	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x e. Y /\ y e. X ) )
134	133	biantrurd 511	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x S y <-> ( ( x e. Y /\ y e. X ) /\ x S y ) ) )
135	134, 59	syl6bbr 267	. . . . . . . 8 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x S y <-> x ( S i^i ( Y X. X ) ) y ) )
136	130, 135	bitrd 257	. . . . . . 7 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( x R y <-> x ( S i^i ( Y X. X ) ) y ) )
137	136	ex 436	. . . . . 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 356	. . . . 5 |- ( ph -> ( x R y <-> x ( S i^i ( Y X. X ) ) y ) )
139		df-br 4403	. . . . 5 |- ( x R y <-> <. x , y >. e. R )
140		df-br 4403	. . . . 5 |- ( x ( S i^i ( Y X. X ) ) y <-> <. x , y >. e. ( S i^i ( Y X. X ) ) )
141	138, 139, 140	3bitr3g 291	. . . 4 |- ( ph -> ( <. x , y >. e. R <-> <. x , y >. e. ( S i^i ( Y X. X ) ) ) )
142	141	eqrelrdv2 4934	. . 3 |- ( ( ( Rel R /\ Rel ( S i^i ( Y X. X ) ) ) /\ ph ) -> R = ( S i^i ( Y X. X ) ) )
143	53, 142	mpancom 675	. 2 |- ( ph -> R = ( S i^i ( Y X. X ) ) )
144	43, 143	jca 535	1 |- ( ph -> ( X C_ Y /\ R = ( S i^i ( Y X. X ) ) ) )

Syntax hints:   -> wi 4   <-> wb 188   /\ wa 371   /\ w3a 985   = wceq 1444   e. wcel 1887   A.wral 2737   _Vcvv 3045   [.wsbc 3267   i^i cin 3403   C_ wss 3404   {csn 3968   <.cop 3974   class class class wbr 4402   {copab 4460   _E cep 4743   We wwe 4792   X. cxp 4832   `'ccnv 4833   dom cdm 4834   ran crn 4835   |` cres 4836   "cima 4837   Rel wrel 4839   Ord word 5422   Fun wfun 5576   Fn wfn 5577   -->wf 5578   -onto->wfo 5580   -1-1-onto->wf1o 5581   ` cfv 5582   Isom wiso 5583  (class class class)co 6290  OrdIsocoi 8024

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1669  ax-4 1682  ax-5 1758  ax-6 1805  ax-7 1851  ax-8 1889  ax-9 1896  ax-10 1915  ax-11 1920  ax-12 1933  ax-13 2091  ax-ext 2431  ax-rep 4515  ax-sep 4525  ax-nul 4534  ax-pow 4581  ax-pr 4639  ax-un 6583

This theorem depends on definitions:  df-bi 189  df-or 372  df-an 373  df-3or 986  df-3an 987  df-tru 1447  df-ex 1664  df-nf 1668  df-sb 1798  df-eu 2303  df-mo 2304  df-clab 2438  df-cleq 2444  df-clel 2447  df-nfc 2581  df-ne 2624  df-ral 2742  df-rex 2743  df-reu 2744  df-rmo 2745  df-rab 2746  df-v 3047  df-sbc 3268  df-csb 3364  df-dif 3407  df-un 3409  df-in 3411  df-ss 3418  df-pss 3420  df-nul 3732  df-if 3882  df-pw 3953  df-sn 3969  df-pr 3971  df-tp 3973  df-op 3975  df-uni 4199  df-iun 4280  df-br 4403  df-opab 4462  df-mpt 4463  df-tr 4498  df-eprel 4745  df-id 4749  df-po 4755  df-so 4756  df-fr 4793  df-se 4794  df-we 4795  df-xp 4840  df-rel 4841  df-cnv 4842  df-co 4843  df-dm 4844  df-rn 4845  df-res 4846  df-ima 4847  df-pred 5380  df-ord 5426  df-on 5427  df-lim 5428  df-suc 5429  df-iota 5546  df-fun 5584  df-fn 5585  df-f 5586  df-f1 5587  df-fo 5588  df-f1o 5589  df-fv 5590  df-isom 5591  df-riota 6252  df-ov 6293  df-wrecs 7028  df-recs 7090  df-oi 8025

This theorem is referenced by:  fpwwe2lem10  9064