#
# Numerical Mathematics and Computing, Fifth Edition
# Ward Cheney & David Kincaid
# Brooks/Cole Publ. Co.
# (c) 2003
#
# file:  newton_interp
#
# Newton Interpolating Polynomials:

 interp([0, 1, -1, 2, -2], [-5, -3, -15, 39, -9], x);

 interp([1, 3/2, 0, 2], [3, 13/4, 3, 5/3], x);

 interp([1, -2, 0, 3, -1, 7], [-2, -56, -2, 4, -16, 376], x);
 convert(%, horner, x);