:: deftheorem Def3 defines Intervals EUCLID_9:def 3 :
for f being real-valued Function
for r being Real
for b3 being Function holds
( b3 = Intervals (f,r) iff ( dom b3 = dom f & ( for x being object st x in dom f holds
b3 . x = ].((f . x) - r),((f . x) + r).[ ) ) );