function res = polcar(m,x)

s = size(m);
l=s(1);
id = eye(l);
res = det(m-x*id);

end

