function ab=sr_sqbinet_alt(dig,N,nofdig)
%SR_SQBINET_ALT  Recurrence coefficients for the square Binet weight
%function.
%   AB=SR_SQBINET_ALT(DIG,N,NOFDIG) generates in DIG-digit arithmetic
%   the first N recurrence coefficients for orthogonal polynomials   
%   relative to the weight function w(x)=[log(1-exp(-|x|))]^2 on [-Inf,Inf]
%   using a moment-based method with the moments computed by integration
%   by parts combined with 100-point Gauss quadrature relative to the
%   half-range Binet weight function. The recurrence coefficients to 
%   NOFDIG digits are placed into the Nx2 array AB. 

tic
mom=smom_sqbinet_alt(dig,N);
ab=schebyshev(dig,N,mom);
ab=vpa(ab,nofdig);
toc
