eq.m

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

function y = eq(X,Y)
%EQ (overloaded)

% Author Johan L鰂berg
% $Id: eq.m,v 1.4 2005/06/17 13:02:01 joloef Exp $

if isa(X,'blkvar')
    X = sdpvar(X);
end

if isa(Y,'blkvar')
    Y = sdpvar(Y);
end

try
    y = constraint(X,'==',Y);
catch
    error(lasterr)
end

return
try
    y = Y-X;
    if isa(y,'double')
        if nnz(y)>0
            % What to do here?
        else
            y = [];
            return
        end
    end
    y.typeflag = 3;
catch
    error(lasterr)
end