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