load EiffelPoints; X=Expression1; [NX,ndims]=size(X);
load EiffelLines; L=Expression1; [NL,nseg]=size(L);
m=3*NX; load K;

drawXu(X,zeros(m,1),L,20); axis 'equal'
