From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 1151/CH6/EX6.1/example1.sce | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100755 1151/CH6/EX6.1/example1.sce (limited to '1151/CH6/EX6.1/example1.sce') diff --git a/1151/CH6/EX6.1/example1.sce b/1151/CH6/EX6.1/example1.sce new file mode 100755 index 000000000..de96b9368 --- /dev/null +++ b/1151/CH6/EX6.1/example1.sce @@ -0,0 +1,17 @@ +s=%s; +m=s^4+2*s^3+6*s^2+4*s +1; +disp (m) +r= coeff (m) +n= length (r) +routh = routh_t (m) // Thi s Func t ion g e n e r a t e s the Routht a b l e +disp (routh ," r o u t h s t a b u l a t i o n=") +c =0; +for i =1: n +if ( routh (i ,1) <0) +c=c+1; +end +end +if(c >=1) +printf (" sys t em i s u n s t a b l e ") +else printf (" sys t em i s s t a b l e ") +end -- cgit