theorem Th331: :: XXREAL_1:331
for p, q, s being ExtReal st p <= q holds
[.-infty,q.[ \ [.p,s.] = [.-infty,p.[ \/ ].s,q.[