function li = lafunpol(uzly,ii)
% function li = lafunpol(uzly,ii)
% Lagrangeuv fundamentalni polynom
% ii - index polynomu, od 0
xx=uzly;
i1=ii+1;
xi=xx(i1);
xx(i1)=[];
citatel=poly(xx);
jmenovatel=polyval(citatel,xi);
li=1/jmenovatel*citatel;
end

