Theorem exmidundifim 4339

Description: Excluded middle is equivalent to every subset having a complement. Variation of exmidundif 4338 with an implication rather than a biconditional. (Contributed by Jim Kingdon, 16-Feb-2023.)

Assertion

Ref	Expression
exmidundifim	|- (EXMID <-> A. x A. y ( x C_ y -> ( x u. ( y \ x ) ) = y ) )

Distinct variable group:   x, y

Proof of Theorem exmidundifim

Dummy variable z is distinct from all other variables.

Step	Hyp	Ref	Expression
1		undifss 3605	. . . . . . 7 |- ( x C_ y <-> ( x u. ( y \ x ) ) C_ y )
2	1	biimpi 120	. . . . . 6 |- ( x C_ y -> ( x u. ( y \ x ) ) C_ y )
3	2	adantl 277	. . . . 5 |- ( (EXMID /\ x C_ y ) -> ( x u. ( y \ x ) ) C_ y )
4		elun1 3396	. . . . . . . . . 10 |- ( z e. x -> z e. ( x u. ( y \ x ) ) )
5	4	adantl 277	. . . . . . . . 9 |- ( ( (EXMID /\ z e. y ) /\ z e. x ) -> z e. ( x u. ( y \ x ) ) )
6		simplr 533	. . . . . . . . . . 11 |- ( ( (EXMID /\ z e. y ) /\ -. z e. x ) -> z e. y )
7		simpr 110	. . . . . . . . . . 11 |- ( ( (EXMID /\ z e. y ) /\ -. z e. x ) -> -. z e. x )
8	6, 7	eldifd 3230	. . . . . . . . . 10 |- ( ( (EXMID /\ z e. y ) /\ -. z e. x ) -> z e. ( y \ x ) )
9		elun2 3397	. . . . . . . . . 10 |- ( z e. ( y \ x ) -> z e. ( x u. ( y \ x ) ) )
10	8, 9	syl 14	. . . . . . . . 9 |- ( ( (EXMID /\ z e. y ) /\ -. z e. x ) -> z e. ( x u. ( y \ x ) ) )
11		exmidexmid 4328	. . . . . . . . . . 11 |- (EXMID -> DECID z e. x )
12		exmiddc 848	. . . . . . . . . . 11 |- (DECID z e. x -> ( z e. x \/ -. z e. x ) )
13	11, 12	syl 14	. . . . . . . . . 10 |- (EXMID -> ( z e. x \/ -. z e. x ) )
14	13	adantr 276	. . . . . . . . 9 |- ( (EXMID /\ z e. y ) -> ( z e. x \/ -. z e. x ) )
15	5, 10, 14	mpjaodan 810	. . . . . . . 8 |- ( (EXMID /\ z e. y ) -> z e. ( x u. ( y \ x ) ) )
16	15	ex 115	. . . . . . 7 |- (EXMID -> ( z e. y -> z e. ( x u. ( y \ x ) ) ) )
17	16	ssrdv 3254	. . . . . 6 |- (EXMID -> y C_ ( x u. ( y \ x ) ) )
18	17	adantr 276	. . . . 5 |- ( (EXMID /\ x C_ y ) -> y C_ ( x u. ( y \ x ) ) )
19	3, 18	eqssd 3265	. . . 4 |- ( (EXMID /\ x C_ y ) -> ( x u. ( y \ x ) ) = y )
20	19	ex 115	. . 3 |- (EXMID -> ( x C_ y -> ( x u. ( y \ x ) ) = y ) )
21	20	alrimivv 1928	. 2 |- (EXMID -> A. x A. y ( x C_ y -> ( x u. ( y \ x ) ) = y ) )
22		vex 2824	. . . . . 6 |- z e. _V
23		p0ex 4320	. . . . . 6 |- { (/) } e. _V
24		sseq12 3273	. . . . . . . 8 |- ( ( x = z /\ y = { (/) } ) -> ( x C_ y <-> z C_ { (/) } ) )
25		simpl 109	. . . . . . . . . 10 |- ( ( x = z /\ y = { (/) } ) -> x = z )
26		simpr 110	. . . . . . . . . . 11 |- ( ( x = z /\ y = { (/) } ) -> y = { (/) } )
27	26, 25	difeq12d 3348	. . . . . . . . . 10 |- ( ( x = z /\ y = { (/) } ) -> ( y \ x ) = ( { (/) } \ z ) )
28	25, 27	uneq12d 3384	. . . . . . . . 9 |- ( ( x = z /\ y = { (/) } ) -> ( x u. ( y \ x ) ) = ( z u. ( { (/) } \ z ) ) )
29	28, 26	eqeq12d 2253	. . . . . . . 8 |- ( ( x = z /\ y = { (/) } ) -> ( ( x u. ( y \ x ) ) = y <-> ( z u. ( { (/) } \ z ) ) = { (/) } ) )
30	24, 29	imbi12d 234	. . . . . . 7 |- ( ( x = z /\ y = { (/) } ) -> ( ( x C_ y -> ( x u. ( y \ x ) ) = y ) <-> ( z C_ { (/) } -> ( z u. ( { (/) } \ z ) ) = { (/) } ) ) )
31	30	spc2gv 2916	. . . . . 6 |- ( ( z e. _V /\ { (/) } e. _V ) -> ( A. x A. y ( x C_ y -> ( x u. ( y \ x ) ) = y ) -> ( z C_ { (/) } -> ( z u. ( { (/) } \ z ) ) = { (/) } ) ) )
32	22, 23, 31	mp2an 430	. . . . 5 |- ( A. x A. y ( x C_ y -> ( x u. ( y \ x ) ) = y ) -> ( z C_ { (/) } -> ( z u. ( { (/) } \ z ) ) = { (/) } ) )
33		0ex 4255	. . . . . . . 8 |- (/) e. _V
34	33	snid 3736	. . . . . . 7 |- (/) e. { (/) }
35		eleq2 2302	. . . . . . 7 |- ( ( z u. ( { (/) } \ z ) ) = { (/) } -> ( (/) e. ( z u. ( { (/) } \ z ) ) <-> (/) e. { (/) } ) )
36	34, 35	mpbiri 168	. . . . . 6 |- ( ( z u. ( { (/) } \ z ) ) = { (/) } -> (/) e. ( z u. ( { (/) } \ z ) ) )
37		eldifn 3352	. . . . . . . 8 |- ( (/) e. ( { (/) } \ z ) -> -. (/) e. z )
38	37	orim2i 773	. . . . . . 7 |- ( ( (/) e. z \/ (/) e. ( { (/) } \ z ) ) -> ( (/) e. z \/ -. (/) e. z ) )
39		elun 3370	. . . . . . 7 |- ( (/) e. ( z u. ( { (/) } \ z ) ) <-> ( (/) e. z \/ (/) e. ( { (/) } \ z ) ) )
40		df-dc 847	. . . . . . 7 |- (DECID (/) e. z <-> ( (/) e. z \/ -. (/) e. z ) )
41	38, 39, 40	3imtr4i 201	. . . . . 6 |- ( (/) e. ( z u. ( { (/) } \ z ) ) -> DECID (/) e. z )
42	36, 41	syl 14	. . . . 5 |- ( ( z u. ( { (/) } \ z ) ) = { (/) } -> DECID (/) e. z )
43	32, 42	syl6 33	. . . 4 |- ( A. x A. y ( x C_ y -> ( x u. ( y \ x ) ) = y ) -> ( z C_ { (/) } -> DECID (/) e. z ) )
44	43	alrimiv 1927	. . 3 |- ( A. x A. y ( x C_ y -> ( x u. ( y \ x ) ) = y ) -> A. z ( z C_ { (/) } -> DECID (/) e. z ) )
45		df-exmid 4327	. . 3 |- (EXMID <-> A. z ( z C_ { (/) } -> DECID (/) e. z ) )
46	44, 45	sylibr 134	. 2 |- ( A. x A. y ( x C_ y -> ( x u. ( y \ x ) ) = y ) -> EXMID )
47	21, 46	impbii 126	1 |- (EXMID <-> A. x A. y ( x C_ y -> ( x u. ( y \ x ) ) = y ) )

Syntax hints:   -. wn 3   -> wi 4   /\ wa 104   <-> wb 105   \/ wo 720  DECID wdc 846   A.wal 1400   = wceq 1402   e. wcel 2209   _Vcvv 2821   \ cdif 3217   u. cun 3218   C_ wss 3220   (/)c0 3520   {csn 3705  EXMIDwem 4326

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 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-sep 4244  ax-nul 4254  ax-pow 4306

This theorem depends on definitions:  df-bi 117  df-dc 847  df-tru 1405  df-nf 1514  df-sb 1816  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ral 2533  df-rab 2537  df-v 2823  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-pw 3687  df-sn 3711  df-exmid 4327

This theorem is referenced by: (None)