summaryrefslogtreecommitdiff
path: root/758/CH3
diff options
context:
space:
mode:
Diffstat (limited to '758/CH3')
-rwxr-xr-x758/CH3/EX3.10/Ex_3_10.sce11
-rwxr-xr-x758/CH3/EX3.11/Ex_3_11.sce11
-rwxr-xr-x758/CH3/EX3.12/Ex_3_12.sce11
3 files changed, 33 insertions, 0 deletions
diff --git a/758/CH3/EX3.10/Ex_3_10.sce b/758/CH3/EX3.10/Ex_3_10.sce
new file mode 100755
index 000000000..9361d42d0
--- /dev/null
+++ b/758/CH3/EX3.10/Ex_3_10.sce
@@ -0,0 +1,11 @@
+//Example 3.10
+
+clc;clear;close;
+s=poly(0,'s');
+I=3*s/(s+2)/(s+4);
+disp(I,'Given Transfer Function:');
+zero=roots(numer(I));
+pole=roots(denom(I));
+disp(zero,'Zeros of transfer function: ');
+disp(pole,'Poles of transfer function: ');
+plzr(I); \ No newline at end of file
diff --git a/758/CH3/EX3.11/Ex_3_11.sce b/758/CH3/EX3.11/Ex_3_11.sce
new file mode 100755
index 000000000..bda46c92c
--- /dev/null
+++ b/758/CH3/EX3.11/Ex_3_11.sce
@@ -0,0 +1,11 @@
+//Example 3.11
+
+clc;clear;close;
+s=poly(0,'s');
+F=4*(s+1)*(s+3)/(s+2)/(s+4);
+disp(F,'Given Transfer Function:');
+zero=roots(numer(F));
+pole=roots(denom(F));
+disp(zero,'Zeros of transfer function: ');
+disp(pole,'Poles of transfer function: ');
+plzr(F); \ No newline at end of file
diff --git a/758/CH3/EX3.12/Ex_3_12.sce b/758/CH3/EX3.12/Ex_3_12.sce
new file mode 100755
index 000000000..1779b2dbc
--- /dev/null
+++ b/758/CH3/EX3.12/Ex_3_12.sce
@@ -0,0 +1,11 @@
+//Example 3.12
+
+clc;clear;close;
+s=poly(0,'s');
+F=10*s/(s^2+2*s+2);
+disp(F,'Given Transfer Function:');
+zero=roots(numer(F));
+pole=roots(denom(F));
+disp(zero,'Zeros of transfer function: ');
+disp(pole,'Poles of transfer function: ');
+plzr(F); \ No newline at end of file