Theorem reuss2 3402

Description: Transfer uniqueness to a smaller subclass. (Contributed by NM, 20-Oct-2005.)

Assertion

Ref	Expression
reuss2	|- ( ( ( A C_ B /\ A. x e. A ( ph -> ps ) ) /\ ( E. x e. A ph /\ E! x e. B ps ) ) -> E! x e. A ph )

Distinct variable groups:   x, A   x, B

Allowed substitution hints:   ph( x)   ps( x)

Proof of Theorem reuss2

Step	Hyp	Ref	Expression
1		df-rex 2450	. . 3 |- ( E. x e. A ph <-> E. x ( x e. A /\ ph ) )
2		df-reu 2451	. . 3 |- ( E! x e. B ps <-> E! x ( x e. B /\ ps ) )
3	1, 2	anbi12i 456	. 2 |- ( ( E. x e. A ph /\ E! x e. B ps ) <-> ( E. x ( x e. A /\ ph ) /\ E! x ( x e. B /\ ps ) ) )
4		df-ral 2449	. . . . . . 7 |- ( A. x e. A ( ph -> ps ) <-> A. x ( x e. A -> ( ph -> ps ) ) )
5		ssel 3136	. . . . . . . . . . . . . 14 |- ( A C_ B -> ( x e. A -> x e. B ) )
6		anim12 342	. . . . . . . . . . . . . 14 |- ( ( ( x e. A -> x e. B ) /\ ( ph -> ps ) ) -> ( ( x e. A /\ ph ) -> ( x e. B /\ ps ) ) )
7	5, 6	sylan 281	. . . . . . . . . . . . 13 |- ( ( A C_ B /\ ( ph -> ps ) ) -> ( ( x e. A /\ ph ) -> ( x e. B /\ ps ) ) )
8	7	exp4b 365	. . . . . . . . . . . 12 |- ( A C_ B -> ( ( ph -> ps ) -> ( x e. A -> ( ph -> ( x e. B /\ ps ) ) ) ) )
9	8	com23 78	. . . . . . . . . . 11 |- ( A C_ B -> ( x e. A -> ( ( ph -> ps ) -> ( ph -> ( x e. B /\ ps ) ) ) ) )
10	9	a2d 26	. . . . . . . . . 10 |- ( A C_ B -> ( ( x e. A -> ( ph -> ps ) ) -> ( x e. A -> ( ph -> ( x e. B /\ ps ) ) ) ) )
11	10	imp4a 347	. . . . . . . . 9 |- ( A C_ B -> ( ( x e. A -> ( ph -> ps ) ) -> ( ( x e. A /\ ph ) -> ( x e. B /\ ps ) ) ) )
12	11	alimdv 1867	. . . . . . . 8 |- ( A C_ B -> ( A. x ( x e. A -> ( ph -> ps ) ) -> A. x ( ( x e. A /\ ph ) -> ( x e. B /\ ps ) ) ) )
13	12	imp 123	. . . . . . 7 |- ( ( A C_ B /\ A. x ( x e. A -> ( ph -> ps ) ) ) -> A. x ( ( x e. A /\ ph ) -> ( x e. B /\ ps ) ) )
14	4, 13	sylan2b 285	. . . . . 6 |- ( ( A C_ B /\ A. x e. A ( ph -> ps ) ) -> A. x ( ( x e. A /\ ph ) -> ( x e. B /\ ps ) ) )
15		euimmo 2081	. . . . . 6 |- ( A. x ( ( x e. A /\ ph ) -> ( x e. B /\ ps ) ) -> ( E! x ( x e. B /\ ps ) -> E* x ( x e. A /\ ph ) ) )
16	14, 15	syl 14	. . . . 5 |- ( ( A C_ B /\ A. x e. A ( ph -> ps ) ) -> ( E! x ( x e. B /\ ps ) -> E* x ( x e. A /\ ph ) ) )
17		eu5 2061	. . . . . 6 |- ( E! x ( x e. A /\ ph ) <-> ( E. x ( x e. A /\ ph ) /\ E* x ( x e. A /\ ph ) ) )
18	17	simplbi2 383	. . . . 5 |- ( E. x ( x e. A /\ ph ) -> ( E* x ( x e. A /\ ph ) -> E! x ( x e. A /\ ph ) ) )
19	16, 18	syl9 72	. . . 4 |- ( ( A C_ B /\ A. x e. A ( ph -> ps ) ) -> ( E. x ( x e. A /\ ph ) -> ( E! x ( x e. B /\ ps ) -> E! x ( x e. A /\ ph ) ) ) )
20	19	imp32 255	. . 3 |- ( ( ( A C_ B /\ A. x e. A ( ph -> ps ) ) /\ ( E. x ( x e. A /\ ph ) /\ E! x ( x e. B /\ ps ) ) ) -> E! x ( x e. A /\ ph ) )
21		df-reu 2451	. . 3 |- ( E! x e. A ph <-> E! x ( x e. A /\ ph ) )
22	20, 21	sylibr 133	. 2 |- ( ( ( A C_ B /\ A. x e. A ( ph -> ps ) ) /\ ( E. x ( x e. A /\ ph ) /\ E! x ( x e. B /\ ps ) ) ) -> E! x e. A ph )
23	3, 22	sylan2b 285	1 |- ( ( ( A C_ B /\ A. x e. A ( ph -> ps ) ) /\ ( E. x e. A ph /\ E! x e. B ps ) ) -> E! x e. A ph )

Syntax hints:   -> wi 4   /\ wa 103   A.wal 1341   E.wex 1480   E!weu 2014   E*wmo 2015   e. wcel 2136   A.wral 2444   E.wrex 2445   E!wreu 2446   C_ wss 3116

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-io 699  ax-5 1435  ax-7 1436  ax-gen 1437  ax-ie1 1481  ax-ie2 1482  ax-8 1492  ax-10 1493  ax-11 1494  ax-i12 1495  ax-bndl 1497  ax-4 1498  ax-17 1514  ax-i9 1518  ax-ial 1522  ax-i5r 1523  ax-ext 2147

This theorem depends on definitions:  df-bi 116  df-nf 1449  df-sb 1751  df-eu 2017  df-mo 2018  df-clab 2152  df-cleq 2158  df-clel 2161  df-ral 2449  df-rex 2450  df-reu 2451  df-in 3122  df-ss 3129

This theorem is referenced by:  reuss  3403  reuun1  3404  riotass2  5824