theorem Th340: :: XXREAL_1:340

for p, q being ExtReal
for s being Real st p <= q holds
].-infty,q.] \ [.p,s.] = ].-infty,p.[ \/ ].s,q.]