Theorem moanim 2338

Description: Introduction of a conjunct into "at most one" quantifier. (Contributed by NM, 3-Dec-2001.) (Proof shortened by Wolf Lammen, 24-Dec-2018.)

Hypothesis

Ref	Expression
moanim.1	|- F/ x ph

Assertion

Ref	Expression
moanim	|- ( E* x ( ph /\ ps ) <-> ( ph -> E* x ps ) )

Proof of Theorem moanim

Step	Hyp	Ref	Expression
1		moanim.1	. . . 4 |- F/ x ph
2		ibar 504	. . . 4 |- ( ph -> ( ps <-> ( ph /\ ps ) ) )
3	1, 2	mobid 2283	. . 3 |- ( ph -> ( E* x ps <-> E* x ( ph /\ ps ) ) )
4	3	biimprcd 225	. 2 |- ( E* x ( ph /\ ps ) -> ( ph -> E* x ps ) )
5		simpl 457	. . . . . 6 |- ( ( ph /\ ps ) -> ph )
6	1, 5	exlimi 1849	. . . . 5 |- ( E. x ( ph /\ ps ) -> ph )
7		exmo 2290	. . . . . 6 |- ( E. x ( ph /\ ps ) \/ E* x ( ph /\ ps ) )
8	7	ori 375	. . . . 5 |- ( -. E. x ( ph /\ ps ) -> E* x ( ph /\ ps ) )
9	6, 8	nsyl4 142	. . . 4 |- ( -. E* x ( ph /\ ps ) -> ph )
10	9	con1i 129	. . 3 |- ( -. ph -> E* x ( ph /\ ps ) )
11		moan 2333	. . 3 |- ( E* x ps -> E* x ( ph /\ ps ) )
12	10, 11	ja 161	. 2 |- ( ( ph -> E* x ps ) -> E* x ( ph /\ ps ) )
13	4, 12	impbii 188	1 |- ( E* x ( ph /\ ps ) <-> ( ph -> E* x ps ) )

Syntax hints:   -> wi 4   <-> wb 184   /\ wa 369   E.wex 1587   F/wnf 1590   E*wmo 2262

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-10 1777  ax-12 1794

This theorem depends on definitions:  df-bi 185  df-or 370  df-an 371  df-ex 1588  df-nf 1591  df-eu 2265  df-mo 2266

This theorem is referenced by:  moanimv  2342  moanmo  2343  moaneuOLD  2345  2eu1OLD  2373