1 files changed, 9 insertions, 0 deletions
diff --git a/758/CH8/EX8.15/Ex_8_15.sce b/758/CH8/EX8.15/Ex_8_15.sce
new file mode 100755
index 000000000..9c5ffa8b8
--- /dev/null
+++ b/758/CH8/EX8.15/Ex_8_15.sce
@@ -0,0 +1,9 @@
+//Example 8.15
+clc;clear;close;
+s=poly(0,'s');
+fc=1;              //Assumed cut off frequency of low pass filter
+f0=5;             //Assumed cut off frequency of high pass filter
+Hs=fc/(s+fc);
+Hs1=horner(Hs,fc*f0/s);
+disp(Hs,'H(s)=',fc,'Low pass filter with fc=');
+disp(Hs1,'H(s)=',f0,'High pass filter with fc=');
+\ No newline at end of file