diff options
| author | Siddharth Agarwal | 2019-09-03 18:27:40 +0530 |
|---|---|---|
| committer | Siddharth Agarwal | 2019-09-03 18:27:40 +0530 |
| commit | 8ac15bc5efafa2afc053c293152605b0e6ae60ff (patch) | |
| tree | e1bc17aae137922b1ee990f17aae4a6cb15b7d87 /Working_Examples/3885/CH5/EX5.6 | |
| parent | 52a477ec613900885e29c4a0b02806a415b4f83a (diff) | |
| download | Xcos_block_examples-master.tar.gz Xcos_block_examples-master.tar.bz2 Xcos_block_examples-master.zip | |
Diffstat (limited to 'Working_Examples/3885/CH5/EX5.6')
| -rwxr-xr-x | Working_Examples/3885/CH5/EX5.6/Ex5_6.sci | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/Working_Examples/3885/CH5/EX5.6/Ex5_6.sci b/Working_Examples/3885/CH5/EX5.6/Ex5_6.sci new file mode 100755 index 0000000..d513434 --- /dev/null +++ b/Working_Examples/3885/CH5/EX5.6/Ex5_6.sci @@ -0,0 +1,27 @@ +//control systems by Nagoor Kani A
+//Edition 3
+//Year of publication 2015
+//Scilab version 6.0.0
+//operating systems windows 10
+// Example 5.6
+
+clc;
+clear;
+s=poly(0,'s')
+a=(s^7)+(5*s^6)+(9*s^5)+(9*s^4)+(4*s^3)+(20*s^2)+(36*s)+36
+b=coeff(a)
+n=length(b)
+R=routh_t(a)
+disp(R,'the routh array is;')
+//divide characterstic equation by auxilary polynomial to get quotient polynomial
+//routh table for quotient poly nomial
+a1=(s^3)+(5*s^2)+(9*s)+9 //quotient poly nomial
+b1=coeff(a1)
+n1=length(b1)
+R1=routh_t(a1)
+disp(R1,'the routh array for quotient poly nomial is;')
+ap=s^4+4 //auxillary polynomial
+r=roots(ap)
+disp(r,'the roots are')
+disp('the system is unstable')
+disp('two roots on right half of s plane and five roots lie in left half of s plane')
|