size.m

来自「求解线性矩阵不等式简单方便--与LMI工具箱相比」· M 代码 · 共 18 行

function s = size(X,d)
% SIZE (overloaded)

% Author Johan L鰂berg
% $Id: size.m,v 1.2 2006/07/25 12:57:08 joloef Exp $

if nargin == 1
    s = X.dim;
else
    if (d < 1) | d~=round(d)
        error('Dimension argument must be a positive integer scalar in the range 1 to 2^31.');
    end
    if d <= length(X.dim)
        s = X.dim(d);
    else
        s = 1;
    end
end