function patchtest()

figure(3)

rot = [cos(0.5*pi) -sin(0.5*pi); sin(0.5*pi) cos(0.5*pi)];
%  arrow = [ 
%      0 1 0.8 1 0.8;
%      0 0 0.08 0 -0.08
%      ];
arrow = [];
arrow(:,:,1) = [
    0 1 0;
    0.08 0 -0.08;
    1 1 1
];

arrow(:,:,2) = [
    0 -1 0;
    0.08 0 -0.08;
    1 1 1
];

arrow(1:2,:,1) = rot * arrow(1:2,:,1);
arrow(1:2,:,2) = rot * arrow(1:2,:,2);

x(:,:) = arrow(1,:,:);
y(:,:) = arrow(2,:,:);
z(:,:) = arrow(3,:,:);

tcolor(1,1,1:3) = [0 0 0];
tcolor(1,2,1:3) = [1 0 0];
p = patch(x,y,z,tcolor);

xlim([-1 1]);
ylim([-1 1]);

get(p, 'XData');
get(p, 'YData');