summaryrefslogtreecommitdiff
path: root/52/CH6/EX6.16/Example6_16.sce
diff options
context:
space:
mode:
Diffstat (limited to '52/CH6/EX6.16/Example6_16.sce')
-rwxr-xr-x52/CH6/EX6.16/Example6_16.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/52/CH6/EX6.16/Example6_16.sce b/52/CH6/EX6.16/Example6_16.sce
new file mode 100755
index 000000000..7a47fc3b9
--- /dev/null
+++ b/52/CH6/EX6.16/Example6_16.sce
@@ -0,0 +1,12 @@
+//Example 6.16
+//Program to determine filter coefficients obtained by sampling:
+//N=15
+clear;
+clc ;
+close ;
+N=15;
+U=1; //Zero Adjust
+for n=0:1:N-1
+h(n+U)=(1+2*cos(2*%pi*(7-n)/N)+2*cos(4*%pi*(7-n)/N)+2*cos(6*%pi*(7-n)/N))/N;
+end
+disp(h,"Filter Coefficients,h(n)=");