%SIM_LIH_VER simetricna veriznica z liho
%clenki (n+1=2p+1)
%VOZLISCA=SIM_LIH_VER(ZAC,L,M);
%VOZLISCA=[x0,x1,x2,...x_n+1;y0,y1,...,y_n+1]
%ZAC=[x0,pribx_1,x_n+1;y0,priby_1,y_n+1]
%L in M sta vektorja dolzin in mas
function VOZLISCA=sim_lih_ver(ZAC,L,M);
  n=length(L)-1;
  p=n/2;
  mi=(M(1:n)+M(2:n+1))/2;
  cmi=[0,cumsum(mi)];
  [u,v]=isciuv(ZAC,L,cmi);
  xi=zeros(1,p);
  eta=xi;
%   for i=1:p
%       pomuv=v-u*cmi(i)
%       xi(i)=L(i)/sqrt(1+pomuv^2);
%       eta(i)=xi(i)*pomuv;
%   end
  pomuv=v-u*cmi(1:p);
  xi=L(1:p)./sqrt(1+pomuv.^2);
  eta=xi.*pomuv;
  cxip=cumsum(xi);
  cetap=cumsum(eta);
  VOZLISCA=zeros(2,n+2);
  VOZLISCA(:,1)=ZAC(:,1);
  VOZLISCA(:,[2:p+1])=[ZAC(1,1)+cxip;ZAC(2,1)+cetap];
  VOZLISCA(1,[p+2:n+2])=...
      fliplr(2*VOZLISCA(1,p+1)+L(p+1)-VOZLISCA(1,1:p+1));
  VOZLISCA(2,[p+2:n+2])=fliplr(VOZLISCA(2,[1:p+1]));
  clf;
  hold on
  plot(VOZLISCA(1,:),VOZLISCA(2,:),'r*');
  plot(VOZLISCA(1,:),VOZLISCA(2,:),'b');
  axis equal;
  grid;