Modified the code

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

-