Theorem eueq3dc 2977

Description: Equality has existential uniqueness (split into 3 cases). (Contributed by NM, 5-Apr-1995.) (Proof shortened by Mario Carneiro, 28-Sep-2015.)

Hypotheses

Ref	Expression
eueq3dc.1	|- A e. _V
eueq3dc.2	|- B e. _V
eueq3dc.3	|- C e. _V
eueq3dc.4	|- -. ( ph /\ ps )

Assertion

Ref	Expression
eueq3dc	|- (DECID ph -> (DECID ps -> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) ) )

Distinct variable groups:   ph, x   ps, x   x, A   x, B   x, C

Proof of Theorem eueq3dc

Step	Hyp	Ref	Expression
1		dcor 941	. 2 |- (DECID ph -> (DECID ps -> DECID ( ph \/ ps ) ) )
2		df-dc 840	. . 3 |- (DECID ( ph \/ ps ) <-> ( ( ph \/ ps ) \/ -. ( ph \/ ps ) ) )
3		eueq3dc.1	. . . . . . 7 |- A e. _V
4	3	eueq1 2975	. . . . . 6 |- E! x x = A
5		ibar 301	. . . . . . . . 9 |- ( ph -> ( x = A <-> ( ph /\ x = A ) ) )
6		pm2.45 743	. . . . . . . . . . . . 13 |- ( -. ( ph \/ ps ) -> -. ph )
7		eueq3dc.4	. . . . . . . . . . . . . . 15 |- -. ( ph /\ ps )
8	7	imnani 695	. . . . . . . . . . . . . 14 |- ( ph -> -. ps )
9	8	con2i 630	. . . . . . . . . . . . 13 |- ( ps -> -. ph )
10	6, 9	jaoi 721	. . . . . . . . . . . 12 |- ( ( -. ( ph \/ ps ) \/ ps ) -> -. ph )
11	10	con2i 630	. . . . . . . . . . 11 |- ( ph -> -. ( -. ( ph \/ ps ) \/ ps ) )
12	6	con2i 630	. . . . . . . . . . . . 13 |- ( ph -> -. -. ( ph \/ ps ) )
13	12	bianfd 954	. . . . . . . . . . . 12 |- ( ph -> ( -. ( ph \/ ps ) <-> ( -. ( ph \/ ps ) /\ x = B ) ) )
14	8	bianfd 954	. . . . . . . . . . . 12 |- ( ph -> ( ps <-> ( ps /\ x = C ) ) )
15	13, 14	orbi12d 798	. . . . . . . . . . 11 |- ( ph -> ( ( -. ( ph \/ ps ) \/ ps ) <-> ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) ) )
16	11, 15	mtbid 676	. . . . . . . . . 10 |- ( ph -> -. ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) )
17		biorf 749	. . . . . . . . . 10 |- ( -. ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) -> ( ( ph /\ x = A ) <-> ( ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) \/ ( ph /\ x = A ) ) ) )
18	16, 17	syl 14	. . . . . . . . 9 |- ( ph -> ( ( ph /\ x = A ) <-> ( ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) \/ ( ph /\ x = A ) ) ) )
19	5, 18	bitrd 188	. . . . . . . 8 |- ( ph -> ( x = A <-> ( ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) \/ ( ph /\ x = A ) ) ) )
20		3orrot 1008	. . . . . . . . 9 |- ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) <-> ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) \/ ( ph /\ x = A ) ) )
21		df-3or 1003	. . . . . . . . 9 |- ( ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) \/ ( ph /\ x = A ) ) <-> ( ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) \/ ( ph /\ x = A ) ) )
22	20, 21	bitri 184	. . . . . . . 8 |- ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) <-> ( ( ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) \/ ( ph /\ x = A ) ) )
23	19, 22	bitr4di 198	. . . . . . 7 |- ( ph -> ( x = A <-> ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) ) )
24	23	eubidv 2085	. . . . . 6 |- ( ph -> ( E! x x = A <-> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) ) )
25	4, 24	mpbii 148	. . . . 5 |- ( ph -> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) )
26		eueq3dc.3	. . . . . . 7 |- C e. _V
27	26	eueq1 2975	. . . . . 6 |- E! x x = C
28		ibar 301	. . . . . . . . 9 |- ( ps -> ( x = C <-> ( ps /\ x = C ) ) )
29	8	adantr 276	. . . . . . . . . . . 12 |- ( ( ph /\ x = A ) -> -. ps )
30		pm2.46 744	. . . . . . . . . . . . 13 |- ( -. ( ph \/ ps ) -> -. ps )
31	30	adantr 276	. . . . . . . . . . . 12 |- ( ( -. ( ph \/ ps ) /\ x = B ) -> -. ps )
32	29, 31	jaoi 721	. . . . . . . . . . 11 |- ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) -> -. ps )
33	32	con2i 630	. . . . . . . . . 10 |- ( ps -> -. ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) )
34		biorf 749	. . . . . . . . . 10 |- ( -. ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) -> ( ( ps /\ x = C ) <-> ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) \/ ( ps /\ x = C ) ) ) )
35	33, 34	syl 14	. . . . . . . . 9 |- ( ps -> ( ( ps /\ x = C ) <-> ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) \/ ( ps /\ x = C ) ) ) )
36	28, 35	bitrd 188	. . . . . . . 8 |- ( ps -> ( x = C <-> ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) \/ ( ps /\ x = C ) ) ) )
37		df-3or 1003	. . . . . . . 8 |- ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) <-> ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) \/ ( ps /\ x = C ) ) )
38	36, 37	bitr4di 198	. . . . . . 7 |- ( ps -> ( x = C <-> ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) ) )
39	38	eubidv 2085	. . . . . 6 |- ( ps -> ( E! x x = C <-> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) ) )
40	27, 39	mpbii 148	. . . . 5 |- ( ps -> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) )
41	25, 40	jaoi 721	. . . 4 |- ( ( ph \/ ps ) -> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) )
42		eueq3dc.2	. . . . . 6 |- B e. _V
43	42	eueq1 2975	. . . . 5 |- E! x x = B
44		ibar 301	. . . . . . . 8 |- ( -. ( ph \/ ps ) -> ( x = B <-> ( -. ( ph \/ ps ) /\ x = B ) ) )
45		simpl 109	. . . . . . . . . . 11 |- ( ( ph /\ x = A ) -> ph )
46		simpl 109	. . . . . . . . . . 11 |- ( ( ps /\ x = C ) -> ps )
47	45, 46	orim12i 764	. . . . . . . . . 10 |- ( ( ( ph /\ x = A ) \/ ( ps /\ x = C ) ) -> ( ph \/ ps ) )
48	47	con3i 635	. . . . . . . . 9 |- ( -. ( ph \/ ps ) -> -. ( ( ph /\ x = A ) \/ ( ps /\ x = C ) ) )
49		biorf 749	. . . . . . . . 9 |- ( -. ( ( ph /\ x = A ) \/ ( ps /\ x = C ) ) -> ( ( -. ( ph \/ ps ) /\ x = B ) <-> ( ( ( ph /\ x = A ) \/ ( ps /\ x = C ) ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) ) )
50	48, 49	syl 14	. . . . . . . 8 |- ( -. ( ph \/ ps ) -> ( ( -. ( ph \/ ps ) /\ x = B ) <-> ( ( ( ph /\ x = A ) \/ ( ps /\ x = C ) ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) ) )
51	44, 50	bitrd 188	. . . . . . 7 |- ( -. ( ph \/ ps ) -> ( x = B <-> ( ( ( ph /\ x = A ) \/ ( ps /\ x = C ) ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) ) )
52		3orcomb 1011	. . . . . . . 8 |- ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) <-> ( ( ph /\ x = A ) \/ ( ps /\ x = C ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) )
53		df-3or 1003	. . . . . . . 8 |- ( ( ( ph /\ x = A ) \/ ( ps /\ x = C ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) <-> ( ( ( ph /\ x = A ) \/ ( ps /\ x = C ) ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) )
54	52, 53	bitri 184	. . . . . . 7 |- ( ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) <-> ( ( ( ph /\ x = A ) \/ ( ps /\ x = C ) ) \/ ( -. ( ph \/ ps ) /\ x = B ) ) )
55	51, 54	bitr4di 198	. . . . . 6 |- ( -. ( ph \/ ps ) -> ( x = B <-> ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) ) )
56	55	eubidv 2085	. . . . 5 |- ( -. ( ph \/ ps ) -> ( E! x x = B <-> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) ) )
57	43, 56	mpbii 148	. . . 4 |- ( -. ( ph \/ ps ) -> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) )
58	41, 57	jaoi 721	. . 3 |- ( ( ( ph \/ ps ) \/ -. ( ph \/ ps ) ) -> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) )
59	2, 58	sylbi 121	. 2 |- (DECID ( ph \/ ps ) -> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) )
60	1, 59	syl6 33	1 |- (DECID ph -> (DECID ps -> E! x ( ( ph /\ x = A ) \/ ( -. ( ph \/ ps ) /\ x = B ) \/ ( ps /\ x = C ) ) ) )

Syntax hints:   -. wn 3   -> wi 4   /\ wa 104   <-> wb 105   \/ wo 713  DECID wdc 839   \/ w3o 1001   = wceq 1395   E!weu 2077   e. wcel 2200   _Vcvv 2799

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-in1 617  ax-in2 618  ax-io 714  ax-5 1493  ax-7 1494  ax-gen 1495  ax-ie1 1539  ax-ie2 1540  ax-8 1550  ax-10 1551  ax-11 1552  ax-i12 1553  ax-bndl 1555  ax-4 1556  ax-17 1572  ax-i9 1576  ax-ial 1580  ax-i5r 1581  ax-ext 2211

This theorem depends on definitions:  df-bi 117  df-dc 840  df-3or 1003  df-nf 1507  df-sb 1809  df-eu 2080  df-mo 2081  df-clab 2216  df-cleq 2222  df-clel 2225  df-v 2801

This theorem is referenced by:  moeq3dc  2979