25 lines
457 B
Mathematica
25 lines
457 B
Mathematica
|
function X = sdpvar(F)
|
||
|
|
|
||
|
|
F = flatten(F);
|
||
|
|
if isa(F.clauses{1}.data,'double')
|
||
|
|
X = F.clauses{1}.data;
|
||
|
|
else
|
||
|
|
X = [];
|
||
|
|
for i = 1:length(F.LMIid)
|
||
|
|
|
||
|
|
Xi = F.clauses{i}.data;
|
||
|
|
|
||
|
|
if size(F.clauses,2)>1
|
||
|
|
if isempty(X)
|
||
|
|
X = reshape(Xi,[],1);
|
||
|
|
else
|
||
|
|
X = [X;reshape(Xi,[],1)];
|
||
|
|
end
|
||
|
|
else
|
||
|
|
X = Xi;
|
||
|
|
end
|
||
|
|
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
X = sethackflag(X,0);
|