function [res]=spepreemplpc(x)
y=conv(x,[1 -0.9840]);
res=lpc(y,13)';