end.m

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

function index = end(X,position,numindices)
%END (overloaded)

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

  switch numindices
   case 1
    % User has written someting like X(end)    
    sizes = [X.n X.m];
    if min(sizes)>1
      index = prod(sizes); 
    else
      index = max(sizes);
    end
   case 2
    sizes = [X.n X.m];
    index = sizes(position); 
   otherwise
    error('Indexation dimension cannot exceed 2');
  end