theorem Th10: :: INTEGR24:10
for f being PartFunc of REAL,REAL
for x0 being Real st f is_right_convergent_in x0 holds
( ex r being Real st
( 0 < r & f | ].x0,(x0 + r).[ is bounded_below ) & ex r being Real st
( 0 < r & f | ].x0,(x0 + r).[ is bounded_above ) )