function ab=sr_Enu(dig,N,nu)
%SR_ENU Recurrence coefficients for the exponential
%integral weight function.
%   AB=SR_ENU(DIG,N,NU) generates in DIG-digit 
%   arithmetic the first N recurrence coefficients for
%   the weight function W(X)=E_NU(X) on (0,Inf], NU>0. 

%tic
digits(dig); 
mom=smom_Enu(dig,N,nu);
ab=schebyshev(dig,N,mom');
%toc
