% kind of the same as QUIVER but another type of scaling
%
% Initial version: Magnus Billvik, Swedish Institute of Space Physics,
%Uppsala, June 2005

function point(x,y,vx,vy,scale,color)

for i=1:length(x)
    line([x(i) x(i)+vx(i)*scale], [y(i) y(i)+vy(i)*scale], 'color', color);
end
