routh.m

使用matlab的m语言编写的自控原理中的劳斯判据。写成函数形势

function [row,flag]=routh(den,lamda,strf)
    if nargin==1;lamda=0;end;
    if nargin==3;strs=strf;else strs='s';end;
    syms s system1;
    system1=poly2sym(den,'s');
    den=sym2poly(subs(symtem1,(s-lamda)));
    system=poly2sym(den,'s');
    no=nargout;
    if no==0;display('