summaryrefslogtreecommitdiff
path: root/1340/CH6/EX6.8/6_8.sce
diff options
context:
space:
mode:
Diffstat (limited to '1340/CH6/EX6.8/6_8.sce')
-rwxr-xr-x1340/CH6/EX6.8/6_8.sce24
1 files changed, 0 insertions, 24 deletions
diff --git a/1340/CH6/EX6.8/6_8.sce b/1340/CH6/EX6.8/6_8.sce
deleted file mode 100755
index f89058d48..000000000
--- a/1340/CH6/EX6.8/6_8.sce
+++ /dev/null
@@ -1,24 +0,0 @@
-clc;
-s = %s;
-G = syslin('c',128/(s*(s^7+3*s^6+10*s^5+24*s^4+48*s^3+96*s^2+128*s+192)));
-CL = denom(G)+numer(G);
-disp(CL);
-routh = routh_t(CL);
-disp(routh,"routh table:");
-printf("fourth row is a row of all zeroes substituted by the coefficients of the auxillary polynomial");
-
-c = 0;
-for i =1:length(coeff(CL))
- if(routh(i,1)<0)
- c = c+1;
- end
-end
-
-
-if(c >=1)
- disp(c+1,"number of poles in RHP:");
- printf("2 poles on jw-axis due to row of all zeroes and rest in LHP");
-else
- printf("stable system");
- end
-