double.m

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

function sys=double(X)
%DOUBLE Returns current numerical value 

% Author Johan L鰂berg 
% $Id: double.m,v 1.1 2005/10/12 16:05:54 joloef Exp $  

sys = sparse(X.iX,X.jX,X.sX,X.n,X.m);
%X.basis;