diff options
Diffstat (limited to '773/CH10/EX10.16/10_16.sci')
-rwxr-xr-x | 773/CH10/EX10.16/10_16.sci | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/773/CH10/EX10.16/10_16.sci b/773/CH10/EX10.16/10_16.sci new file mode 100755 index 000000000..23304aac7 --- /dev/null +++ b/773/CH10/EX10.16/10_16.sci @@ -0,0 +1,18 @@ +//equation//
+ieee(2)
+s=%s;
+m=s^6+2*s^5+7*s^4+10*s^3+14*s^2+8*s+8
+routh=routh_t(m);
+disp(routh,"routh=")
+ c=0;
+ for i=1:n
+ if (routh(i,1)<0)
+ c=c+1;
+ end
+ end
+ if(c>=1)
+ printf("system is unstable")
+ else ("system is stable")
+ end
+
+
|