function ab=sr_l_alglog(dig,nofdig,N,a,bA
%SR_L_ALGLOG Recurrence coefficients of a weight function 
%on [0,1] having at the left endpoint an algebraic/logarithmic
%singularity.
%   AB=SR_L_ALGLOG(DIG,NOFDIG,N,A,B) generates in DIG-digit 
%   arithmetic the first N recurrence coefficients for the
%   weight function w(t)=t^A*[log(1/t)]^B on [0,1], A>-1,
%   B>-1, and places them to NOFDIG digits into the Nx2 
%   array AB.

digits(dig); a=vpa(a); b=vpa(b);
mom=smom_l_alglog(dig,N,a,b);
ab=schebyshev(dig,N,mom');
ab=vpa(ab,nofdig);
