From d1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 Mon Sep 17 00:00:00 2001 From: prashantsinalkar Date: Sat, 3 Feb 2018 10:59:42 +0530 Subject: Modified the code --- 1340/CH6/EX6.8/6_8.sce | 24 ------------------------ 1 file changed, 24 deletions(-) delete mode 100755 1340/CH6/EX6.8/6_8.sce (limited to '1340/CH6/EX6.8/6_8.sce') 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 - -- cgit