function ab=sr_hrgbinet(dig,nofdig,N,a)
%SR_HRGBINET Recurrence coefficients for the half-range generalized
%Binet weight function.
%   AB=SR_HRGBINET(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 [0,Inf] and places them to NOFDIG
%   digits into the Nx2 array AB.

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