#!/usr/bin/octave

###########################################!/usr/bin/octave######################################
#zad 3 jak z1 ale wezly -5:5 i dla splajny s_k t. ze s(0)=4 s(-1)=s(1)=0  s(j)=0 dla j pozostalych
#czyli B-splajn kubiczny o minimalnym nosniku
################################################################################
#funkcje spline i ppval
a=-5;b=5;
x=a:b;
y=zeros(1,length(x));y(6)=4;y(5)=y(7)=1;
pp=spline(x,y);
z=linspace(a,b);
plot(z,ppval(pp,z),";B-splajn kubiczny o min nosniku;",x,y,"r+")
pause(2);
