function ab=sr_gbinet(dig,nofdig,N,a)
%SR_GBINET Recurrence coefficients for the generalized Binet 
%weight function.
%   AB=SR_GBINET(DIG,NOFDIG,N,A) generates in DIG-digit arithmetic
%   the first N recurrence coefficients for the weight function
%   w(x)=-log(1-A*exp(-|x|)) on [-Inf,Inf] and places them to
%   NOFDIG digits into the Nx2 array AB.

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