%SR_1SFREUD
%
function ab=sr_1sfreud(dig,nofdig,N,c,mu,nu)
digits(dig);
mom=smom1sfreud(dig,N,c,mu,nu);
ab=schebyshev(dig,N,mom');
ab=vpa(ab,nofdig)
