1 files changed, 8 insertions, 0 deletions
diff --git a/40/CH4/EX4.4a/Exa_4_4a.sce b/40/CH4/EX4.4a/Exa_4_4a.sce
new file mode 100755
index 000000000..e8866a358
--- /dev/null
+++ b/40/CH4/EX4.4a/Exa_4_4a.sce
@@ -0,0 +1,8 @@
+//Pole-Zero plots
+z=%z;
+az=2*z*(z+1);
+bz=(z-1/3)*((z^2)+1/4)*((z^2)+4*z+5);
+poles=roots(bz)
+zeroes=roots(az)
+h=az/bz
+plzr(h)
+\ No newline at end of file