function m = rerrorp(prange, w)
N = length(w);
Ap = @ (p) lpcA(p,w);
Yp = @ (p) lpcY(p,w);
Vp = @ (p) (Ap(p)'*Ap(p)) \ (Ap(p)'*Yp(p));
sent = @ (p) w(1:p);
f = @ (p) lpcreconstruct(sent(p),Vp(p),N);
ep = @ (p) norm(f(p)-w)/norm(w);
for q = prange,
    m(q) = ep(q);
end
%
