theorem Th322: :: XXREAL_1:322
for p, q, s being ExtReal st p <= s & p <= q holds
[.p,q.] \ ].p,s.[ = {p} \/ [.s,q.]