theorem :: XXREAL_1:257
for q, r, s being ExtReal st s <= q holds
[.r,s.[ c= [.-infty,q.[