% SR_JACLOGSQ  Symbolic counterpart of r_jaclogsq.m
%
function ab=sr_jaclogsq(dig,N,a)
if nargin<2, a=0; end;  
if((N<=0)|(a<=-1)) error('parameter(s) out of range'), end
abj=sr_jacobi01(dig,2*N);
mom=smm_logsq(dig,2*N,a);
ab=schebyshev(dig,N,mom,abj);
ab=vpa(ab,25);
