1function testspline()
 2%TESTPLINE Summary of this function goes here
 3%   Detailed explanation goes here
 4
 5%#codegen 
 6
 7% d = load('20081912999MarkerPositionsMov.mat');
 8% subplot 211; plot(squeeze(d.data.DataValues(:,15,69:end))');
 9
10
11
12splinex = CubicSplineTrajectory_single(0,1,[0 0; 1 0]);
13spliney = CubicSplineTrajectory_single(0,[0.2 0.8],[0.1 0; 0.2 0; 0 0]);
14t = 0:.01:1;
15x = zeros(length(t), 3);
16y = zeros(length(t), 3);
17
18for i = 1:length(t)
19    x(i,:) = EvalSpline(t(i), splinex);
20    y(i,:) = EvalSpline(t(i), spliney);
21end
22% subplot 212; hold on;
23
24% plot(t,x(:,1))
25% plot(t,y(:,1),'g')
26
27end
28