summaryrefslogtreecommitdiff
path: root/269/CH10/EX10.17/ex17.sce
diff options
context:
space:
mode:
Diffstat (limited to '269/CH10/EX10.17/ex17.sce')
-rw-r--r--269/CH10/EX10.17/ex17.sce7
1 files changed, 7 insertions, 0 deletions
diff --git a/269/CH10/EX10.17/ex17.sce b/269/CH10/EX10.17/ex17.sce
new file mode 100644
index 000000000..276b32e4d
--- /dev/null
+++ b/269/CH10/EX10.17/ex17.sce
@@ -0,0 +1,7 @@
+s=%s
+p=s^4+s^3+2*s^2+2*s+3
+h=routh_t(p)
+disp(h)
+disp("The element of 1st column 7th row is zero.......its replaced by epsilon(very small quantity)")
+disp("for epsilon<0 seventh element is negative of the 1st column giving 2 sign change implying two positive roots (real) ")
+disp("for epsilon>0 tenth element is zero giving same conclusion") \ No newline at end of file