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 --- 1523/CH12/EX12.7/ex12_7.sce | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100755 1523/CH12/EX12.7/ex12_7.sce (limited to '1523/CH12/EX12.7/ex12_7.sce') diff --git a/1523/CH12/EX12.7/ex12_7.sce b/1523/CH12/EX12.7/ex12_7.sce new file mode 100755 index 000000000..26c6d50d2 --- /dev/null +++ b/1523/CH12/EX12.7/ex12_7.sce @@ -0,0 +1,17 @@ +// Network Synthesis : example 12.7 : (pg 12.4 & 12.5) +s=poly(0,'s'); +p1=((s^4)+(6*(s)^2)+8); +p2=(7*(s^3)+(21*s)); +[r,q]=pdiv(p1,p2); +[r1,q1]=pdiv(p2,r); +[r2,q2]=pdiv(r,r1); +[r3,q3]=pdiv(r1,r2); +printf("\nEven part of P(s) = ((s^4)+(6*(s)^2)+8)"); +printf("\nOdd part of P(s) = (7*(s^3)+(21*s))"); +printf("\nQ(s)= m(s)/n(s)"); +// values of quotients in continued fraction expansion +disp(q); +disp(q1); +disp(q2); +disp(q3); +printf("\nSince all the quotient terms are positive, P(s) is hurwitz"); -- cgit