blob: 45c8fd54bcd76605b3f8153f121f9347184fefde (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
#N canvas 1 53 557 517 10;
#X declare -lib windowing;
#X obj 4 479 cnv 15 550 20 empty \$0-pddp.cnv.footer empty 20 12 0
14 -228856 -66577 0;
#X obj 4 -17 cnv 15 550 40 empty \$0-pddp.cnv.header kaiser~ 3 12 0
18 -204280 -1 0;
#X obj 3 239 cnv 3 550 3 empty \$0-pddp.cnv.inlets inlets 8 12 0 13
-228856 -1 0;
#X obj 3 319 cnv 3 550 3 empty \$0-pddp.cnv.outlets outlet 8 12 0 13
-228856 -1 0;
#X obj 3 359 cnv 3 550 3 empty \$0-pddp.cnv.more_info more_info 8 12
0 13 -228856 -1 0;
#X obj 72 259 cnv 17 3 30 empty \$0-pddp.cnv.let.0 0 5 9 0 16 -228856
-162280 0;
#X text 168 40 formula:;
#X obj 97 126 hsl 71 15 -1 1 0 0 empty empty empty -2 -6 0 10 -262144
-1 -1 7000 1;
#X msg 94 106 1;
#X obj 94 86 loadbang;
#X obj 102 365 pddp/pddplink http://en.wikipedia.org/wiki/Window_function
-text wikipedia: window functions;
#X obj 438 -14 import windowing;
#X msg 36 154 \; pd dsp 1;
#X text 21 125 height --->;
#X obj 127 149 sig~ 1;
#N canvas 0 0 450 300 (subpatch) 0;
#X array \$0-kaiser 64 float 0;
#X coords 0 1 63 -1 200 140 1;
#X restore 326 65 graph;
#X text 103 396 Windowing functions are used with FFTs. These transform
the signal block-by-block into a spectral representation whose resolution
in both the frequency and time domains are proportional to their size
(as a power-of-two in PD). The different windows have different characteristics
in terms of stopband attenuation and noise bandwidth.;
#X text 102 258 SIGNAL: the height (amplitude) of the window is controlled
by the signal on its inlet.;
#X obj 197 126 hsl 81 15 1 240 1 0 empty empty empty -2 -6 0 10 -262144
-1 -1 3361 1;
#X floatatom 192 145 5 0 0 0 - - -;
#X obj 127 172 kaiser~;
#X obj 127 198 tabsend~ \$0-kaiser;
#X obj 435 6 pddp/pddplink http://wiki.puredata.info/en/kaiser~ -text
pdpedia: kaiser~;
#X text 169 84 modified Bessel function;
#X text 169 70 where Io is 0th order;
#X text 168 55 Io(a*sqrt(1-x^2))/Io(a);
#X text 103 327 SIGNAL: a kaiser (exponential decay) window with size=dsp
blocksize;
#X msg 121 106 10;
#X obj 102 379 pddp/pddplink http://en.wikipedia.org/wiki/Kaiser_window
-text wikipedia: kaiser window;
#X text 102 284 FLOAT: the narrowness of the kaiser window is controlled
by floats in the inlet;
#X text 15 6 description: generates a kaiser window for each dsp block
;
#N canvas 286 187 494 344 META 0;
#X text 12 125 HELP_PATCH_AUTHORS "pd meta" information added by Jonathan
Wilkes for Pd version 0.42.;
#X text 12 25 LICENSE GPL v2;
#X text 12 5 KEYWORDS signal;
#X text 12 65 INLET_0 signal;
#X text 12 85 OUTLET_0 signal;
#X text 12 105 AUTHOR Joe Sarlo;
#X text 12 45 DESCRIPTION generate a kaiser window for each dsp block
;
#X restore 506 479 pd META;
#X connect 7 0 14 0;
#X connect 8 0 7 0;
#X connect 9 0 8 0;
#X connect 9 0 27 0;
#X connect 14 0 20 0;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 20 0 21 0;
#X connect 27 0 18 0;
|
