Theorem copsexg 4045

Description: Substitution of class A for ordered pair <. x , y >.. (Contributed by NM, 27-Dec-1996.) (Revised by Andrew Salmon, 11-Jul-2011.)

Assertion

Ref	Expression
copsexg	|- ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) )

Distinct variable groups:   x, A   y, A

Allowed substitution hints:   ph( x, y)

Proof of Theorem copsexg

Dummy variables z w are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		vex 2618	. . . 4 |- x e. _V
2		vex 2618	. . . 4 |- y e. _V
3	1, 2	eqvinop 4044	. . 3 |- ( A = <. x , y >. <-> E. z E. w ( A = <. z , w >. /\ <. z , w >. = <. x , y >. ) )
4		19.8a 1525	. . . . . . . . 9 |- ( E. y ( <. z , w >. = <. x , y >. /\ ph ) -> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) )
5	4	19.23bi 1526	. . . . . . . 8 |- ( ( <. z , w >. = <. x , y >. /\ ph ) -> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) )
6	5	ex 113	. . . . . . 7 |- ( <. z , w >. = <. x , y >. -> ( ph -> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) ) )
7		vex 2618	. . . . . . . . 9 |- z e. _V
8		vex 2618	. . . . . . . . 9 |- w e. _V
9	7, 8	opth 4038	. . . . . . . 8 |- ( <. z , w >. = <. x , y >. <-> ( z = x /\ w = y ) )
10	9	anbi1i 446	. . . . . . . . . 10 |- ( ( <. z , w >. = <. x , y >. /\ ph ) <-> ( ( z = x /\ w = y ) /\ ph ) )
11	10	2exbii 1540	. . . . . . . . 9 |- ( E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) <-> E. x E. y ( ( z = x /\ w = y ) /\ ph ) )
12		nfe1 1428	. . . . . . . . . . 11 |- F/ x E. x ( z = x /\ E. y ( w = y /\ ph ) )
13		dveeq2or 1741	. . . . . . . . . . . 12 |- ( A. y y = x \/ F/ y z = x )
14		nfae 1651	. . . . . . . . . . . . . . 15 |- F/ y A. y y = x
15		anass 393	. . . . . . . . . . . . . . . 16 |- ( ( ( z = x /\ w = y ) /\ ph ) <-> ( z = x /\ ( w = y /\ ph ) ) )
16		19.8a 1525	. . . . . . . . . . . . . . . . . 18 |- ( ( w = y /\ ph ) -> E. y ( w = y /\ ph ) )
17	16	a1i 9	. . . . . . . . . . . . . . . . 17 |- ( A. y y = x -> ( ( w = y /\ ph ) -> E. y ( w = y /\ ph ) ) )
18	17	anim2d 330	. . . . . . . . . . . . . . . 16 |- ( A. y y = x -> ( ( z = x /\ ( w = y /\ ph ) ) -> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
19	15, 18	syl5bi 150	. . . . . . . . . . . . . . 15 |- ( A. y y = x -> ( ( ( z = x /\ w = y ) /\ ph ) -> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
20	14, 19	eximd 1546	. . . . . . . . . . . . . 14 |- ( A. y y = x -> ( E. y ( ( z = x /\ w = y ) /\ ph ) -> E. y ( z = x /\ E. y ( w = y /\ ph ) ) ) )
21		biidd 170	. . . . . . . . . . . . . . 15 |- ( A. y y = x -> ( ( z = x /\ E. y ( w = y /\ ph ) ) <-> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
22	21	drex1 1723	. . . . . . . . . . . . . 14 |- ( A. y y = x -> ( E. y ( z = x /\ E. y ( w = y /\ ph ) ) <-> E. x ( z = x /\ E. y ( w = y /\ ph ) ) ) )
23	20, 22	sylibd 147	. . . . . . . . . . . . 13 |- ( A. y y = x -> ( E. y ( ( z = x /\ w = y ) /\ ph ) -> E. x ( z = x /\ E. y ( w = y /\ ph ) ) ) )
24	15	exbii 1539	. . . . . . . . . . . . . . 15 |- ( E. y ( ( z = x /\ w = y ) /\ ph ) <-> E. y ( z = x /\ ( w = y /\ ph ) ) )
25		19.40 1565	. . . . . . . . . . . . . . . 16 |- ( E. y ( z = x /\ ( w = y /\ ph ) ) -> ( E. y z = x /\ E. y ( w = y /\ ph ) ) )
26		19.9t 1576	. . . . . . . . . . . . . . . . . 18 |- ( F/ y z = x -> ( E. y z = x <-> z = x ) )
27	26	biimpd 142	. . . . . . . . . . . . . . . . 17 |- ( F/ y z = x -> ( E. y z = x -> z = x ) )
28	27	anim1d 329	. . . . . . . . . . . . . . . 16 |- ( F/ y z = x -> ( ( E. y z = x /\ E. y ( w = y /\ ph ) ) -> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
29	25, 28	syl5 32	. . . . . . . . . . . . . . 15 |- ( F/ y z = x -> ( E. y ( z = x /\ ( w = y /\ ph ) ) -> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
30	24, 29	syl5bi 150	. . . . . . . . . . . . . 14 |- ( F/ y z = x -> ( E. y ( ( z = x /\ w = y ) /\ ph ) -> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
31		19.8a 1525	. . . . . . . . . . . . . 14 |- ( ( z = x /\ E. y ( w = y /\ ph ) ) -> E. x ( z = x /\ E. y ( w = y /\ ph ) ) )
32	30, 31	syl6 33	. . . . . . . . . . . . 13 |- ( F/ y z = x -> ( E. y ( ( z = x /\ w = y ) /\ ph ) -> E. x ( z = x /\ E. y ( w = y /\ ph ) ) ) )
33	23, 32	jaoi 669	. . . . . . . . . . . 12 |- ( ( A. y y = x \/ F/ y z = x ) -> ( E. y ( ( z = x /\ w = y ) /\ ph ) -> E. x ( z = x /\ E. y ( w = y /\ ph ) ) ) )
34	13, 33	ax-mp 7	. . . . . . . . . . 11 |- ( E. y ( ( z = x /\ w = y ) /\ ph ) -> E. x ( z = x /\ E. y ( w = y /\ ph ) ) )
35	12, 34	exlimi 1528	. . . . . . . . . 10 |- ( E. x E. y ( ( z = x /\ w = y ) /\ ph ) -> E. x ( z = x /\ E. y ( w = y /\ ph ) ) )
36		euequ1 2040	. . . . . . . . . . . . . 14 |- E! x x = z
37		equcom 1637	. . . . . . . . . . . . . . 15 |- ( x = z <-> z = x )
38	37	eubii 1954	. . . . . . . . . . . . . 14 |- ( E! x x = z <-> E! x z = x )
39	36, 38	mpbi 143	. . . . . . . . . . . . 13 |- E! x z = x
40		eupick 2024	. . . . . . . . . . . . 13 |- ( ( E! x z = x /\ E. x ( z = x /\ E. y ( w = y /\ ph ) ) ) -> ( z = x -> E. y ( w = y /\ ph ) ) )
41	39, 40	mpan 415	. . . . . . . . . . . 12 |- ( E. x ( z = x /\ E. y ( w = y /\ ph ) ) -> ( z = x -> E. y ( w = y /\ ph ) ) )
42	41	com12 30	. . . . . . . . . . 11 |- ( z = x -> ( E. x ( z = x /\ E. y ( w = y /\ ph ) ) -> E. y ( w = y /\ ph ) ) )
43		euequ1 2040	. . . . . . . . . . . . . 14 |- E! y y = w
44		equcom 1637	. . . . . . . . . . . . . . 15 |- ( y = w <-> w = y )
45	44	eubii 1954	. . . . . . . . . . . . . 14 |- ( E! y y = w <-> E! y w = y )
46	43, 45	mpbi 143	. . . . . . . . . . . . 13 |- E! y w = y
47		eupick 2024	. . . . . . . . . . . . 13 |- ( ( E! y w = y /\ E. y ( w = y /\ ph ) ) -> ( w = y -> ph ) )
48	46, 47	mpan 415	. . . . . . . . . . . 12 |- ( E. y ( w = y /\ ph ) -> ( w = y -> ph ) )
49	48	com12 30	. . . . . . . . . . 11 |- ( w = y -> ( E. y ( w = y /\ ph ) -> ph ) )
50	42, 49	sylan9 401	. . . . . . . . . 10 |- ( ( z = x /\ w = y ) -> ( E. x ( z = x /\ E. y ( w = y /\ ph ) ) -> ph ) )
51	35, 50	syl5 32	. . . . . . . . 9 |- ( ( z = x /\ w = y ) -> ( E. x E. y ( ( z = x /\ w = y ) /\ ph ) -> ph ) )
52	11, 51	syl5bi 150	. . . . . . . 8 |- ( ( z = x /\ w = y ) -> ( E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) -> ph ) )
53	9, 52	sylbi 119	. . . . . . 7 |- ( <. z , w >. = <. x , y >. -> ( E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) -> ph ) )
54	6, 53	impbid 127	. . . . . 6 |- ( <. z , w >. = <. x , y >. -> ( ph <-> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) ) )
55		eqeq1 2091	. . . . . . 7 |- ( A = <. z , w >. -> ( A = <. x , y >. <-> <. z , w >. = <. x , y >. ) )
56	55	anbi1d 453	. . . . . . . . 9 |- ( A = <. z , w >. -> ( ( A = <. x , y >. /\ ph ) <-> ( <. z , w >. = <. x , y >. /\ ph ) ) )
57	56	2exbidv 1793	. . . . . . . 8 |- ( A = <. z , w >. -> ( E. x E. y ( A = <. x , y >. /\ ph ) <-> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) ) )
58	57	bibi2d 230	. . . . . . 7 |- ( A = <. z , w >. -> ( ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) <-> ( ph <-> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) ) ) )
59	55, 58	imbi12d 232	. . . . . 6 |- ( A = <. z , w >. -> ( ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) ) <-> ( <. z , w >. = <. x , y >. -> ( ph <-> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) ) ) ) )
60	54, 59	mpbiri 166	. . . . 5 |- ( A = <. z , w >. -> ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) ) )
61	60	adantr 270	. . . 4 |- ( ( A = <. z , w >. /\ <. z , w >. = <. x , y >. ) -> ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) ) )
62	61	exlimivv 1821	. . 3 |- ( E. z E. w ( A = <. z , w >. /\ <. z , w >. = <. x , y >. ) -> ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) ) )
63	3, 62	sylbi 119	. 2 |- ( A = <. x , y >. -> ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) ) )
64	63	pm2.43i 48	1 |- ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) )

Syntax hints:   -> wi 4   /\ wa 102   <-> wb 103   \/ wo 662   A.wal 1285   = wceq 1287   F/wnf 1392   E.wex 1424   E!weu 1945   <.cop 3434

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-io 663  ax-5 1379  ax-7 1380  ax-gen 1381  ax-ie1 1425  ax-ie2 1426  ax-8 1438  ax-10 1439  ax-11 1440  ax-i12 1441  ax-bndl 1442  ax-4 1443  ax-14 1448  ax-17 1462  ax-i9 1466  ax-ial 1470  ax-i5r 1471  ax-ext 2067  ax-sep 3932  ax-pow 3984  ax-pr 4010

This theorem depends on definitions:  df-bi 115  df-3an 924  df-tru 1290  df-nf 1393  df-sb 1690  df-eu 1948  df-mo 1949  df-clab 2072  df-cleq 2078  df-clel 2081  df-nfc 2214  df-v 2617  df-un 2992  df-in 2994  df-ss 3001  df-pw 3417  df-sn 3437  df-pr 3438  df-op 3440

This theorem is referenced by:  copsex2t  4046  copsex2g  4047  opabid  4058  mosubopt  4471