1 files changed, 88 insertions, 89 deletions
diff --git a/externals/grill/vasp/pd-help/vasp_fhp.pd b/externals/grill/vasp/pd-help/vasp_fhp.pd
index 9b5eff80..4f385e2c 100644
--- a/externals/grill/vasp/pd-help/vasp_fhp.pd
+++ b/externals/grill/vasp/pd-help/vasp_fhp.pd
@@ -1,89 +1,88 @@
-#N canvas 47 54 891 554 10;
-#X obj 71 32 cnv 15 15 15 empty empty vasp.fhp 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 1152
-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 1152
-8 -262144 -1 -1;
-#X obj 77 391 vasp.update;
-#X obj 77 414 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 1152
-8 -262144 -1 -1;
-#N canvas 92 108 341 266 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 buffhp;
-#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 0 458 308 Hz_to_period_length 0;
-#X floatatom 125 242 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;
-#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;
-#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 71 63 vasp high pass filter (FIR);
-#X text 70 78 first argument: cutoff frequency in period length;
-#X text 70 92 second argument: q-factor from 1 to infinite (integer)
-default 1;
-#X text 70 119 right inlet: cutoff and q-factor (list);
-#X obj 421 188 wavedisplay-simple buffhp \$0;
-#X msg 76 179 vasp buffhp;
-#X msg 77 330 vasp buffhp;
-#X floatatom 201 298 5 0 0;
-#X floatatom 260 298 5 0 0;
-#X text 195 278 cutoff;
-#X text 261 277 q-factor;
-#X obj 201 345 pack;
-#X obj 401 426 tabplay~ buffhp;
-#X msg 533 426 vasp buffhp;
-#X obj 260 319 t b f;
-#X obj 77 366 vasp.fhp 220;
-#X obj 78 503 VASP-HELP;
-#X connect 1 0 9 0;
-#X connect 2 0 1 0;
-#X connect 4 0 26 0;
-#X connect 8 0 2 0;
-#X connect 10 0 11 0;
-#X connect 19 0 8 0;
-#X connect 20 0 29 0;
-#X connect 21 0 25 0;
-#X connect 22 0 28 0;
-#X connect 25 0 29 1;
-#X connect 26 0 3 0;
-#X connect 26 0 3 1;
-#X connect 27 0 6 0;
-#X connect 28 0 25 0;
-#X connect 28 1 25 1;
-#X connect 29 0 10 0;
+#N canvas 47 54 895 558 10;
+#X obj 71 32 cnv 15 15 15 empty empty vasp.fhp 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;
+#X obj 77 391 vasp.update;
+#X obj 77 414 bng 15 250 50 0 \$0-draw_display empty empty 0 -6 0 8
+-262144 -1 -1;
+#N canvas 92 108 341 266 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 buffhp;
+#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 458 308 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 71 63 vasp high pass filter (FIR);
+#X text 70 78 first argument: cutoff frequency in period length;
+#X obj 421 188 wavedisplay-simple buffhp \$0;
+#X msg 76 179 vasp buffhp;
+#X msg 77 330 vasp buffhp;
+#X floatatom 201 298 5 0 0 0 - - -;
+#X floatatom 260 298 5 0 0 0 - - -;
+#X text 195 278 cutoff;
+#X obj 201 345 pack;
+#X obj 401 426 tabplay~ buffhp;
+#X msg 533 426 vasp buffhp;
+#X obj 260 319 t b f;
+#X obj 77 366 vasp.fhp 220;
+#X obj 78 503 VASP-HELP;
+#X text 70 92 second argument: repetitions (integer) \, default 1;
+#X text 70 119 right inlet: cutoff and repetitions (list);
+#X text 261 277 repetitions;
+#X connect 1 0 9 0;
+#X connect 2 0 1 0;
+#X connect 4 0 23 0;
+#X connect 8 0 2 0;
+#X connect 10 0 11 0;
+#X connect 17 0 8 0;
+#X connect 18 0 26 0;
+#X connect 19 0 22 0;
+#X connect 20 0 25 0;
+#X connect 22 0 26 1;
+#X connect 23 0 3 0;
+#X connect 23 0 3 1;
+#X connect 24 0 6 0;
+#X connect 25 0 22 0;
+#X connect 25 1 22 1;
+#X connect 26 0 10 0;