function mom=smom_usrbinet_alt(dig,N,c)
%SMOM_USRBINET_ALT Moments of a halfrange generalized Binet weight
%function useful for generating recurrence coefficients for an
%upper subrange Binet weight function.
%   MOM=SMOM_USRBINET_ALT(DIG,N,C) generates in DIG-digit
%   arithmetic the 1x(2*N) array MOM of the first 2N moments
%   of the weight function w(x)=-log(1-a*exp(-x)) on [0,Inf],
%   a=exp(-C), 0<C<Inf.

digits(dig); a=exp(-vpa(c));
mom=smom_hrgbinet(dig,N,a);
