function zobrazfazor(Pocatek, Delta, Barva, VelSipky, Souradnice);
  h= quiver(real(Pocatek),imag(Pocatek),real(Delta),imag(Delta),0);
  set (h,  'maxheadsize', VelSipky);
  set (h,  'color', Barva);
  if Souradnice 
    text(real(Pocatek+Delta), imag(Pocatek+Delta), sprintf('(%f,%f)',[abs(Pocatek+Delta) angle(Pocatek+Delta)]));
  end
end
