polinomio

Programa en Scilab:

h=poly([5 4 3 2 1],'s','coeff');

r=routh_t(h);

r




-->r

 r  =
 
    1.    3.    5.  
    2.    4.    0.  
    1.    5.    0.  
  - 6.    0.    0.  
    5.    0.    0.