theorem Th154: :: XXREAL_1:154
for p, q, r, s being ExtReal st r < p & s <= q holds
].r,s.[ /\ [.p,q.[ = [.p,s.[