posdef.m

来自「matlab在控制系统中的应用（内附使用方法及每章内容、程序）」· M 代码 · 共 10 行

function [key,sdet]=posdef(A)
[nr,nc]=size(A); sdet=[];
for i=1:nr
sdet=[sdet,det(A(1:i,1:i))];
end
key=1;
if any(sdet<=0)
key=0;
end