function ab=sr_lograt(dig,nofdig,N)
%SR_LOGRAT Recurrence coefficients for polynomials orthogonal
%with respect to a logarithmic weight function with rational
%argument.
%   AB=SR_LOGRAT(DIG,NOFDIG,N) generates in DIG-digit arithmetic
%   the first N recurrence coefficients for the weight function 
%   w(x)=log((1+x)/(1-x)) on [0,1] and places them to NOFDIG 
%   digits into the Nx2 array AB.

mom=smom_lograt(dig,N); 
ab=schebyshev(dig,N,mom');
ab=vpa(ab,nofdig);
