// 08.09.09 // 08.09.10 // 08.09.24 function PlotL=Connectseg(varargin) Nargs=length(varargin); Pdata=varargin(1); Eps=10^(-5); if Nargs>=2 Eps=varargin(2) end; if Mixtype(Pdata)~=1 Tmp=Mixop(1,Pdata); Tmp=size(Tmp,2); Sep=%inf*ones(1,Tmp); Tmp=[]; for I=1:Mixlength(Pdata) Tmp1=Mixop(I,Pdata); Tmp=[Tmp;Sep;Tmp1]; end; Pdata=Tmp(2:size(Tmp,1),:); end; Din=Dataindex(Pdata); PlotL=[]; Qd=Pdata(Din(1,1):Din(1,2),:); Din=Din(2:size(Din,1),:); N=size(Din,1); while N>0 Ah=Qd(1,:);Ao=Qd(size(Qd,1),:); Flg=0; for J=1:N St=Din(J,1); En=Din(J,2); P=Pdata(St,:); Q=Pdata(En,:); if norm(P-Ao)0 PlotL=Mixadd(PlotL,Qd); end; endfunction