Theorem fpwwe2lem9 8919

Description: Lemma for fpwwe2 8924. 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 5076	. . . . . . . . . 10 |- Rel W
4	3	brrelexi 4990	. . . . . . . . 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 8913	. . . . . . . . . . 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 7865	. . . . . . . 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 6128	. . . . . . 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 5759	. . . . . 6 |- ( M : dom M -1-1-onto-> X -> M : dom M -onto-> X )
17		forn 5734	. . . . . 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 8918	. . . . . 6 |- ( ph -> M = ( N |` dom M ) )
24	23	rneqd 5178	. . . . 5 |- ( ph -> ran M = ran ( N |` dom M ) )
25	18, 24	eqtr3d 2497	. . . 4 |- ( ph -> X = ran ( N |` dom M ) )
26		df-ima 4964	. . . 4 |- ( N " dom M ) = ran ( N |` dom M )
27	25, 26	syl6eqr 2513	. . 3 |- ( ph -> X = ( N " dom M ) )
28		imassrn 5291	. . . 4 |- ( N " dom M ) C_ ran N
29	3	brrelexi 4990	. . . . . . . 8 |- ( Y W S -> Y e. _V )
30	20, 29	syl 16	. . . . . . 7 |- ( ph -> Y e. _V )
31	2, 6	fpwwe2lem2 8913	. . . . . . . . . 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 7865	. . . . . . 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 6128	. . . . . 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 5759	. . . . 5 |- ( N : dom N -1-1-onto-> Y -> N : dom N -onto-> Y )
40		forn 5734	. . . . 5 |- ( N : dom N -onto-> Y -> ran N = Y )
41	38, 39, 40	3syl 20	. . . 4 |- ( ph -> ran N = Y )
42	28, 41	syl5sseq 3515	. . 3 |- ( ph -> ( N " dom M ) C_ Y )
43	27, 42	eqsstrd 3501	. 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 5058	. . . . 5 |- Rel ( X X. X )
47		relss 5038	. . . . 5 |- ( R C_ ( X X. X ) -> ( Rel ( X X. X ) -> Rel R ) )
48	45, 46, 47	mpisyl 18	. . . 4 |- ( ph -> Rel R )
49		inss2 3682	. . . . 5 |- ( S i^i ( Y X. X ) ) C_ ( Y X. X )
50		relxp 5058	. . . . 5 |- Rel ( Y X. X )
51		relss 5038	. . . . 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 4444	. . . . . . 7 |- ( ph -> ( x R y -> x ( X X. X ) y ) )
55		brxp 4981	. . . . . . 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 5011	. . . . . . . 8 |- ( x ( S i^i ( Y X. X ) ) y <-> ( x e. Y /\ y e. X /\ x S y ) )
58		df-3an 967	. . . . . . . 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 761	. . . . . . . . . . 11 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. Y )
61		simprr 756	. . . . . . . . . . . . . 14 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x S y )
62		isocnv 6133	. . . . . . . . . . . . . . . . 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 762	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. X )
67	65, 66	sseldd 3468	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. Y )
68		isorel 6129	. . . . . . . . . . . . . . 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 1217	. . . . . . . . . . . . . 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 5812	. . . . . . . . . . . . . 14 |- ( `' N ` y ) e. _V
72	71	epelc 4745	. . . . . . . . . . . . 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 5126	. . . . . . . . . . . . . . . 16 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M = `' ( N |` dom M ) )
76		isof1o 6128	. . . . . . . . . . . . . . . . . 18 |- ( `' N Isom S , _E ( Y , dom N ) -> `' N : Y -1-1-onto-> dom N )
77		f1ofn 5753	. . . . . . . . . . . . . . . . . 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 5619	. . . . . . . . . . . . . . . . 17 |- ( `' N Fn Y -> Fun `' N )
80		funcnvres 5598	. . . . . . . . . . . . . . . . 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 2495	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> `' M = ( `' N |` ( N " dom M ) ) )
83	82	fveq1d 5804	. . . . . . . . . . . . . 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 2544	. . . . . . . . . . . . . . 15 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> y e. ( N " dom M ) )
86		fvres 5816	. . . . . . . . . . . . . . 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 2495	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) = ( `' N ` y ) )
89		isocnv 6133	. . . . . . . . . . . . . . . . 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 6128	. . . . . . . . . . . . . . . 16 |- ( `' M Isom R , _E ( X , dom M ) -> `' M : X -1-1-onto-> dom M )
92		f1of 5752	. . . . . . . . . . . . . . . 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 5956	. . . . . . . . . . . . 13 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' M ` y ) e. dom M )
96	88, 95	eqeltrrd 2543	. . . . . . . . . . . 12 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> ( `' N ` y ) e. dom M )
97	11	oicl 7857	. . . . . . . . . . . . 13 |- Ord dom M
98		ordtr1 4873	. . . . . . . . . . . . 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 5935	. . . . . . . . . . . 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 913	. . . . . . . . . 10 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> x e. ( `' `' N " dom M ) )
104		imacnvcnv 5414	. . . . . . . . . . 11 |- ( `' `' N " dom M ) = ( N " dom M )
105	84, 104	syl6eqr 2513	. . . . . . . . . 10 |- ( ( ph /\ ( ( x e. Y /\ y e. X ) /\ x S y ) ) -> X = ( `' `' N " dom M ) )
106	103, 105	eleqtrrd 2545	. . . . . . . . 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 5126	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> `' M = `' ( N |` dom M ) )
112	111	fveq1d 5804	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( `' M ` x ) = ( `' ( N |` dom M ) ` x ) )
113	111	fveq1d 5804	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( `' M ` y ) = ( `' ( N |` dom M ) ` y ) )
114	112, 113	breq12d 4416	. . . . . . . . 9 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> ( ( `' M ` x ) _E ( `' M ` y ) <-> ( `' ( N |` dom M ) ` x ) _E ( `' ( N |` dom M ) ` y ) ) )
115		isorel 6129	. . . . . . . . . 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 2455	. . . . . . . . . . . . 13 |- ( ph -> ( N " dom M ) = ( N " dom M ) )
118		isores3 6138	. . . . . . . . . . . . 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 1219	. . . . . . . . . . . 12 |- ( ph -> ( N |` dom M ) Isom _E , S ( dom M , ( N " dom M ) ) )
120		isocnv 6133	. . . . . . . . . . . 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 755	. . . . . . . . . . 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 2544	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> x e. ( N " dom M ) )
126		simprr 756	. . . . . . . . . . 11 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> y e. X )
127	126, 124	eleqtrd 2544	. . . . . . . . . 10 |- ( ( ph /\ ( x e. X /\ y e. X ) ) -> y e. ( N " dom M ) )
128		isorel 6129	. . . . . . . . . 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 1217	. . . . . . . . 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 3467	. . . . . . . . . . . 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 4404	. . . . 5 |- ( x R y <-> <. x , y >. e. R )
140		df-br 4404	. . . . 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 5050	. . 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 965   = wceq 1370   e. wcel 1758   A.wral 2799   _Vcvv 3078   [.wsbc 3294   i^i cin 3438   C_ wss 3439   {csn 3988   <.cop 3994   class class class wbr 4403   {copab 4460   _E cep 4741   We wwe 4789   Ord word 4829   X. cxp 4949   `'ccnv 4950   dom cdm 4951   ran crn 4952   |` cres 4953   "cima 4954   Rel wrel 4956   Fun wfun 5523   Fn wfn 5524   -->wf 5525   -onto->wfo 5527   -1-1-onto->wf1o 5528   ` cfv 5529   Isom wiso 5530  (class class class)co 6203  OrdIsocoi 7837

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1592  ax-4 1603  ax-5 1671  ax-6 1710  ax-7 1730  ax-8 1760  ax-9 1762  ax-10 1777  ax-11 1782  ax-12 1794  ax-13 1955  ax-ext 2432  ax-rep 4514  ax-sep 4524  ax-nul 4532  ax-pow 4581  ax-pr 4642  ax-un 6485

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-3or 966  df-3an 967  df-tru 1373  df-ex 1588  df-nf 1591  df-sb 1703  df-eu 2266  df-mo 2267  df-clab 2440  df-cleq 2446  df-clel 2449  df-nfc 2604  df-ne 2650  df-ral 2804  df-rex 2805  df-reu 2806  df-rmo 2807  df-rab 2808  df-v 3080  df-sbc 3295  df-csb 3399  df-dif 3442  df-un 3444  df-in 3446  df-ss 3453  df-pss 3455  df-nul 3749  df-if 3903  df-pw 3973  df-sn 3989  df-pr 3991  df-tp 3993  df-op 3995  df-uni 4203  df-iun 4284  df-br 4404  df-opab 4462  df-mpt 4463  df-tr 4497  df-eprel 4743  df-id 4747  df-po 4752  df-so 4753  df-fr 4790  df-se 4791  df-we 4792  df-ord 4833  df-on 4834  df-lim 4835  df-suc 4836  df-xp 4957  df-rel 4958  df-cnv 4959  df-co 4960  df-dm 4961  df-rn 4962  df-res 4963  df-ima 4964  df-iota 5492  df-fun 5531  df-fn 5532  df-f 5533  df-f1 5534  df-fo 5535  df-f1o 5536  df-fv 5537  df-isom 5538  df-riota 6164  df-ov 6206  df-recs 6945  df-oi 7838

This theorem is referenced by:  fpwwe2lem10  8920