summaryrefslogtreecommitdiff
path: root/Working_Examples/154/DEPENDENCIES/ch9_11.sce
diff options
context:
space:
mode:
Diffstat (limited to 'Working_Examples/154/DEPENDENCIES/ch9_11.sce')
-rwxr-xr-xWorking_Examples/154/DEPENDENCIES/ch9_11.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/Working_Examples/154/DEPENDENCIES/ch9_11.sce b/Working_Examples/154/DEPENDENCIES/ch9_11.sce
new file mode 100755
index 0000000..8563a90
--- /dev/null
+++ b/Working_Examples/154/DEPENDENCIES/ch9_11.sce
@@ -0,0 +1,16 @@
+clc
+disp("Example 9.11")
+printf("\n")
+
+//From figure 9.16
+//H(s)=V(s)/I(s)=Z(s)
+//Let V(s)=1 the H(s)=Z(s)
+s=%s
+z1=(1/2.5)+(3/(5*s))+(s/20)
+Z=1/z1
+Dem=Z('den')
+//The roots are
+q=roots(Dem)
+disp(q,"Poles are")
+
+