Theorem iccsupr 9384

Description: A nonempty subset of a closed real interval satisfies the conditions for the existence of its supremum. To be useful without excluded middle, we'll probably need to change not equal to apart, and perhaps make other changes, but the theorem does hold as stated here. (Contributed by Paul Chapman, 21-Jan-2008.)

Assertion

Ref	Expression
iccsupr	|- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) /\ C e. S ) -> ( S C_ RR /\ S =/= (/) /\ E. x e. RR A. y e. S y <_ x ) )

Distinct variable groups:   y, A   x, B, y   x, S, y

Allowed substitution hints:   A( x)   C( x, y)

Proof of Theorem iccsupr

Step	Hyp	Ref	Expression
1		iccssre 9373	. . . 4 |- ( ( A e. RR /\ B e. RR ) -> ( A [,] B ) C_ RR )
2		sstr 3033	. . . . 5 |- ( ( S C_ ( A [,] B ) /\ ( A [,] B ) C_ RR ) -> S C_ RR )
3	2	ancoms 264	. . . 4 |- ( ( ( A [,] B ) C_ RR /\ S C_ ( A [,] B ) ) -> S C_ RR )
4	1, 3	sylan 277	. . 3 |- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) ) -> S C_ RR )
5	4	3adant3 963	. 2 |- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) /\ C e. S ) -> S C_ RR )
6		ne0i 3292	. . 3 |- ( C e. S -> S =/= (/) )
7	6	3ad2ant3 966	. 2 |- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) /\ C e. S ) -> S =/= (/) )
8		simplr 497	. . . 4 |- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) ) -> B e. RR )
9		ssel 3019	. . . . . . . 8 |- ( S C_ ( A [,] B ) -> ( y e. S -> y e. ( A [,] B ) ) )
10		elicc2 9356	. . . . . . . . 9 |- ( ( A e. RR /\ B e. RR ) -> ( y e. ( A [,] B ) <-> ( y e. RR /\ A <_ y /\ y <_ B ) ) )
11	10	biimpd 142	. . . . . . . 8 |- ( ( A e. RR /\ B e. RR ) -> ( y e. ( A [,] B ) -> ( y e. RR /\ A <_ y /\ y <_ B ) ) )
12	9, 11	sylan9r 402	. . . . . . 7 |- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) ) -> ( y e. S -> ( y e. RR /\ A <_ y /\ y <_ B ) ) )
13	12	imp 122	. . . . . 6 |- ( ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) ) /\ y e. S ) -> ( y e. RR /\ A <_ y /\ y <_ B ) )
14	13	simp3d 957	. . . . 5 |- ( ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) ) /\ y e. S ) -> y <_ B )
15	14	ralrimiva 2446	. . . 4 |- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) ) -> A. y e. S y <_ B )
16		breq2 3849	. . . . . 6 |- ( x = B -> ( y <_ x <-> y <_ B ) )
17	16	ralbidv 2380	. . . . 5 |- ( x = B -> ( A. y e. S y <_ x <-> A. y e. S y <_ B ) )
18	17	rspcev 2722	. . . 4 |- ( ( B e. RR /\ A. y e. S y <_ B ) -> E. x e. RR A. y e. S y <_ x )
19	8, 15, 18	syl2anc 403	. . 3 |- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) ) -> E. x e. RR A. y e. S y <_ x )
20	19	3adant3 963	. 2 |- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) /\ C e. S ) -> E. x e. RR A. y e. S y <_ x )
21	5, 7, 20	3jca 1123	1 |- ( ( ( A e. RR /\ B e. RR ) /\ S C_ ( A [,] B ) /\ C e. S ) -> ( S C_ RR /\ S =/= (/) /\ E. x e. RR A. y e. S y <_ x ) )

Syntax hints:   -> wi 4   /\ wa 102   /\ w3a 924   = wceq 1289   e. wcel 1438   =/= wne 2255   A.wral 2359   E.wrex 2360   C_ wss 2999   (/)c0 3286   class class class wbr 3845  (class class class)co 5652   RRcr 7349   <_ cle 7523   [,]cicc 9309

This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-mp 7  ax-ia1 104  ax-ia2 105  ax-ia3 106  ax-in1 579  ax-in2 580  ax-io 665  ax-5 1381  ax-7 1382  ax-gen 1383  ax-ie1 1427  ax-ie2 1428  ax-8 1440  ax-10 1441  ax-11 1442  ax-i12 1443  ax-bndl 1444  ax-4 1445  ax-13 1449  ax-14 1450  ax-17 1464  ax-i9 1468  ax-ial 1472  ax-i5r 1473  ax-ext 2070  ax-sep 3957  ax-pow 4009  ax-pr 4036  ax-un 4260  ax-setind 4353  ax-cnex 7436  ax-resscn 7437  ax-pre-ltirr 7457  ax-pre-ltwlin 7458  ax-pre-lttrn 7459

This theorem depends on definitions:  df-bi 115  df-3or 925  df-3an 926  df-tru 1292  df-fal 1295  df-nf 1395  df-sb 1693  df-eu 1951  df-mo 1952  df-clab 2075  df-cleq 2081  df-clel 2084  df-nfc 2217  df-ne 2256  df-nel 2351  df-ral 2364  df-rex 2365  df-rab 2368  df-v 2621  df-sbc 2841  df-dif 3001  df-un 3003  df-in 3005  df-ss 3012  df-nul 3287  df-pw 3431  df-sn 3452  df-pr 3453  df-op 3455  df-uni 3654  df-br 3846  df-opab 3900  df-id 4120  df-po 4123  df-iso 4124  df-xp 4444  df-rel 4445  df-cnv 4446  df-co 4447  df-dm 4448  df-iota 4980  df-fun 5017  df-fv 5023  df-ov 5655  df-oprab 5656  df-mpt2 5657  df-pnf 7524  df-mnf 7525  df-xr 7526  df-ltxr 7527  df-le 7528  df-icc 9313

This theorem is referenced by: (None)