scilab 5_4 (stl spline)

vX=[-0.3 0.1 0.5 0.9 1.3 1.7 2.1];
vY=[-1.3 2.2 3.5 5.8 7.2 6.0 5.8];

plot(vX,vY)
d=splin(vX,vY);
S=interp(-0.3:0.01:2.1,vX,vY,d);
plot2d(vX',vY',-1);
plot2d((-0.3:0.01:2.1)',S',2,'000')