Theorem copsexg 3981

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 2560	. . . 4 |- x e. _V
2		vex 2560	. . . 4 |- y e. _V
3	1, 2	eqvinop 3980	. . 3 |- ( A = <. x , y >. <-> E. z E. w ( A = <. z , w >. /\ <. z , w >. = <. x , y >. ) )
4		19.8a 1482	. . . . . . . . 9 |- ( E. y ( <. z , w >. = <. x , y >. /\ ph ) -> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) )
5	4	19.23bi 1483	. . . . . . . 8 |- ( ( <. z , w >. = <. x , y >. /\ ph ) -> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) )
6	5	ex 108	. . . . . . 7 |- ( <. z , w >. = <. x , y >. -> ( ph -> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) ) )
7		vex 2560	. . . . . . . . 9 |- z e. _V
8		vex 2560	. . . . . . . . 9 |- w e. _V
9	7, 8	opth 3974	. . . . . . . 8 |- ( <. z , w >. = <. x , y >. <-> ( z = x /\ w = y ) )
10	9	anbi1i 431	. . . . . . . . . 10 |- ( ( <. z , w >. = <. x , y >. /\ ph ) <-> ( ( z = x /\ w = y ) /\ ph ) )
11	10	2exbii 1497	. . . . . . . . 9 |- ( E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) <-> E. x E. y ( ( z = x /\ w = y ) /\ ph ) )
12		nfe1 1385	. . . . . . . . . . 11 |- F/ x E. x ( z = x /\ E. y ( w = y /\ ph ) )
13		dveeq2or 1697	. . . . . . . . . . . 12 |- ( A. y y = x \/ F/ y z = x )
14		nfae 1607	. . . . . . . . . . . . . . 15 |- F/ y A. y y = x
15		anass 381	. . . . . . . . . . . . . . . 16 |- ( ( ( z = x /\ w = y ) /\ ph ) <-> ( z = x /\ ( w = y /\ ph ) ) )
16		19.8a 1482	. . . . . . . . . . . . . . . . . 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 320	. . . . . . . . . . . . . . . 16 |- ( A. y y = x -> ( ( z = x /\ ( w = y /\ ph ) ) -> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
19	15, 18	syl5bi 141	. . . . . . . . . . . . . . 15 |- ( A. y y = x -> ( ( ( z = x /\ w = y ) /\ ph ) -> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
20	14, 19	eximd 1503	. . . . . . . . . . . . . 14 |- ( A. y y = x -> ( E. y ( ( z = x /\ w = y ) /\ ph ) -> E. y ( z = x /\ E. y ( w = y /\ ph ) ) ) )
21		biidd 161	. . . . . . . . . . . . . . 15 |- ( A. y y = x -> ( ( z = x /\ E. y ( w = y /\ ph ) ) <-> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
22	21	drex1 1679	. . . . . . . . . . . . . 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 138	. . . . . . . . . . . . 13 |- ( A. y y = x -> ( E. y ( ( z = x /\ w = y ) /\ ph ) -> E. x ( z = x /\ E. y ( w = y /\ ph ) ) ) )
24	15	exbii 1496	. . . . . . . . . . . . . . 15 |- ( E. y ( ( z = x /\ w = y ) /\ ph ) <-> E. y ( z = x /\ ( w = y /\ ph ) ) )
25		19.40 1522	. . . . . . . . . . . . . . . 16 |- ( E. y ( z = x /\ ( w = y /\ ph ) ) -> ( E. y z = x /\ E. y ( w = y /\ ph ) ) )
26		19.9t 1533	. . . . . . . . . . . . . . . . . 18 |- ( F/ y z = x -> ( E. y z = x <-> z = x ) )
27	26	biimpd 132	. . . . . . . . . . . . . . . . 17 |- ( F/ y z = x -> ( E. y z = x -> z = x ) )
28	27	anim1d 319	. . . . . . . . . . . . . . . 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 28	. . . . . . . . . . . . . . 15 |- ( F/ y z = x -> ( E. y ( z = x /\ ( w = y /\ ph ) ) -> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
30	24, 29	syl5bi 141	. . . . . . . . . . . . . 14 |- ( F/ y z = x -> ( E. y ( ( z = x /\ w = y ) /\ ph ) -> ( z = x /\ E. y ( w = y /\ ph ) ) ) )
31		19.8a 1482	. . . . . . . . . . . . . 14 |- ( ( z = x /\ E. y ( w = y /\ ph ) ) -> E. x ( z = x /\ E. y ( w = y /\ ph ) ) )
32	30, 31	syl6 29	. . . . . . . . . . . . 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 636	. . . . . . . . . . . 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 1485	. . . . . . . . . 10 |- ( E. x E. y ( ( z = x /\ w = y ) /\ ph ) -> E. x ( z = x /\ E. y ( w = y /\ ph ) ) )
36		euequ1 1995	. . . . . . . . . . . . . 14 |- E! x x = z
37		equcom 1593	. . . . . . . . . . . . . . 15 |- ( x = z <-> z = x )
38	37	eubii 1909	. . . . . . . . . . . . . 14 |- ( E! x x = z <-> E! x z = x )
39	36, 38	mpbi 133	. . . . . . . . . . . . 13 |- E! x z = x
40		eupick 1979	. . . . . . . . . . . . 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 400	. . . . . . . . . . . 12 |- ( E. x ( z = x /\ E. y ( w = y /\ ph ) ) -> ( z = x -> E. y ( w = y /\ ph ) ) )
42	41	com12 27	. . . . . . . . . . 11 |- ( z = x -> ( E. x ( z = x /\ E. y ( w = y /\ ph ) ) -> E. y ( w = y /\ ph ) ) )
43		euequ1 1995	. . . . . . . . . . . . . 14 |- E! y y = w
44		equcom 1593	. . . . . . . . . . . . . . 15 |- ( y = w <-> w = y )
45	44	eubii 1909	. . . . . . . . . . . . . 14 |- ( E! y y = w <-> E! y w = y )
46	43, 45	mpbi 133	. . . . . . . . . . . . 13 |- E! y w = y
47		eupick 1979	. . . . . . . . . . . . 13 |- ( ( E! y w = y /\ E. y ( w = y /\ ph ) ) -> ( w = y -> ph ) )
48	46, 47	mpan 400	. . . . . . . . . . . 12 |- ( E. y ( w = y /\ ph ) -> ( w = y -> ph ) )
49	48	com12 27	. . . . . . . . . . 11 |- ( w = y -> ( E. y ( w = y /\ ph ) -> ph ) )
50	42, 49	sylan9 389	. . . . . . . . . 10 |- ( ( z = x /\ w = y ) -> ( E. x ( z = x /\ E. y ( w = y /\ ph ) ) -> ph ) )
51	35, 50	syl5 28	. . . . . . . . 9 |- ( ( z = x /\ w = y ) -> ( E. x E. y ( ( z = x /\ w = y ) /\ ph ) -> ph ) )
52	11, 51	syl5bi 141	. . . . . . . 8 |- ( ( z = x /\ w = y ) -> ( E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) -> ph ) )
53	9, 52	sylbi 114	. . . . . . 7 |- ( <. z , w >. = <. x , y >. -> ( E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) -> ph ) )
54	6, 53	impbid 120	. . . . . 6 |- ( <. z , w >. = <. x , y >. -> ( ph <-> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) ) )
55		eqeq1 2046	. . . . . . 7 |- ( A = <. z , w >. -> ( A = <. x , y >. <-> <. z , w >. = <. x , y >. ) )
56	55	anbi1d 438	. . . . . . . . 9 |- ( A = <. z , w >. -> ( ( A = <. x , y >. /\ ph ) <-> ( <. z , w >. = <. x , y >. /\ ph ) ) )
57	56	2exbidv 1748	. . . . . . . 8 |- ( A = <. z , w >. -> ( E. x E. y ( A = <. x , y >. /\ ph ) <-> E. x E. y ( <. z , w >. = <. x , y >. /\ ph ) ) )
58	57	bibi2d 221	. . . . . . 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 223	. . . . . 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 157	. . . . 5 |- ( A = <. z , w >. -> ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) ) )
61	60	adantr 261	. . . 4 |- ( ( A = <. z , w >. /\ <. z , w >. = <. x , y >. ) -> ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) ) )
62	61	exlimivv 1776	. . 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 114	. 2 |- ( A = <. x , y >. -> ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) ) )
64	63	pm2.43i 43	1 |- ( A = <. x , y >. -> ( ph <-> E. x E. y ( A = <. x , y >. /\ ph ) ) )

Syntax hints:   -> wi 4   /\ wa 97   <-> wb 98   \/ wo 629   A.wal 1241   = wceq 1243   F/wnf 1349   E.wex 1381   E!weu 1900   <.cop 3378

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 99  ax-ia2 100  ax-ia3 101  ax-io 630  ax-5 1336  ax-7 1337  ax-gen 1338  ax-ie1 1382  ax-ie2 1383  ax-8 1395  ax-10 1396  ax-11 1397  ax-i12 1398  ax-bndl 1399  ax-4 1400  ax-14 1405  ax-17 1419  ax-i9 1423  ax-ial 1427  ax-i5r 1428  ax-ext 2022  ax-sep 3875  ax-pow 3927  ax-pr 3944

This theorem depends on definitions:  df-bi 110  df-3an 887  df-tru 1246  df-nf 1350  df-sb 1646  df-eu 1903  df-mo 1904  df-clab 2027  df-cleq 2033  df-clel 2036  df-nfc 2167  df-v 2559  df-un 2922  df-in 2924  df-ss 2931  df-pw 3361  df-sn 3381  df-pr 3382  df-op 3384

This theorem is referenced by:  copsex2t  3982  copsex2g  3983  opabid  3994  mosubopt  4405