Theorem opelxp 4693

Description: Ordered pair membership in a cross product. (Contributed by NM, 15-Nov-1994.) (Proof shortened by Andrew Salmon, 12-Aug-2011.) (Revised by Mario Carneiro, 26-Apr-2015.)

Assertion

Ref	Expression
opelxp	|- ( <. A , B >. e. ( C X. D ) <-> ( A e. C /\ B e. D ) )

Proof of Theorem opelxp

Dummy variables x y are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		elxp2 4681	. 2 |- ( <. A , B >. e. ( C X. D ) <-> E. x e. C E. y e. D <. A , B >. = <. x , y >. )
2		vex 2766	. . . . . . 7 |- x e. _V
3		vex 2766	. . . . . . 7 |- y e. _V
4	2, 3	opth2 4273	. . . . . 6 |- ( <. A , B >. = <. x , y >. <-> ( A = x /\ B = y ) )
5		eleq1 2259	. . . . . . 7 |- ( A = x -> ( A e. C <-> x e. C ) )
6		eleq1 2259	. . . . . . 7 |- ( B = y -> ( B e. D <-> y e. D ) )
7	5, 6	bi2anan9 606	. . . . . 6 |- ( ( A = x /\ B = y ) -> ( ( A e. C /\ B e. D ) <-> ( x e. C /\ y e. D ) ) )
8	4, 7	sylbi 121	. . . . 5 |- ( <. A , B >. = <. x , y >. -> ( ( A e. C /\ B e. D ) <-> ( x e. C /\ y e. D ) ) )
9	8	biimprcd 160	. . . 4 |- ( ( x e. C /\ y e. D ) -> ( <. A , B >. = <. x , y >. -> ( A e. C /\ B e. D ) ) )
10	9	rexlimivv 2620	. . 3 |- ( E. x e. C E. y e. D <. A , B >. = <. x , y >. -> ( A e. C /\ B e. D ) )
11		eqid 2196	. . . 4 |- <. A , B >. = <. A , B >.
12		opeq1 3808	. . . . . 6 |- ( x = A -> <. x , y >. = <. A , y >. )
13	12	eqeq2d 2208	. . . . 5 |- ( x = A -> ( <. A , B >. = <. x , y >. <-> <. A , B >. = <. A , y >. ) )
14		opeq2 3809	. . . . . 6 |- ( y = B -> <. A , y >. = <. A , B >. )
15	14	eqeq2d 2208	. . . . 5 |- ( y = B -> ( <. A , B >. = <. A , y >. <-> <. A , B >. = <. A , B >. ) )
16	13, 15	rspc2ev 2883	. . . 4 |- ( ( A e. C /\ B e. D /\ <. A , B >. = <. A , B >. ) -> E. x e. C E. y e. D <. A , B >. = <. x , y >. )
17	11, 16	mp3an3 1337	. . 3 |- ( ( A e. C /\ B e. D ) -> E. x e. C E. y e. D <. A , B >. = <. x , y >. )
18	10, 17	impbii 126	. 2 |- ( E. x e. C E. y e. D <. A , B >. = <. x , y >. <-> ( A e. C /\ B e. D ) )
19	1, 18	bitri 184	1 |- ( <. A , B >. e. ( C X. D ) <-> ( A e. C /\ B e. D ) )

Syntax hints:   /\ wa 104   <-> wb 105   = wceq 1364   e. wcel 2167   E.wrex 2476   <.cop 3625   X. cxp 4661

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-io 710  ax-5 1461  ax-7 1462  ax-gen 1463  ax-ie1 1507  ax-ie2 1508  ax-8 1518  ax-10 1519  ax-11 1520  ax-i12 1521  ax-bndl 1523  ax-4 1524  ax-17 1540  ax-i9 1544  ax-ial 1548  ax-i5r 1549  ax-14 2170  ax-ext 2178  ax-sep 4151  ax-pow 4207  ax-pr 4242

This theorem depends on definitions:  df-bi 117  df-3an 982  df-tru 1367  df-nf 1475  df-sb 1777  df-clab 2183  df-cleq 2189  df-clel 2192  df-nfc 2328  df-ral 2480  df-rex 2481  df-v 2765  df-un 3161  df-in 3163  df-ss 3170  df-pw 3607  df-sn 3628  df-pr 3629  df-op 3631  df-opab 4095  df-xp 4669

This theorem is referenced by:  brxp  4694  opelxpi  4695  opelxp1  4697  opelxp2  4698  opthprc  4714  elxp3  4717  opeliunxp  4718  optocl  4739  xpiindim  4803  opelres  4951  resiexg  4991  restidsing  5002  codir  5058  qfto  5059  xpmlem  5090  rnxpid  5104  ssrnres  5112  dfco2  5169  relssdmrn  5190  ressn  5210  opelf  5429  fnovex  5955  oprab4  5993  resoprab  6018  elmpocl  6118  fo1stresm  6219  fo2ndresm  6220  dfoprab4  6250  xporderlem  6289  f1od2  6293  brecop  6684  xpdom2  6890  djulclb  7121  djuss  7136  enq0enq  7498  enq0sym  7499  enq0tr  7501  nqnq0pi  7505  nnnq0lem1  7513  elinp  7541  genipv  7576  prsrlem1  7809  gt0srpr  7815  opelcn  7893  opelreal  7894  elreal2  7897  frecuzrdgrrn  10500  frec2uzrdg  10501  frecuzrdgrcl  10502  frecuzrdgsuc  10506  frecuzrdgrclt  10507  frecuzrdgsuctlem  10515  fisumcom2  11603  fprodcom2fi  11791  sqpweven  12343  2sqpwodd  12344  phimullem  12393  relelbasov  12740  txuni2  14492  txcnp  14507  txcnmpt  14509  txdis1cn  14514  txlm  14515  xmeterval  14671  limccnp2lem  14912  limccnp2cntop  14913  lgsquadlem1  15318  lgsquadlem2  15319