Theorem 2mo 2347

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 2346	. . . 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 2277	. . . . . . 7 |- F/ x E* x E. y ph
3		nfe1 1890	. . . . . . . 8 |- F/ x E. x ph
4	3	nfmo 2283	. . . . . . 7 |- F/ x E* y E. x ph
5	2, 4	nfan 1984	. . . . . 6 |- F/ x ( E* x E. y ph /\ E* y E. x ph )
6		nfe1 1890	. . . . . . . . 9 |- F/ y E. y ph
7	6	nfmo 2283	. . . . . . . 8 |- F/ y E* x E. y ph
8		nfmo1 2277	. . . . . . . 8 |- F/ y E* y E. x ph
9	7, 8	nfan 1984	. . . . . . 7 |- F/ y ( E* x E. y ph /\ E* y E. x ph )
10		19.8a 1908	. . . . . . . . 9 |- ( ph -> E. y ph )
11		spsbe 1790	. . . . . . . . . 10 |- ( [ w / y ] ph -> E. y ph )
12	11	sbimi 1792	. . . . . . . . 9 |- ( [ z / x ] [ w / y ] ph -> [ z / x ] E. y ph )
13		nfv 1751	. . . . . . . . . . . 12 |- F/ z E. y ph
14	13	mo3 2303	. . . . . . . . . . 11 |- ( E* x E. y ph <-> A. x A. z ( ( E. y ph /\ [ z / x ] E. y ph ) -> x = z ) )
15	14	biimpi 197	. . . . . . . . . 10 |- ( E* x E. y ph -> A. x A. z ( ( E. y ph /\ [ z / x ] E. y ph ) -> x = z ) )
16	15	19.21bbi 1921	. . . . . . . . 9 |- ( E* x E. y ph -> ( ( E. y ph /\ [ z / x ] E. y ph ) -> x = z ) )
17	10, 12, 16	syl2ani 660	. . . . . . . 8 |- ( E* x E. y ph -> ( ( ph /\ [ z / x ] [ w / y ] ph ) -> x = z ) )
18		19.8a 1908	. . . . . . . . 9 |- ( ph -> E. x ph )
19		sbcom2 2240	. . . . . . . . . 10 |- ( [ z / x ] [ w / y ] ph <-> [ w / y ] [ z / x ] ph )
20		spsbe 1790	. . . . . . . . . . 11 |- ( [ z / x ] ph -> E. x ph )
21	20	sbimi 1792	. . . . . . . . . 10 |- ( [ w / y ] [ z / x ] ph -> [ w / y ] E. x ph )
22	19, 21	sylbi 198	. . . . . . . . 9 |- ( [ z / x ] [ w / y ] ph -> [ w / y ] E. x ph )
23		nfv 1751	. . . . . . . . . . . 12 |- F/ w E. x ph
24	23	mo3 2303	. . . . . . . . . . 11 |- ( E* y E. x ph <-> A. y A. w ( ( E. x ph /\ [ w / y ] E. x ph ) -> y = w ) )
25	24	biimpi 197	. . . . . . . . . 10 |- ( E* y E. x ph -> A. y A. w ( ( E. x ph /\ [ w / y ] E. x ph ) -> y = w ) )
26	25	19.21bbi 1921	. . . . . . . . 9 |- ( E* y E. x ph -> ( ( E. x ph /\ [ w / y ] E. x ph ) -> y = w ) )
27	18, 22, 26	syl2ani 660	. . . . . . . 8 |- ( E* y E. x ph -> ( ( ph /\ [ z / x ] [ w / y ] ph ) -> y = w ) )
28	17, 27	anim12ii 572	. . . . . . 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 1928	. . . . . 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 1928	. . . . 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 1764	. . . 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 216	. . 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 2232	. . . . . . . 8 |- F/ x [ z / x ] [ w / y ] ph
34		nfs1v 2232	. . . . . . . . . 10 |- F/ y [ w / y ] ph
35	34	nfsb 2235	. . . . . . . . 9 |- F/ y [ z / x ] [ w / y ] ph
36		pm3.21 449	. . . . . . . . . 10 |- ( [ z / x ] [ w / y ] ph -> ( ph -> ( ph /\ [ z / x ] [ w / y ] ph ) ) )
37	36	imim1d 78	. . . . . . . . 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 1927	. . . . . . . 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 1927	. . . . . . 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 32	. . . . . 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 1700	. . . . 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 1700	. . . 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 1698	. . . . . 6 |- ( -. E. x E. y ph <-> A. x A. y -. ph )
44		2sb8e 2262	. . . . . 6 |- ( E. x E. y ph <-> E. z E. w [ z / x ] [ w / y ] ph )
45	43, 44	xchnxbi 309	. . . . 5 |- ( -. E. z E. w [ z / x ] [ w / y ] ph <-> A. x A. y -. ph )
46		pm2.21 111	. . . . . . . . 9 |- ( -. ph -> ( ph -> ( x = z /\ y = w ) ) )
47	46	2alimi 1681	. . . . . . . 8 |- ( A. x A. y -. ph -> A. x A. y ( ph -> ( x = z /\ y = w ) ) )
48	47	2eximi 1703	. . . . . . 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 1922	. . . . . 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 1922	. . . . 5 |- ( A. x A. y -. ph -> E. z E. w A. x A. y ( ph -> ( x = z /\ y = w ) ) )
51	45, 50	sylbi 198	. . . 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 162	. . 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 190	. 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 1897	. 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 252	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 187   /\ wa 370   A.wal 1435   E.wex 1659   [wsb 1786   E*wmo 2266

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1665  ax-4 1678  ax-5 1748  ax-6 1794  ax-7 1839  ax-10 1887  ax-11 1892  ax-12 1905  ax-13 2053

This theorem depends on definitions:  df-bi 188  df-or 371  df-an 372  df-tru 1440  df-ex 1660  df-nf 1664  df-sb 1787  df-eu 2269  df-mo 2270

This theorem is referenced by:  2mos  2349