:: deftheorem Def8 defines sup XXREAL_2:def 8 :
for X being ext-real-membered right_end set
for b2 being ExtReal holds
( b2 = sup X iff ( b2 in X & ( for x being ExtReal st x in X holds
x <= b2 ) ) );