theorem Th17:
for
a,
b,
c being
Real for
f being
PartFunc of
REAL,
REAL st
a <= b &
f is_integrable_on ['a,b'] &
f | ['a,b'] is
bounded &
['a,b'] c= dom f &
c in ['a,b'] holds
(
f is_integrable_on ['a,c'] &
f is_integrable_on ['c,b'] &
integral (
f,
a,
b)
= (integral (f,a,c)) + (integral (f,c,b)) )