function ab=sr_Enufin(dig,N,nu,c,nofdig)
%SR_ENUFIN Recurrence coefficients for subrange
%exponential integral weight function.
%   AB=SR_ENUFIN(DIG,N,NU,C,NOFDIG) generates in DIG-digit 
%   arithmetic the first N recurrence coefficients for
%   the weight function W(X)=E_NU(X) on (0,C], NU>0, 
%   0<C<Inf, using the Chebyshev algorithm, and places the
%   results to NOFDIG digits into the Nx2 array AB.

%tic
digits(dig); 
mom=smom_Enufin(dig,N,nu,c);
ab0=schebyshev(dig,N,mom');
ab=vpa(ab0,nofdig);
%toc
