Mercurial > hg > ltpda
comparison m-toolbox/classes/@specwin/win_hft169d.m @ 0:f0afece42f48
Import.
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Wed, 23 Nov 2011 19:22:13 +0100 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:f0afece42f48 |
---|---|
1 % WIN_HFT169D returns HFT169D window, with N points. | |
2 % If mode == 'define', the window values will be empty and all the features | |
3 % If mode == 'build', the window values will be calculated | |
4 % | |
5 % M Hewitson 18-05-07 | |
6 % | |
7 % $Id: win_hft169d.m,v 1.5 2011/05/25 07:30:08 mauro Exp $ | |
8 % | |
9 | |
10 function varargout = win_hft169d(w, mode, N) | |
11 | |
12 switch lower(mode) | |
13 | |
14 case 'build' | |
15 n_args = nargin; | |
16 if n_args < 3 | |
17 N = w.len; | |
18 end | |
19 % Calculate the values of the window | |
20 z = [0:N-1]./N * 2 * pi; | |
21 varargout{1} = (1 - 1.97441843 * cos (z) ... | |
22 + 1.65409889 * cos (2 * z) - 0.95788187 * cos (3 * z) + ... | |
23 0.33673420 * cos (4 * z) - 0.06364622 * cos (5 * z) + ... | |
24 0.00521942 * cos (6 * z) - 0.00010599 * cos (7 * z)); | |
25 | |
26 case 'define' | |
27 % Make window struct | |
28 w.type = 'HFT169D'; | |
29 w.alpha = 0; | |
30 w.psll = 169.5; | |
31 w.rov = 81.2; | |
32 w.nenbw = 4.8347; | |
33 w.w3db = 4.7588; | |
34 w.flatness = 0.0017; | |
35 w.len = N; | |
36 w.skip = 0; | |
37 | |
38 varargout{1} = w; | |
39 end | |
40 | |
41 % END |