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