pennlp_conhess.m

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

function [nnz, row, col, val] = pennlp_fun(i,x)

try
H = datasaver(6,x,i+1);
H = reshape(H,sqrt(length(H)),sqrt(length(H)));
[row,col,val] = find(tril(H));
nnz = length(val);
row = row';
col = col';
val = val';
catch
end

%[nnz, row, col, val] = hg(i,x);