function linesegmentplot(A)
s=size(A);
n=s(2)/2;
for i = 1:n
    hold on
    plot3([A(1,2*i-1) A(1,2*i)], [A(2,2*i-1) A(2,2*i)], [A(3,2*i-1) A(3,2*i)])
    
end