reshape.m

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

function Y=reshape(varargin)
%RESHAPE (overloaded)

% Author Johan L鰂berg 
% $Id: reshape.m,v 1.3 2005/02/10 16:43:32 johanl Exp $

try
    n = length(varargin{1}.lmi_variables);
    Y = varargin{1};

    % LAZY....
    if (Y.n==1) & (Y.m==1)
        % BUG IN MATLAB R13 ON SPARSE SCALAR IN RESHAPE!!!!!
        temp = reshape(reshape(full(Y.basis(:,1)),Y.n,Y.m),varargin{2:end});
    else        
       temp = reshape(reshape(Y.basis(:,1),Y.n,Y.m),varargin{2:end});
    end
    
    % RESHAPE DOES NOT CHANGE INTERNAL DATA
    Y.n = size(temp,1);
    Y.m = size(temp,2);
catch
    error(lasterr)
end