added in some of Cyrille's ds objects

svn path=/trunk/externals/mapping/; revision=4546

15 files changed, 504 insertions, 0 deletions

diff --git a/breakpoint.pd b/breakpoint.pd
new file mode 100644
index 0000000..28d5846
--- /dev/null
+++ b/breakpoint.pd
@@ -0,0 +1,47 @@
+#N canvas 0 0 433 427 10;
+#X obj 42 29 inlet;
+#X obj 101 28 inlet;
+#X obj 250 26 inlet;
+#X obj 42 81 moses \$1;
+#X obj 42 105 / \$1;
+#X obj 93 104 - \$1;
+#X obj 157 86 t b f;
+#X obj 174 63 loadbang;
+#X obj 93 161 / 1;
+#X msg 157 108 1;
+#X obj 157 132 - \$1;
+#X obj 42 245 f;
+#X obj 42 208 * \$2;
+#X obj 93 207 + \$2;
+#X obj 250 93 t b f;
+#X msg 250 115 1;
+#X obj 250 139 - \$2;
+#X obj 93 183 *;
+#X obj 42 276 outlet;
+#X connect 0 0 3 0;
+#X connect 1 0 3 1;
+#X connect 1 0 4 1;
+#X connect 1 0 5 1;
+#X connect 1 0 6 0;
+#X connect 2 0 14 0;
+#X connect 2 0 13 1;
+#X connect 2 0 12 1;
+#X connect 3 0 4 0;
+#X connect 3 1 5 0;
+#X connect 4 0 12 0;
+#X connect 5 0 8 0;
+#X connect 6 0 9 0;
+#X connect 6 1 10 1;
+#X connect 7 0 9 0;
+#X connect 7 0 15 0;
+#X connect 8 0 17 0;
+#X connect 9 0 10 0;
+#X connect 10 0 8 1;
+#X connect 11 0 18 0;
+#X connect 12 0 11 0;
+#X connect 13 0 11 0;
+#X connect 14 0 15 0;
+#X connect 14 1 16 1;
+#X connect 15 0 16 0;
+#X connect 16 0 17 1;
+#X connect 17 0 13 0;
diff --git a/distance.pd b/distance.pd
new file mode 100644
index 0000000..73a6c09
--- /dev/null
+++ b/distance.pd
@@ -0,0 +1,10 @@
+#N canvas 0 0 450 300 10;
+#X obj 80 47 inlet;
+#X obj 150 49 inlet;
+#X obj 80 129 abs;
+#X obj 80 195 outlet;
+#X obj 80 95 - \$1;
+#X connect 0 0 4 0;
+#X connect 1 0 4 1;
+#X connect 2 0 3 0;
+#X connect 4 0 2 0;
diff --git a/gaussian.pd b/gaussian.pd
new file mode 100644
index 0000000..1c51f42
--- /dev/null
+++ b/gaussian.pd
@@ -0,0 +1,21 @@
+#N canvas 0 0 450 300 10;
+#X obj 65 26 inlet;
+#X obj 277 22 inlet;
+#X obj 65 218 * -1;
+#X obj 65 244 exp;
+#X obj 66 124 *;
+#X obj 66 91 t f f;
+#X obj 67 271 outlet;
+#X obj 65 187 / \$2;
+#X obj 66 63 - \$1;
+#X obj 142 20 inlet;
+#X connect 0 0 8 0;
+#X connect 1 0 7 1;
+#X connect 2 0 3 0;
+#X connect 3 0 6 0;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 5 1 4 1;
+#X connect 7 0 2 0;
+#X connect 8 0 5 0;
+#X connect 9 0 8 1;
diff --git a/help/breakpoint-help.pd b/help/breakpoint-help.pd
new file mode 100644
index 0000000..8d48253
--- /dev/null
+++ b/help/breakpoint-help.pd
@@ -0,0 +1,139 @@
+#N canvas 584 82 885 571 10;
+#X obj 20 38 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 0 1;
+#X obj 20 213 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 0 1;
+#X floatatom 91 156 5 0 0 0 - - -;
+#X floatatom 162 157 5 0 0 0 - - -;
+#X floatatom 144 247 5 0 1 0 - - -;
+#X obj 144 271 t b f;
+#X floatatom 236 247 5 0 1 0 - - -;
+#X obj 236 271 t b f;
+#X obj 82 271 loadbang;
+#X text 111 541 XY relation of the breakpoint object;
+#N canvas 0 0 450 300 float 0;
+#X obj 71 23 inlet;
+#X obj 48 191 outlet;
+#X obj 150 22 inlet;
+#X obj 71 93 list prepend;
+#X obj 71 118 list;
+#X obj 48 141 list;
+#X obj 48 166 list trim;
+#X obj 150 45 t b b;
+#X msg 150 70 list;
+#X connect 0 0 3 0;
+#X connect 2 0 7 0;
+#X connect 3 0 4 0;
+#X connect 4 0 3 1;
+#X connect 4 0 5 1;
+#X connect 5 0 6 0;
+#X connect 6 0 1 0;
+#X connect 7 0 8 0;
+#X connect 7 1 5 0;
+#X connect 8 0 3 1;
+#X restore 82 353 pd float to list ___________;
+#N canvas 0 0 450 300 generate 0;
+#X obj 55 38 inlet;
+#X msg 55 65 0;
+#X obj 55 91 f;
+#X obj 55 164 + 1;
+#X obj 55 137 t f f;
+#X obj 85 192 outlet;
+#X obj 148 192 outlet;
+#X obj 148 166 t b;
+#X obj 85 164 / 100;
+#X obj 55 114 moses 101;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 9 0;
+#X connect 3 0 2 0;
+#X connect 4 0 3 0;
+#X connect 4 1 8 0;
+#X connect 7 0 6 0;
+#X connect 8 0 5 0;
+#X connect 9 0 4 0;
+#X connect 9 1 7 0;
+#X restore 82 302 pd generate list ___________;
+#X floatatom 513 224 5 0 1 0 - - -;
+#X obj 513 248 t b f;
+#X floatatom 584 223 5 0 0 0 - - -;
+#X obj 584 247 t b f;
+#X obj 451 248 loadbang;
+#N canvas 0 0 450 300 float 0;
+#X obj 71 23 inlet;
+#X obj 48 191 outlet;
+#X obj 150 22 inlet;
+#X obj 71 93 list prepend;
+#X obj 71 118 list;
+#X obj 48 141 list;
+#X obj 48 166 list trim;
+#X obj 150 45 t b b;
+#X msg 150 70 list;
+#X connect 0 0 3 0;
+#X connect 2 0 7 0;
+#X connect 3 0 4 0;
+#X connect 4 0 3 1;
+#X connect 4 0 5 1;
+#X connect 5 0 6 0;
+#X connect 6 0 1 0;
+#X connect 7 0 8 0;
+#X connect 7 1 5 0;
+#X connect 8 0 3 1;
+#X restore 451 358 pd float to list ___________;
+#N canvas 0 0 450 300 generate 0;
+#X obj 55 38 inlet;
+#X msg 55 65 0;
+#X obj 55 91 f;
+#X obj 55 164 + 1;
+#X obj 55 137 t f f;
+#X obj 85 192 outlet;
+#X obj 148 192 outlet;
+#X obj 148 166 t b;
+#X obj 85 164 / 100;
+#X obj 55 114 moses 101;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 9 0;
+#X connect 3 0 2 0;
+#X connect 4 0 3 0;
+#X connect 4 1 8 0;
+#X connect 7 0 6 0;
+#X connect 8 0 5 0;
+#X connect 9 0 4 0;
+#X connect 9 1 7 0;
+#X restore 451 279 pd generate list ___________;
+#X text 110 70 for X go thru 0 to \$1 \, Y go thrus 0 to \$2.;
+#X text 109 89 for X go thru \$1 to 1 \, Y go thrus \$2 to 1;
+#X obj 20 180 breakpoint 0.8 0.3;
+#X obj 82 327 breakpoint 0.8 0.3 _____;
+#X obj 82 381 multi_slider 100;
+#X obj 452 388 multi_slider 100;
+#X obj 451 304 breakpoint 0.3 0.5 _____;
+#X obj 451 332 nl 1 ________________;
+#X connect 0 0 21 0;
+#X connect 2 0 21 1;
+#X connect 3 0 21 2;
+#X connect 4 0 5 0;
+#X connect 5 0 11 0;
+#X connect 5 1 22 1;
+#X connect 6 0 7 0;
+#X connect 7 0 11 0;
+#X connect 7 1 22 2;
+#X connect 8 0 11 0;
+#X connect 10 0 23 0;
+#X connect 11 0 22 0;
+#X connect 11 1 10 1;
+#X connect 12 0 13 0;
+#X connect 13 0 18 0;
+#X connect 13 1 25 1;
+#X connect 14 0 15 0;
+#X connect 15 0 18 0;
+#X connect 15 1 26 1;
+#X connect 16 0 18 0;
+#X connect 17 0 24 0;
+#X connect 18 0 25 0;
+#X connect 18 1 17 1;
+#X connect 21 0 1 0;
+#X connect 22 0 10 0;
+#X connect 25 0 26 0;
+#X connect 26 0 17 0;
diff --git a/help/distance-help.pd b/help/distance-help.pd
new file mode 100644
index 0000000..ff66e88
--- /dev/null
+++ b/help/distance-help.pd
@@ -0,0 +1,11 @@
+#N canvas 525 336 510 503 10;
+#X obj 59 212 distance 0.3;
+#X obj 59 240 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 3810 1;
+#X obj 59 69 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 0 1;
+#X text 126 29 distance from a point and a stream;
+#X floatatom 138 187 5 0 0 0 - - -;
+#X connect 0 0 1 0;
+#X connect 2 0 0 0;
+#X connect 4 0 0 1;
diff --git a/help/gaussian-help.pd b/help/gaussian-help.pd
new file mode 100644
index 0000000..1897251
--- /dev/null
+++ b/help/gaussian-help.pd
@@ -0,0 +1,41 @@
+#N canvas 0 0 745 731 10;
+#X floatatom 204 287 5 0 0 0 - - -;
+#X obj 94 354 tolist;
+#X obj 93 393 multi_slider 100;
+#X floatatom 148 286 5 0 0 0 - - -;
+#X obj 96 316 gaussian 0.1 0.5;
+#N canvas 580 100 450 300 generate 0;
+#X obj 54 122 f;
+#X obj 53 150 + 1;
+#X obj 52 174 moses 100;
+#X obj 58 213 t f f;
+#X msg 52 89 -1;
+#X obj 116 214 bang;
+#X obj 86 244 / 100;
+#X obj 72 62 loadbang;
+#X obj 49 34 inlet;
+#X obj 83 270 outlet;
+#X obj 140 270 outlet;
+#X connect 0 0 1 0;
+#X connect 1 0 2 0;
+#X connect 2 0 3 0;
+#X connect 2 1 5 0;
+#X connect 3 0 0 0;
+#X connect 3 1 6 0;
+#X connect 4 0 0 0;
+#X connect 5 0 10 0;
+#X connect 6 0 9 0;
+#X connect 7 0 4 0;
+#X connect 8 0 4 0;
+#X restore 91 258 pd generate list;
+#X obj 95 230 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X text 271 77 generate a gausian curve;
+#X text 236 110 i nead to check the corect equation of this one.;
+#X connect 0 0 4 2;
+#X connect 1 0 2 0;
+#X connect 3 0 4 1;
+#X connect 4 0 1 0;
+#X connect 5 0 4 0;
+#X connect 5 1 1 1;
+#X connect 6 0 5 0;
diff --git a/help/iir-help.pd b/help/iir-help.pd
new file mode 100644
index 0000000..8967f87
--- /dev/null
+++ b/help/iir-help.pd
@@ -0,0 +1,31 @@
+#N canvas 127 104 679 509 10;
+#X floatatom 471 193 5 0 0 0 - - -;
+#X text 22 11 data;
+#X obj 27 172 t f f;
+#X msg 67 100 0;
+#X obj 234 267 -;
+#X msg 68 121 1;
+#X obj 234 294 timeroll;
+#X obj 449 294 timeroll;
+#X obj 449 234 iir 5;
+#X obj 28 294 timeroll;
+#X text 180 65 (check if it's true);
+#X obj 27 30 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 12700 1;
+#X text 89 27 [iir] computes a infinite impulse response low-pass filter
+of order one;
+#X text 273 269 high-pass;
+#X text 482 264 low-pass;
+#X text 302 468 noise;
+#X text 83 465 original;
+#X text 530 467 signal;
+#X connect 0 0 8 1;
+#X connect 2 0 4 0;
+#X connect 2 0 9 0;
+#X connect 2 1 8 0;
+#X connect 3 0 2 0;
+#X connect 4 0 6 0;
+#X connect 5 0 2 0;
+#X connect 8 0 4 1;
+#X connect 8 0 7 0;
+#X connect 11 0 2 0;
diff --git a/help/timeroll-help.pd b/help/timeroll-help.pd
new file mode 100644
index 0000000..8339cfb
--- /dev/null
+++ b/help/timeroll-help.pd
@@ -0,0 +1,12 @@
+#N canvas 0 0 306 391 10;
+#X obj 21 97 vsl 15 128 0 1 0 0 empty empty empty 0 -8 0 8 -262144
+-1 -1 8700 1;
+#X floatatom 38 19 5 0 0 0 - - -;
+#X text 84 17 from 0 to 1;
+#X obj 38 37 resample 50;
+#X obj 38 60 _clip;
+#X obj 38 81 timeroll;
+#X connect 0 0 3 0;
+#X connect 1 0 3 0;
+#X connect 3 0 4 0;
+#X connect 4 0 5 0;
diff --git a/iir.pd b/iir.pd
new file mode 100644
index 0000000..eea00a8
--- /dev/null
+++ b/iir.pd
@@ -0,0 +1,28 @@
+#N canvas 246 155 294 362 10;
+#X obj 59 42 inlet;
+#X obj 59 314 outlet;
+#X obj 59 247 +;
+#X obj 130 240 + 1;
+#X obj 130 42 inlet;
+#X obj 130 183 1;
+#X obj 90 69 loadbang;
+#X obj 130 160 /;
+#X msg 130 139 1 \$1;
+#X obj 90 90 \$1;
+#X obj 90 112 sel 0;
+#X obj 59 285 / 2;
+#X obj 59 223 * 1;
+#X connect 0 0 12 0;
+#X connect 2 0 11 0;
+#X connect 3 0 11 1;
+#X connect 4 0 8 0;
+#X connect 5 0 3 0;
+#X connect 5 0 12 1;
+#X connect 6 0 9 0;
+#X connect 7 0 5 0;
+#X connect 8 0 7 0;
+#X connect 9 0 10 0;
+#X connect 10 1 8 0;
+#X connect 11 0 2 1;
+#X connect 11 0 1 0;
+#X connect 12 0 2 0;
diff --git a/pd/breakpoint.pd b/pd/breakpoint.pd
new file mode 100644
index 0000000..28d5846
--- /dev/null
+++ b/pd/breakpoint.pd
@@ -0,0 +1,47 @@
+#N canvas 0 0 433 427 10;
+#X obj 42 29 inlet;
+#X obj 101 28 inlet;
+#X obj 250 26 inlet;
+#X obj 42 81 moses \$1;
+#X obj 42 105 / \$1;
+#X obj 93 104 - \$1;
+#X obj 157 86 t b f;
+#X obj 174 63 loadbang;
+#X obj 93 161 / 1;
+#X msg 157 108 1;
+#X obj 157 132 - \$1;
+#X obj 42 245 f;
+#X obj 42 208 * \$2;
+#X obj 93 207 + \$2;
+#X obj 250 93 t b f;
+#X msg 250 115 1;
+#X obj 250 139 - \$2;
+#X obj 93 183 *;
+#X obj 42 276 outlet;
+#X connect 0 0 3 0;
+#X connect 1 0 3 1;
+#X connect 1 0 4 1;
+#X connect 1 0 5 1;
+#X connect 1 0 6 0;
+#X connect 2 0 14 0;
+#X connect 2 0 13 1;
+#X connect 2 0 12 1;
+#X connect 3 0 4 0;
+#X connect 3 1 5 0;
+#X connect 4 0 12 0;
+#X connect 5 0 8 0;
+#X connect 6 0 9 0;
+#X connect 6 1 10 1;
+#X connect 7 0 9 0;
+#X connect 7 0 15 0;
+#X connect 8 0 17 0;
+#X connect 9 0 10 0;
+#X connect 10 0 8 1;
+#X connect 11 0 18 0;
+#X connect 12 0 11 0;
+#X connect 13 0 11 0;
+#X connect 14 0 15 0;
+#X connect 14 1 16 1;
+#X connect 15 0 16 0;
+#X connect 16 0 17 1;
+#X connect 17 0 13 0;
diff --git a/pd/distance.pd b/pd/distance.pd
new file mode 100644
index 0000000..73a6c09
--- /dev/null
+++ b/pd/distance.pd
@@ -0,0 +1,10 @@
+#N canvas 0 0 450 300 10;
+#X obj 80 47 inlet;
+#X obj 150 49 inlet;
+#X obj 80 129 abs;
+#X obj 80 195 outlet;
+#X obj 80 95 - \$1;
+#X connect 0 0 4 0;
+#X connect 1 0 4 1;
+#X connect 2 0 3 0;
+#X connect 4 0 2 0;
diff --git a/pd/gaussian.pd b/pd/gaussian.pd
new file mode 100644
index 0000000..1c51f42
--- /dev/null
+++ b/pd/gaussian.pd
@@ -0,0 +1,21 @@
+#N canvas 0 0 450 300 10;
+#X obj 65 26 inlet;
+#X obj 277 22 inlet;
+#X obj 65 218 * -1;
+#X obj 65 244 exp;
+#X obj 66 124 *;
+#X obj 66 91 t f f;
+#X obj 67 271 outlet;
+#X obj 65 187 / \$2;
+#X obj 66 63 - \$1;
+#X obj 142 20 inlet;
+#X connect 0 0 8 0;
+#X connect 1 0 7 1;
+#X connect 2 0 3 0;
+#X connect 3 0 6 0;
+#X connect 4 0 7 0;
+#X connect 5 0 4 0;
+#X connect 5 1 4 1;
+#X connect 7 0 2 0;
+#X connect 8 0 5 0;
+#X connect 9 0 8 1;
diff --git a/pd/iir.pd b/pd/iir.pd
new file mode 100644
index 0000000..eea00a8
--- /dev/null
+++ b/pd/iir.pd
@@ -0,0 +1,28 @@
+#N canvas 246 155 294 362 10;
+#X obj 59 42 inlet;
+#X obj 59 314 outlet;
+#X obj 59 247 +;
+#X obj 130 240 + 1;
+#X obj 130 42 inlet;
+#X obj 130 183 1;
+#X obj 90 69 loadbang;
+#X obj 130 160 /;
+#X msg 130 139 1 \$1;
+#X obj 90 90 \$1;
+#X obj 90 112 sel 0;
+#X obj 59 285 / 2;
+#X obj 59 223 * 1;
+#X connect 0 0 12 0;
+#X connect 2 0 11 0;
+#X connect 3 0 11 1;
+#X connect 4 0 8 0;
+#X connect 5 0 3 0;
+#X connect 5 0 12 1;
+#X connect 6 0 9 0;
+#X connect 7 0 5 0;
+#X connect 8 0 7 0;
+#X connect 9 0 10 0;
+#X connect 10 1 8 0;
+#X connect 11 0 2 1;
+#X connect 11 0 1 0;
+#X connect 12 0 2 0;
diff --git a/pd/timeroll.pd b/pd/timeroll.pd
new file mode 100644
index 0000000..d56e3d3
--- /dev/null
+++ b/pd/timeroll.pd
@@ -0,0 +1,29 @@
+#N canvas 0 0 854 220 10;
+#N canvas 0 0 450 300 graph2 0;
+#X array \$0-_ 100 float 2;
+#X coords 0 0.77 100 -0.01 200 100 1;
+#X restore 10 55 graph;
+#X obj 272 76 list;
+#X obj 272 98 list append 0;
+#X obj 272 122 list trim;
+#X obj 295 45 list split 100;
+#X obj 272 14 inlet;
+#X obj 388 13 inlet;
+#X obj 388 106 pack f \$0;
+#X obj 272 146 s \$0-_;
+#X msg 388 133 \; \$2-_ resize \$1;
+#X text 315 14 data;
+#X text 429 15 size of the array (default = 100 or \$1);
+#X obj 11 29 cnv 15 198 125 empty empty empty 20 12 0 14 -262144 -66577
+0;
+#X connect 1 0 2 0;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 8 0;
+#X connect 4 0 1 1;
+#X connect 4 2 1 1;
+#X connect 5 0 1 0;
+#X connect 6 0 4 1;
+#X connect 6 0 7 0;
+#X connect 7 0 9 0;
+#X coords 0 -1 1 1 200 145 1 10 10;
diff --git a/timeroll.pd b/timeroll.pd
new file mode 100644
index 0000000..d56e3d3
--- /dev/null
+++ b/timeroll.pd
@@ -0,0 +1,29 @@
+#N canvas 0 0 854 220 10;
+#N canvas 0 0 450 300 graph2 0;
+#X array \$0-_ 100 float 2;
+#X coords 0 0.77 100 -0.01 200 100 1;
+#X restore 10 55 graph;
+#X obj 272 76 list;
+#X obj 272 98 list append 0;
+#X obj 272 122 list trim;
+#X obj 295 45 list split 100;
+#X obj 272 14 inlet;
+#X obj 388 13 inlet;
+#X obj 388 106 pack f \$0;
+#X obj 272 146 s \$0-_;
+#X msg 388 133 \; \$2-_ resize \$1;
+#X text 315 14 data;
+#X text 429 15 size of the array (default = 100 or \$1);
+#X obj 11 29 cnv 15 198 125 empty empty empty 20 12 0 14 -262144 -66577
+0;
+#X connect 1 0 2 0;
+#X connect 1 0 4 0;
+#X connect 2 0 3 0;
+#X connect 3 0 8 0;
+#X connect 4 0 1 1;
+#X connect 4 2 1 1;
+#X connect 5 0 1 0;
+#X connect 6 0 4 1;
+#X connect 6 0 7 0;
+#X connect 7 0 9 0;
+#X coords 0 -1 1 1 200 145 1 10 10;