theorem :: XXREAL_1:355

for p, r, s being ExtReal st r < s holds
].r,+infty.[ \ [.p,s.[ = ].r,p.[ \/ [.s,+infty.[ by Th301, XXREAL_0:3;