function [y] = interp_poly_val(a,x)
n = size(a,1);
y = a(1);
for i = 2:n;
    y = y + a(i)*x^(i-1);
end
    