Theorem zfac 8741

Description: Axiom of Choice expressed with the fewest number of different variables. The penultimate step shows the logical equivalence to ax-ac 8740. (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 8740	. 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 1739	. . . . . . . . . 10 |- ( v = w -> ( u = v <-> u = w ) )
3	2	bibi2d 318	. . . . . . . . 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 1763	. . . . . . . . . . . . 13 |- ( t = w -> ( z e. t <-> z e. w ) )
5	4	anbi2d 703	. . . . . . . . . . . 12 |- ( t = w -> ( ( u e. z /\ z e. t ) <-> ( u e. z /\ z e. w ) ) )
6		elequ2 1763	. . . . . . . . . . . . 13 |- ( t = w -> ( u e. t <-> u e. w ) )
7		elequ1 1761	. . . . . . . . . . . . 13 |- ( t = w -> ( t e. x <-> w e. x ) )
8	6, 7	anbi12d 710	. . . . . . . . . . . 12 |- ( t = w -> ( ( u e. t /\ t e. x ) <-> ( u e. w /\ w e. x ) ) )
9	5, 8	anbi12d 710	. . . . . . . . . . 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 1984	. . . . . . . . . 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 314	. . . . . . . . 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 261	. . . . . . . 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 1680	. . . . . . 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 1761	. . . . . . . . . . . 12 |- ( u = y -> ( u e. z <-> y e. z ) )
15	14	anbi1d 704	. . . . . . . . . . 11 |- ( u = y -> ( ( u e. z /\ z e. w ) <-> ( y e. z /\ z e. w ) ) )
16		elequ1 1761	. . . . . . . . . . . 12 |- ( u = y -> ( u e. w <-> y e. w ) )
17	16	anbi1d 704	. . . . . . . . . . 11 |- ( u = y -> ( ( u e. w /\ w e. x ) <-> ( y e. w /\ w e. x ) ) )
18	15, 17	anbi12d 710	. . . . . . . . . 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 1681	. . . . . . . . 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 1738	. . . . . . . . 9 |- ( u = y -> ( u = w <-> y = w ) )
21	19, 20	bibi12d 321	. . . . . . . 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 1983	. . . . . . 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 261	. . . . . 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 1984	. . . . 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 312	. . . 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 1612	. . 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 1635	. 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 208	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 184   /\ wa 369   A.wal 1368   E.wex 1587

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1592  ax-4 1603  ax-5 1671  ax-6 1710  ax-7 1730  ax-8 1760  ax-9 1762  ax-10 1777  ax-11 1782  ax-12 1794  ax-13 1955  ax-ac 8740

This theorem depends on definitions:  df-bi 185  df-an 371  df-ex 1588  df-nf 1591

This theorem is referenced by:  axacndlem4  8889