% $URL: svn+ssh://aaron@birenboim.com/home/users/svn/Jansen/trunk/plotGhassaei.m $
% $Id: plotGhassaei.m 66 2013-05-15 14:40:56Z aaron $
% plot a Ghassaei linkage, given standard node locations
function plotGhassaei(nodes,sym,lw)
if (nargin < 2), sym = 'b'; end
if (nargin < 3), lw = 1; end
a = nodes(1:2);
b = nodes(3:4);
c = nodes(5:6);
d = nodes(7:8);
e = nodes(9:10);
f = nodes(11:12);
g = nodes(13:14);
%hold off;
plot(a(1),a(2),'ko');
hold on;
plot(b(1),b(2),'ko');
plot([a(1),c(1)],[a(2),c(2)],sym,'linewidth',lw);
plot([c(1),d(1)],[c(2),d(2)],sym,'linewidth',lw);
plot([b(1),d(1)],[b(2),d(2)],sym,'linewidth',lw+2);
plot([b(1),e(1)],[b(2),e(2)],sym,'linewidth',lw+2);
plot([b(1),f(1)],[b(2),f(2)],sym,'linewidth',lw);
plot([e(1),g(1)],[e(2),g(2)],sym,'linewidth',lw);
plot([c(1),f(1)],[c(2),f(2)],sym,'linewidth',lw);
plot([g(1),f(1)],[g(2),f(2)],sym,'linewidth',lw);
end




