function [leb, L]=CostLebesgue(x, xx)
%------------------------------------------------------------
% Dato il vettore x di N nodi (ordinato), la funzione calcola
% il valore della costante di Lebesgue per i=2,...,N
%
% Input: x (vettore riga dei nodi) 
%        [xx (vettore riga punti di valutazione)]
% Output: leb (vettore dei valori della costante di Lebesgue)
%         L: matrice dei polinomi elementari di Lagrange
%------------------------------------------------------------
a=x(1); b=x(end); 
% M=1000;
% xx=linspace(a,b,M)';  %sono i punti "target" (di valutazione)
N=length(x);
for i=2:N,
 for s=1:i
     L(s,:)=lagrai_target(x,xx,s);
 end
 leb(i-1)=norm(L,1);
end