Theorem zfac 9282

Description: Axiom of Choice expressed with the fewest number of different variables. The penultimate step shows the logical equivalence to ax-ac 9281. (New usage is discouraged.) (Contributed by NM, 14-Aug-2003.)

Assertion

Ref	Expression
zfac	|- E. x A. y A. z ( ( y e. z /\ z e. w ) -> E. w A. y ( E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) <-> y = w ) )

Distinct variable group:   x, y, z, w

Proof of Theorem zfac

Dummy variables v u t are mutually distinct and distinct from all other variables.

Step	Hyp	Ref	Expression
1		ax-ac 9281	. 2 |- E. x A. y A. z ( ( y e. z /\ z e. w ) -> E. v A. u ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = v ) )
2		equequ2 1953	. . . . . . . . . 10 |- ( v = w -> ( u = v <-> u = w ) )
3	2	bibi2d 332	. . . . . . . . 9 |- ( v = w -> ( ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = v ) <-> ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = w ) ) )
4		elequ2 2004	. . . . . . . . . . . . 13 |- ( t = w -> ( z e. t <-> z e. w ) )
5	4	anbi2d 740	. . . . . . . . . . . 12 |- ( t = w -> ( ( u e. z /\ z e. t ) <-> ( u e. z /\ z e. w ) ) )
6		elequ2 2004	. . . . . . . . . . . . 13 |- ( t = w -> ( u e. t <-> u e. w ) )
7		elequ1 1997	. . . . . . . . . . . . 13 |- ( t = w -> ( t e. x <-> w e. x ) )
8	6, 7	anbi12d 747	. . . . . . . . . . . 12 |- ( t = w -> ( ( u e. t /\ t e. x ) <-> ( u e. w /\ w e. x ) ) )
9	5, 8	anbi12d 747	. . . . . . . . . . 11 |- ( t = w -> ( ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> ( ( u e. z /\ z e. w ) /\ ( u e. w /\ w e. x ) ) ) )
10	9	cbvexv 2275	. . . . . . . . . 10 |- ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> E. w ( ( u e. z /\ z e. w ) /\ ( u e. w /\ w e. x ) ) )
11	10	bibi1i 328	. . . . . . . . 9 |- ( ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = w ) <-> ( E. w ( ( u e. z /\ z e. w ) /\ ( u e. w /\ w e. x ) ) <-> u = w ) )
12	3, 11	syl6bb 276	. . . . . . . 8 |- ( v = w -> ( ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = v ) <-> ( E. w ( ( u e. z /\ z e. w ) /\ ( u e. w /\ w e. x ) ) <-> u = w ) ) )
13	12	albidv 1849	. . . . . . 7 |- ( v = w -> ( A. u ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = v ) <-> A. u ( E. w ( ( u e. z /\ z e. w ) /\ ( u e. w /\ w e. x ) ) <-> u = w ) ) )
14		elequ1 1997	. . . . . . . . . . . 12 |- ( u = y -> ( u e. z <-> y e. z ) )
15	14	anbi1d 741	. . . . . . . . . . 11 |- ( u = y -> ( ( u e. z /\ z e. w ) <-> ( y e. z /\ z e. w ) ) )
16		elequ1 1997	. . . . . . . . . . . 12 |- ( u = y -> ( u e. w <-> y e. w ) )
17	16	anbi1d 741	. . . . . . . . . . 11 |- ( u = y -> ( ( u e. w /\ w e. x ) <-> ( y e. w /\ w e. x ) ) )
18	15, 17	anbi12d 747	. . . . . . . . . 10 |- ( u = y -> ( ( ( u e. z /\ z e. w ) /\ ( u e. w /\ w e. x ) ) <-> ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) ) )
19	18	exbidv 1850	. . . . . . . . 9 |- ( u = y -> ( E. w ( ( u e. z /\ z e. w ) /\ ( u e. w /\ w e. x ) ) <-> E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) ) )
20		equequ1 1952	. . . . . . . . 9 |- ( u = y -> ( u = w <-> y = w ) )
21	19, 20	bibi12d 335	. . . . . . . 8 |- ( u = y -> ( ( E. w ( ( u e. z /\ z e. w ) /\ ( u e. w /\ w e. x ) ) <-> u = w ) <-> ( E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) <-> y = w ) ) )
22	21	cbvalv 2273	. . . . . . 7 |- ( A. u ( E. w ( ( u e. z /\ z e. w ) /\ ( u e. w /\ w e. x ) ) <-> u = w ) <-> A. y ( E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) <-> y = w ) )
23	13, 22	syl6bb 276	. . . . . 6 |- ( v = w -> ( A. u ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = v ) <-> A. y ( E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) <-> y = w ) ) )
24	23	cbvexv 2275	. . . . 5 |- ( E. v A. u ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = v ) <-> E. w A. y ( E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) <-> y = w ) )
25	24	imbi2i 326	. . . 4 |- ( ( ( y e. z /\ z e. w ) -> E. v A. u ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = v ) ) <-> ( ( y e. z /\ z e. w ) -> E. w A. y ( E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) <-> y = w ) ) )
26	25	2albii 1748	. . 3 |- ( A. y A. z ( ( y e. z /\ z e. w ) -> E. v A. u ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = v ) ) <-> A. y A. z ( ( y e. z /\ z e. w ) -> E. w A. y ( E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) <-> y = w ) ) )
27	26	exbii 1774	. 2 |- ( E. x A. y A. z ( ( y e. z /\ z e. w ) -> E. v A. u ( E. t ( ( u e. z /\ z e. t ) /\ ( u e. t /\ t e. x ) ) <-> u = v ) ) <-> E. x A. y A. z ( ( y e. z /\ z e. w ) -> E. w A. y ( E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) <-> y = w ) ) )
28	1, 27	mpbi 220	1 |- E. x A. y A. z ( ( y e. z /\ z e. w ) -> E. w A. y ( E. w ( ( y e. z /\ z e. w ) /\ ( y e. w /\ w e. x ) ) <-> y = w ) )

Syntax hints:   -> wi 4   <-> wb 196   /\ wa 384   A.wal 1481   E.wex 1704

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-11 2034  ax-12 2047  ax-13 2246  ax-ac 9281

This theorem depends on definitions:  df-bi 197  df-an 386  df-ex 1705

This theorem is referenced by:  axacndlem4  9432