9 lines
218 B
Mathematica
9 lines
218 B
Mathematica
|
|
function Constraint = dd(X)
|
||
|
|
|
||
|
|
if issymmetric(X)
|
||
|
|
W = X-diag(diag(X));
|
||
|
|
Z = sdpvar(length(X));
|
||
|
|
Constraint = [-Z(:) <= W(:) <= Z(:), diag(X) >= sum(Z,2)];
|
||
|
|
else
|
||
|
|
error('dd requires a symmetric argument.');
|
||
|
|
end
|