let C be non empty compact Subset of I[01] ; :: thesis: ( C c= ].0 ,1.[ implies ex D being closed-interval Subset of REAL st
( C c= D & D c= ].0 ,1.[ & inf C = inf D & sup C = sup D ) )
assume A1:
C c= ].0 ,1.[
; :: thesis: ex D being closed-interval Subset of REAL st
( C c= D & D c= ].0 ,1.[ & inf C = inf D & sup C = sup D )
reconsider C' = C as Subset of REAL by BORSUK_1:83, XBOOLE_1:1;
A2:
C' is closed
by Th52;
A3:
( C' is bounded_below & C' is bounded_above )
by Th50;
then A4:
inf C' in C'
by A2, RCOMP_1:31;
A5:
sup C' in C'
by A2, A3, RCOMP_1:30;
reconsider D = [.(inf C'),(sup C').] as Subset of REAL ;
A6:
C c= D
consider x being Element of C';
A8:
C' is bounded
by A3;
then A9:
lower_bound C' <= upper_bound C'
by SEQ_4:24;
A10:
D is non empty connected compact Subset of I[01]
by A4, A5, A8, Th49, SEQ_4:24;
then A11:
D is closed-interval Subset of REAL
by Th55;
then A12:
D = [.(inf D),(sup D).]
by INTEGRA1:5;
then A13:
( inf C' = inf D & sup C' = sup D )
by A9, XXREAL_1:66;
A14:
not 0 in D
A15:
not 1 in D
A16:
D c= ].0 ,1.[
reconsider D = D as closed-interval Subset of REAL by A9, INTEGRA1:def 1;
take
D
; :: thesis: ( C c= D & D c= ].0 ,1.[ & inf C = inf D & sup C = sup D )
thus
( C c= D & D c= ].0 ,1.[ & inf C = inf D & sup C = sup D )
by A6, A9, A12, A16, XXREAL_1:66; :: thesis: verum