ismember.m

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

function YESNO = ismember(x,p)
%ISMEMBER (overloaded)

% Author Johan L鰂berg 
% $Id: ismember.m,v 1.2 2004/07/01 11:17:11 johanl Exp $  


if isa(x,'double')
    YESNO = any(full(p.basis(:,1)));
    return
end

x_base = x.basis;
x_vars = x.lmi_variables;

p_base = x.basis;
p_vars = x.lmi_variables;

% Member at all
YESNO = ismember(x.lmi_variables,p.lmi_variables);
if YESNO
    index_in_x_vars = find(x.lmi_variables == p.lmi_variables);
    YESNO = full(any(p.basis(:,1+index_in_x_vars),2));
    if min(p.n,p.m)~=1
        YESNO = reshape(YESNO,p.n,p.m);
    end
end