let C be Simple_closed_curve; C = Segment ((W-min C),(W-min C),C)
set X = { p where p is Point of (TOP-REAL 2) : ( LE W-min C,p,C or ( W-min C in C & p = W-min C ) ) } ;
A1:
Segment ((W-min C),(W-min C),C) = { p where p is Point of (TOP-REAL 2) : ( LE W-min C,p,C or ( W-min C in C & p = W-min C ) ) }
by JORDAN7:def 1;
thus
C c= Segment ((W-min C),(W-min C),C)
XBOOLE_0:def 10 Segment ((W-min C),(W-min C),C) c= C
thus
Segment ((W-min C),(W-min C),C) c= C
by JORDAN16:6; verum