function plotbezier(dt, CP)
v = [];
p = CP(1,:);
x = p;
for t = dt:dt:1
pNew = bezier(t, CP);
v = [v norm(pNew - p)];
p = pNew;
x = [x; p];
end
[n, m] = size(x);
clf
subplot(1,2,1)
if m == 1
line(CP(:,1), zeros(1,m), 'Marker', '+', 'MarkerEdgeColor','b' );
hold on
line(x(:,1), zeros(1,m), 'LineStyle','none', 'Marker', '.', 'MarkerEdgeColor','r' );
elseif m == 2
line(CP(:,1),CP(:,2), 'Marker', '+', 'MarkerEdgeColor','b' );
hold on
line(x(:,1),x(:,2),'LineStyle','none', 'Marker', '.', 'MarkerEdgeColor','r' );
elseif m == 3
line(CP(:,1),CP(:,2),CP(:,3), 'Marker', '+', 'MarkerEdgeColor','b' );
hold on
line(x(:,1),x(:,2),x(:,3),'LineStyle','none', 'Marker', '.', 'MarkerEdgeColor','r' );
cosmetics(3)
end
hold off
subplot(1,2,2)
plot(v)