WIN_FTHP return FTHP window sample for input z. M Hewitson 18-05-07 $Id: win_FTHP.html,v 1.14 2008/03/31 10:27:40 hewitson Exp $
0001 function w = win_FTHP(w, z) 0002 0003 % WIN_FTHP return FTHP window sample for input z. 0004 % 0005 % M Hewitson 18-05-07 0006 % 0007 % $Id: win_FTHP.html,v 1.14 2008/03/31 10:27:40 hewitson Exp $ 0008 % 0009 0010 z = pi * (2 * z - 1); 0011 v = (1 + 1.912510941 ... 0012 * cos (z) + 1.079173272 * cos (2 * z) + ... 0013 0.1832630879 * cos (3 * z)); 0014 0015 % Make window struct 0016 w.name = 'FTHP'; 0017 w.alpha = 0; 0018 w.psll = 70.4; 0019 w.rov = 72.3; 0020 w.nenbw = 3.4279; 0021 w.w3db = 3.3846; 0022 w.flatness = 0.0096; 0023 w.ws = sum(v); 0024 w.ws2 = sum(v.*v); 0025 w.win = v; 0026 0027 % END