% CHRI1 Modification by a linear factor.
%
% Given a weight function w(t) through the first n+1 recurrence
% coefficients ab0 of its orthogonal polynomials, ab=CHRI1(n,
% ab0,z) generates the first n recurrence coefficients for
% the orthogonal polynomials relative to the modified weight
% function (t-z)w(t). The alpha- and beta-coefficients of the
% original weight function are to be provided in the first and
% second column of the (n+1)x2 array ab0; those of the modified
% weight function are returned in the first and second column
% of the nx2 array ab.
%
function ab=chri1(N,ab0,z)
N0=size(ab0,1); if N0