% Harjutustund 14, ülesanne 6
x=[-1:0.1:-0.3];
y=[10,11,11.5,11.6,11.4,11.1,10,8.7];
trapz(x,y)
plot(x,y,'o')
% interpoleerime esialgset funktsiooni, mis on diskreetsel kujul,
% kuupsplainiga S^(3,2)(x)
xx=[-1:0.001:-0.3];
ys3=interp1(x,y,xx,'spline'); % S^(3,2)(xx) 
hold on
plot(xx,ys3)
% esitame kuupsplaini funktsioonina
f=@(z) interp1(x,y,z,'spline') % S^(3,2)(z) 
integral(f,-1,-0.3)