% RISI_BEZIER narise Bezierovo krivuljo
%   RISI_BEZIER(b,prva,koef);
function risi_bezier(b,prva,koef);
  bb=kontrolne2(b,prva,koef);
  n=size(bb,2);
  k=(n-1)/2;
  t=linspace(0,1,100);
  clf;
  hold on;
  plot(b(1,:),b(2,:),'go');
  plot(bb(1,:),bb(2,:),'r');
  for i=1:k
     B=bezier(bb(:,[2*i-1:2*i+1]),t);
     plot(B(1,:),B(2,:),'b');
  end
