qstable.m

华东理工大学自动化系《控制系统分析、设计和应用》教材配套程序实例,有关说明： 1. 安装MATLAB软件。安装时

function s=qstable(a)
% 确定系统矩阵a的稳定性

% Copyright 2000-2001 ECUST. 
%   $Revision: 1.1 $  $Date: 2001/12/12 14:11:48 $

system_root=eig(a),i=find(real(system_root)>0);
if ~isempty(i),s='system unstable!';break;else s='system stable';end;end;