%
% RUNVDMLSC
%
f0='%12.0f %11.4e %11.4e\n';
%f0='%12.0f %11.4e\n';
ab=r_jacobi(50,a,b);
%ab=r_laguerre(50);
%ab=r_hermite(50);
for n=[5 10 20 35 50]
%for n=5:5:25
%for n=2:25
  xw=gauss(n,ab);
  x=xw(:,1);
  csc=VdMlsc(n,x,ab);
  c=condVl(n,x,ab);
  fprintf(f0,n,csc,c)
%  fprintf(f0,n,c)
end
