diff options
Diffstat (limited to '40/CH8/EX8.10/Exa_8_10.sce')
-rwxr-xr-x | 40/CH8/EX8.10/Exa_8_10.sce | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/40/CH8/EX8.10/Exa_8_10.sce b/40/CH8/EX8.10/Exa_8_10.sce index d9676ae26..73e93d035 100755 --- a/40/CH8/EX8.10/Exa_8_10.sce +++ b/40/CH8/EX8.10/Exa_8_10.sce @@ -1,9 +1,9 @@ -//DFS of sampled periodic signals
-xn=[0 ones(2:16) 0 -ones(18:32)];
-XDFS=0.032*dft(xn,-1);
-for i=1:length(XDFS)
- if (abs(XDFS(i))<0.000001) then
- XDFS(i)=0;
- end
-end
+//DFS of sampled periodic signals +xn=[0 ones(2:16) 0 -ones(18:32)]; +XDFS=0.032*fft(xn,-1); +for i=1:length(XDFS) + if (abs(XDFS(i))<0.000001) then + XDFS(i)=0; + end +end disp(XDFS,'The DFS of x[n] is');
\ No newline at end of file |