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