% sm_polynomial.m
function P = sm_polynomial(z,dim)

% 2011/01/25   H. Ichihara

lz = length(z);
P = zeros(dim);
for k = 1:1:lz
 Pk = sdpvar(dim);
 P = P+Pk*z(k);
end

% EOF