#N canvas 47 54 887 550 10;
#X obj 71 32 cnv 15 15 15 empty empty vasp.flp 0 10 1 14 -262144 -1
0;
#X obj 76 247 vasp.update;
#X obj 76 224 vasp.* 0.5;
#X obj 401 449 dac~;
#X obj 401 405 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X text 423 404 play;
#N canvas 40 55 281 170 clear_buffer 0;
#X obj 54 79 vasp.update;
#X obj 54 56 vasp.= 0;
#X obj 54 26 inlet;
#X obj 54 108 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 0 8
-262144 -1 -1;
#X connect 0 0 3 0;
#X connect 1 0 0 0;
#X connect 2 0 1 0;
#X restore 533 449 pd clear_buffer;
#X text 180 178 generate white noise;
#X obj 76 201 vasp.noise;
#X obj 76 270 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 0 8
-262144 -1 -1;
#N canvas 92 108 343 268 init 0;
#X obj 110 180 s \$0-sample-length;
#X msg 177 126 resize \$1;
#X obj 177 79 loadbang;
#X msg 177 100 88200;
#X obj 177 148 s bufflp;
#X connect 1 0 4 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X connect 3 0 0 0;
#X restore 672 447 pd init;
#N canvas 0 22 460 310 Hz_to_period_length 0;
#X floatatom 125 242 0 0 0 0 - - -;
#X obj 125 142 t b f;
#X text 158 223 period length in samples (float);
#X floatatom 125 80 0 0 0 0 - - -;
#X obj 125 206 / 1;
#X text 170 79 frequency in Hz;
#X obj 53 142 samplerate~;
#X obj 53 119 loadbang;
#X floatatom 125 175 5 0 0 0 - - -;
#X connect 1 0 8 0;
#X connect 1 1 4 1;
#X connect 3 0 1 0;
#X connect 4 0 0 0;
#X connect 6 0 8 0;
#X connect 7 0 6 0;
#X connect 8 0 4 0;
#X restore 78 457 pd Hz_to_period_length;
#X text 70 78 first argument: cutoff frequency in period length;
#X msg 76 179 vasp bufflp;
#X obj 428 165 wavedisplay-simple bufflp \$0;
#X msg 533 426 vasp bufflp;
#X obj 401 426 tabplay~ bufflp;
#X obj 78 496 VASP-HELP;
#X obj 77 371 vasp.update;
#X obj 77 394 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 0 8
-262144 -1 -1;
#X floatatom 201 298 5 0 0 0 - - -;
#X floatatom 260 298 5 0 0 0 - - -;
#X text 195 278 cutoff;
#X obj 201 318 pack;
#X msg 77 297 vasp bufflp;
#X obj 77 347 vasp.flp 220;
#X text 261 277 repetitions;
#X text 71 63 vasp passive low pass filter (FIR);
#X text 70 92 second argument: repetitions (integer) \, default 1;
#X text 70 119 right inlet: cutoff and repetitions (list);
#X connect 1 0 9 0;
#X connect 2 0 1 0;
#X connect 4 0 16 0;
#X connect 8 0 2 0;
#X connect 13 0 8 0;
#X connect 15 0 6 0;
#X connect 16 0 3 0;
#X connect 16 0 3 1;
#X connect 18 0 19 0;
#X connect 20 0 23 0;
#X connect 21 0 23 1;
#X connect 23 0 25 1;
#X connect 24 0 25 0;
#X connect 25 0 18 0;