issigmonial.m

来自「国外专家做的求解LMI鲁棒控制的工具箱,可以相对高效的解决LMI问题」· M 代码 · 共 25 行

function itssigmonial=issigmonial(F)
%ISLINEAR Check if all constraints are linear       
%
% p = islinear(F)
%
% F : SET object
% p : boolean 0/1

% Author Johan L鰂berg 
% $Id: issigmonial.m,v 1.2 2005/02/04 10:10:27 johanl Exp $  


monomtable = yalmip('monomtable');
xvars = [];

itssigmonial = 1;
i = 1;
while itssigmonial & (i<=length(F.clauses))
    Fi = F.clauses{i};
    xvars = getvariables(Fi.data);
    monomtableX = monomtable(xvars,:);
    YESNO = any(find(any(0>monomtableX,2) | any(monomtableX-fix(monomtableX),2)));   
    itssigmonial = itssigmonial & full(YESNO);
    i = i + 1;
end