Theorem moexex 1436

Description: "At most one" double quantification.

Hypothesis

Ref	Expression
moexex.1	|- (ph -> A.yph)

Assertion

Ref	Expression
moexex	|- ((E*xph /\ A.xE*yps) -> E*yE.x(ph /\ ps))

Proof of Theorem moexex

Step	Hyp	Ref	Expression
1		hbmo1 1404	. . . . 5 |- (E*xph -> A.xE*xph)
2		hba1 1001	. . . . . 6 |- (A.xE*yps -> A.xA.xE*yps)
3		hbe1 1014	. . . . . . 7 |- (E.x(ph /\ ps) -> A.xE.x(ph /\ ps))
4	3	hbmo 1405	. . . . . 6 |- (E*yE.x(ph /\ ps) -> A.xE*yE.x(ph /\ ps))
5	2, 4	hbim 1005	. . . . 5 |- ((A.xE*yps -> E*yE.x(ph /\ ps)) -> A.x(A.xE*yps -> E*yE.x(ph /\ ps)))
6	1, 5	hbim 1005	. . . 4 |- ((E*xph -> (A.xE*yps -> E*yE.x(ph /\ ps))) -> A.x(E*xph -> (A.xE*yps -> E*yE.x(ph /\ ps))))
7		moexex.1	. . . . . 6 |- (ph -> A.yph)
8	7	hbmo 1405	. . . . . 6 |- (E*xph -> A.yE*xph)
9		mopick 1431	. . . . . . . 8 |- ((E*xph /\ E.x(ph /\ ps)) -> (ph -> ps))
10	9	ex 373	. . . . . . 7 |- (E*xph -> (E.x(ph /\ ps) -> (ph -> ps)))
11	10	com3r 35	. . . . . 6 |- (ph -> (E*xph -> (E.x(ph /\ ps) -> ps)))
12	7, 8, 11	19.21ad 1057	. . . . 5 |- (ph -> (E*xph -> A.y(E.x(ph /\ ps) -> ps)))
13		immo 1415	. . . . . 6 |- (A.y(E.x(ph /\ ps) -> ps) -> (E*yps -> E*yE.x(ph /\ ps)))
14	13	a4sd 983	. . . . 5 |- (A.y(E.x(ph /\ ps) -> ps) -> (A.xE*yps -> E*yE.x(ph /\ ps)))
15	12, 14	syl6 22	. . . 4 |- (ph -> (E*xph -> (A.xE*yps -> E*yE.x(ph /\ ps))))
16	6, 15	19.23ai 1062	. . 3 |- (E.xph -> (E*xph -> (A.xE*yps -> E*yE.x(ph /\ ps))))
17	7	hbex 1004	. . . . . . . 8 |- (E.xph -> A.yE.xph)
18		pm3.26 319	. . . . . . . . 9 |- ((ph /\ ps) -> ph)
19	18	19.22i 1038	. . . . . . . 8 |- (E.x(ph /\ ps) -> E.xph)
20	17, 19	19.23ai 1062	. . . . . . 7 |- (E.yE.x(ph /\ ps) -> E.xph)
21	20	con3i 98	. . . . . 6 |- (-. E.xph -> -. E.yE.x(ph /\ ps))
22		exmo 1414	. . . . . . 7 |- (E.yE.x(ph /\ ps) \/ E*yE.x(ph /\ ps))
23	22	ori 230	. . . . . 6 |- (-. E.yE.x(ph /\ ps) -> E*yE.x(ph /\ ps))
24	21, 23	syl 10	. . . . 5 |- (-. E.xph -> E*yE.x(ph /\ ps))
25	24	a1d 12	. . . 4 |- (-. E.xph -> (A.xE*yps -> E*yE.x(ph /\ ps)))
26	25	a1d 12	. . 3 |- (-. E.xph -> (E*xph -> (A.xE*yps -> E*yE.x(ph /\ ps))))
27	16, 26	pm2.61i 126	. 2 |- (E*xph -> (A.xE*yps -> E*yE.x(ph /\ ps)))
28	27	imp 350	1 |- ((E*xph /\ A.xE*yps) -> E*yE.x(ph /\ ps))

Syntax hints:  -. wn 2   -> wi 3   /\ wa 223  A.wal 952  E.wex 978  E*wmo 1379

This theorem is referenced by:  moexexv 1437  2moswap 1442

This theorem was proved from axioms:  ax-1 4  ax-2 5  ax-3 6  ax-mp 7  ax-7 960  ax-gen 961  ax-8 962  ax-10 964  ax-11 965  ax-12 966  ax-17 969  ax-4 971  ax-5o 973  ax-6o 976  ax-9o 1121  ax-10o 1138  ax-16 1208  ax-11o 1216

This theorem depends on definitions:  df-bi 147  df-or 224  df-an 225  df-ex 979  df-sb 1170  df-eu 1380  df-mo 1381

Copyright terms: Public domain