function mom=smom_Enufin(dig,N,nu,c)
%SMOM_ENUFIN Moments of the subrange exponential integral
%weight function.
%   MOM=SMOM_ENUFIN(DIG,N,NU,C) generates in DIG-digit 
%   arithmetic the (2N)x1 array MOM of the first 2N moments
%   of the weight function W(X)=E_NU(X) on [0,C].

%tic
if N==1|N>100
  disp('N is too small or too large');
  return
end  
digits(dig);
s1=vpa(1); s2=vpa(2); c=vpa(c); nu=vpa(nu);
mom=smom_powigamfin(dig,N,c,nu);
%toc
