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