Theorem 2mo 2382

Description: Two equivalent expressions for double "at most one." (Contributed by NM, 2-Feb-2005.) (Revised by Mario Carneiro, 17-Oct-2016.) (Proof shortened by Wolf Lammen, 2-Nov-2019.)

Assertion

Ref	Expression
2mo	|- ( E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) <-> A. x A. y A. z A. w ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) )

Distinct variable groups:   x, y, z, w   ph, z, w

Allowed substitution hints:   ph( x, y)

Proof of Theorem 2mo

Step	Hyp	Ref	Expression
1		2mo2 2381	. . . 4 |- ( ( E* x E. y ph /\ E* y E. x ph ) <-> E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) )
2		nfmo1 2289	. . . . . . 7 |- F/ x E* x E. y ph
3		nfe1 1789	. . . . . . . 8 |- F/ x E. x ph
4	3	nfmo 2295	. . . . . . 7 |- F/ x E* y E. x ph
5	2, 4	nfan 1875	. . . . . 6 |- F/ x ( E* x E. y ph /\ E* y E. x ph )
6		nfe1 1789	. . . . . . . . 9 |- F/ y E. y ph
7	6	nfmo 2295	. . . . . . . 8 |- F/ y E* x E. y ph
8		nfmo1 2289	. . . . . . . 8 |- F/ y E* y E. x ph
9	7, 8	nfan 1875	. . . . . . 7 |- F/ y ( E* x E. y ph /\ E* y E. x ph )
10		19.8a 1806	. . . . . . . . 9 |- ( ph -> E. y ph )
11		spsbe 1715	. . . . . . . . . 10 |- ( [ w / y ] ph -> E. y ph )
12	11	sbimi 1717	. . . . . . . . 9 |- ( [ z / x ] [ w / y ] ph -> [ z / x ] E. y ph )
13		nfv 1683	. . . . . . . . . . . 12 |- F/ z E. y ph
14	13	mo3 2320	. . . . . . . . . . 11 |- ( E* x E. y ph <-> A. x A. z ( ( E. y ph /\ [ z / x ] E. y ph ) -> x = z ) )
15	14	biimpi 194	. . . . . . . . . 10 |- ( E* x E. y ph -> A. x A. z ( ( E. y ph /\ [ z / x ] E. y ph ) -> x = z ) )
16	15	19.21bbi 1908	. . . . . . . . 9 |- ( E* x E. y ph -> ( ( E. y ph /\ [ z / x ] E. y ph ) -> x = z ) )
17	10, 12, 16	syl2ani 656	. . . . . . . 8 |- ( E* x E. y ph -> ( ( ph /\ [ z / x ] [ w / y ] ph ) -> x = z ) )
18		19.8a 1806	. . . . . . . . 9 |- ( ph -> E. x ph )
19		sbcom2 2173	. . . . . . . . . 10 |- ( [ z / x ] [ w / y ] ph <-> [ w / y ] [ z / x ] ph )
20		spsbe 1715	. . . . . . . . . . 11 |- ( [ z / x ] ph -> E. x ph )
21	20	sbimi 1717	. . . . . . . . . 10 |- ( [ w / y ] [ z / x ] ph -> [ w / y ] E. x ph )
22	19, 21	sylbi 195	. . . . . . . . 9 |- ( [ z / x ] [ w / y ] ph -> [ w / y ] E. x ph )
23		nfv 1683	. . . . . . . . . . . 12 |- F/ w E. x ph
24	23	mo3 2320	. . . . . . . . . . 11 |- ( E* y E. x ph <-> A. y A. w ( ( E. x ph /\ [ w / y ] E. x ph ) -> y = w ) )
25	24	biimpi 194	. . . . . . . . . 10 |- ( E* y E. x ph -> A. y A. w ( ( E. x ph /\ [ w / y ] E. x ph ) -> y = w ) )
26	25	19.21bbi 1908	. . . . . . . . 9 |- ( E* y E. x ph -> ( ( E. x ph /\ [ w / y ] E. x ph ) -> y = w ) )
27	18, 22, 26	syl2ani 656	. . . . . . . 8 |- ( E* y E. x ph -> ( ( ph /\ [ z / x ] [ w / y ] ph ) -> y = w ) )
28	17, 27	anim12ii 570	. . . . . . 7 |- ( ( E* x E. y ph /\ E* y E. x ph ) -> ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) )
29	9, 28	alrimi 1825	. . . . . 6 |- ( ( E* x E. y ph /\ E* y E. x ph ) -> A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) )
30	5, 29	alrimi 1825	. . . . 5 |- ( ( E* x E. y ph /\ E* y E. x ph ) -> A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) )
31	30	alrimivv 1696	. . . 4 |- ( ( E* x E. y ph /\ E* y E. x ph ) -> A. z A. w A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) )
32	1, 31	sylbir 213	. . 3 |- ( E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) -> A. z A. w A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) )
33		nfs1v 2164	. . . . . . . 8 |- F/ x [ z / x ] [ w / y ] ph
34		nfs1v 2164	. . . . . . . . . 10 |- F/ y [ w / y ] ph
35	34	nfsb 2168	. . . . . . . . 9 |- F/ y [ z / x ] [ w / y ] ph
36		pm3.21 448	. . . . . . . . . 10 |- ( [ z / x ] [ w / y ] ph -> ( ph -> ( ph /\ [ z / x ] [ w / y ] ph ) ) )
37	36	imim1d 75	. . . . . . . . 9 |- ( [ z / x ] [ w / y ] ph -> ( ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) -> ( ph -> ( x = z /\ y = w ) ) ) )
38	35, 37	alimd 1824	. . . . . . . 8 |- ( [ z / x ] [ w / y ] ph -> ( A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) -> A. y ( ph -> ( x = z /\ y = w ) ) ) )
39	33, 38	alimd 1824	. . . . . . 7 |- ( [ z / x ] [ w / y ] ph -> ( A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) -> A. x A. y ( ph -> ( x = z /\ y = w ) ) ) )
40	39	com12 31	. . . . . 6 |- ( A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) -> ( [ z / x ] [ w / y ] ph -> A. x A. y ( ph -> ( x = z /\ y = w ) ) ) )
41	40	aleximi 1632	. . . . 5 |- ( A. w A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) -> ( E. w [ z / x ] [ w / y ] ph -> E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) ) )
42	41	aleximi 1632	. . . 4 |- ( A. z A. w A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) -> ( E. z E. w [ z / x ] [ w / y ] ph -> E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) ) )
43		2nexaln 1631	. . . . . 6 |- ( -. E. x E. y ph <-> A. x A. y -. ph )
44		2sb8e 2202	. . . . . 6 |- ( E. x E. y ph <-> E. z E. w [ z / x ] [ w / y ] ph )
45	43, 44	xchnxbi 308	. . . . 5 |- ( -. E. z E. w [ z / x ] [ w / y ] ph <-> A. x A. y -. ph )
46		pm2.21 108	. . . . . . . . 9 |- ( -. ph -> ( ph -> ( x = z /\ y = w ) ) )
47	46	2alimi 1615	. . . . . . . 8 |- ( A. x A. y -. ph -> A. x A. y ( ph -> ( x = z /\ y = w ) ) )
48	47	2eximi 1636	. . . . . . 7 |- ( E. z E. w A. x A. y -. ph -> E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) )
49	48	19.23bi 1819	. . . . . 6 |- ( E. w A. x A. y -. ph -> E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) )
50	49	19.23bi 1819	. . . . 5 |- ( A. x A. y -. ph -> E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) )
51	45, 50	sylbi 195	. . . 4 |- ( -. E. z E. w [ z / x ] [ w / y ] ph -> E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) )
52	42, 51	pm2.61d1 159	. . 3 |- ( A. z A. w A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) -> E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) )
53	32, 52	impbii 188	. 2 |- ( E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) <-> A. z A. w A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) )
54		alrot4 1796	. 2 |- ( A. z A. w A. x A. y ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) <-> A. x A. y A. z A. w ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) )
55	53, 54	bitri 249	1 |- ( E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) <-> A. x A. y A. z A. w ( ( ph /\ [ z / x ] [ w / y ] ph ) -> ( x = z /\ y = w ) ) )

Syntax hints:   -. wn 3   -> wi 4   <-> wb 184   /\ wa 369   A.wal 1377   E.wex 1596   [wsb 1711   E*wmo 2276

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1601  ax-4 1612  ax-5 1680  ax-6 1719  ax-7 1739  ax-10 1786  ax-11 1791  ax-12 1803  ax-13 1968

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-tru 1382  df-ex 1597  df-nf 1600  df-sb 1712  df-eu 2279  df-mo 2280

This theorem is referenced by:  2mos  2385  2eu6OLD  2394