summaryrefslogtreecommitdiff
path: root/2048/CH4/EX4.3/pz.sce
diff options
context:
space:
mode:
Diffstat (limited to '2048/CH4/EX4.3/pz.sce')
-rwxr-xr-x2048/CH4/EX4.3/pz.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/2048/CH4/EX4.3/pz.sce b/2048/CH4/EX4.3/pz.sce
new file mode 100755
index 000000000..31894dd9d
--- /dev/null
+++ b/2048/CH4/EX4.3/pz.sce
@@ -0,0 +1,13 @@
+// To produce pole-zero plots
+// 4.3
+
+exec('label.sci',-1);
+
+zero = [0 5/12];
+num = poly(zero,'z',"roots");
+pole = [1/2 1/3];
+den = poly(pole,'z',"roots");
+h = syslin('d',num./den);
+plzr(h);
+
+label('Pole-Zero Plot',4,'Real(z)','Imaginary(z)',4);