1 files changed, 8 insertions, 0 deletions
diff --git a/1151/CH6/EX6.7/example7.sce b/1151/CH6/EX6.7/example7.sce
new file mode 100755
index 000000000..c634a2606
--- /dev/null
+++ b/1151/CH6/EX6.7/example7.sce
@@ -0,0 +1,8 @@
+// f i r s t e l ement i n any row o f r o u t h s t a b u l a t i o n i s z e r o
+clc;s=%s
+m=s^4+s ^3+2* s ^2+2* s+3
+r= coeff (m); // Ex t r a c t s the c o e f f i c i e n t o f the po l ynomi a l
+n= length (r);
+routh = routh_t (m)
+disp (routh ," r outh=")
+printf (" since there are two sign changes the system is unstable")