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