created ds-abs to house a growing collection of data structure manipulation objects

svn path=/trunk/abstractions/sfruit/; revision=10350

20 files changed, 0 insertions, 869 deletions

diff --git a/sfruit/ds-begin-help.pd b/sfruit/ds-begin-help.pd
deleted file mode 100644
index b17158d..0000000
--- a/sfruit/ds-begin-help.pd
+++ /dev/null
@@ -1,41 +0,0 @@
-#N struct 1631datatemplate float x float y;
-#N canvas 544 342 450 300 10;
-#X obj 127 140 ds-begin pd-\$0mydata;
-#N canvas 0 22 450 300 \$0datatemplate 0;
-#X obj 99 58 drawpolygon 90 3 0 0 0 10 10 10 10 0 0 0;
-#X obj 112 95 loadbang;
-#X obj 112 124 t b b b;
-#X msg 188 127 clear;
-#X obj 188 149 s pd-\$0mydata;
-#X msg 112 182 0 0 \, 20 0 \, 40 0;
-#X obj 131 213 ds-begin pd-\$0mydata;
-#X obj 90 247 append \$0datatemplate x y;
-#X obj 94 96 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 99 32 struct \$0datatemplate float x float y;
-#X connect 1 0 2 0;
-#X connect 2 0 5 0;
-#X connect 2 1 6 0;
-#X connect 2 2 3 0;
-#X connect 3 0 4 0;
-#X connect 5 0 7 0;
-#X connect 6 0 7 2;
-#X connect 8 0 2 0;
-#X restore 293 88 pd \$0datatemplate;
-#N canvas 3 345 126 108 \$0mydata 1;
-#X scalar 1631datatemplate 0 0 \;;
-#X scalar 1631datatemplate 20 0 \;;
-#X scalar 1631datatemplate 40 0 \;;
-#X restore 293 110 pd \$0mydata;
-#X obj 50 177 append \$0datatemplate x y;
-#X obj 50 99 t b b;
-#X obj 50 68 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X msg 50 140 20 20;
-#X text 8 5 Convenience abstraction for the common task of outputting
-the head of a data structure subpatch.;
-#X connect 0 0 3 2;
-#X connect 4 0 6 0;
-#X connect 4 1 0 0;
-#X connect 5 0 4 0;
-#X connect 6 0 3 0;
diff --git a/sfruit/ds-begin.pd b/sfruit/ds-begin.pd
deleted file mode 100644
index d2322ff..0000000
--- a/sfruit/ds-begin.pd
+++ /dev/null
@@ -1,13 +0,0 @@
-#N canvas 339 80 224 198 10;
-#X obj 48 65 list append traverse \$1;
-#X obj 48 88 list trim;
-#X obj 21 13 inlet;
-#X obj 21 36 t b b;
-#X obj 21 156 outlet;
-#X obj 21 120 pointer;
-#X connect 0 0 1 0;
-#X connect 1 0 5 0;
-#X connect 2 0 3 0;
-#X connect 3 0 5 0;
-#X connect 3 1 0 0;
-#X connect 5 0 4 0;
diff --git a/sfruit/ds-dump-array.pd b/sfruit/ds-dump-array.pd
deleted file mode 100644
index f27db40..0000000
--- a/sfruit/ds-dump-array.pd
+++ /dev/null
@@ -1,20 +0,0 @@
-#N canvas 1004 477 263 225 10;
-#X declare -lib list-abs;
-#X declare -lib list-abs;
-#X obj 81 29 inlet;
-#X obj 81 78 getsize \$1 \$2;
-#X obj 81 50 t p p;
-#X obj 81 156 element \$1 \$2;
-#X obj 81 185 outlet;
-#X obj 81 106 list-range;
-#X obj 81 131 list-drip;
-#X obj 132 185 outlet;
-#X obj 140 33 import list-abs;
-#X connect 0 0 2 0;
-#X connect 1 0 5 0;
-#X connect 2 0 1 0;
-#X connect 2 1 3 1;
-#X connect 3 0 4 0;
-#X connect 5 0 6 0;
-#X connect 6 0 3 0;
-#X connect 6 1 7 0;
diff --git a/sfruit/ds-dump-help.pd b/sfruit/ds-dump-help.pd
deleted file mode 100644
index aa8d298..0000000
--- a/sfruit/ds-dump-help.pd
+++ /dev/null
@@ -1,58 +0,0 @@
-#N struct datatemplate float x float y;
-#N canvas 471 25 394 302 10;
-#X text 12 13 Outputs all (input bang) or first n (input float n) pointers
-in a subpatch. Takes a subpatch as its argument.;
-#X obj 55 136 ds-dump pd-\$0data;
-#X obj 55 86 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X text 13 48 Right outlet bangs at end of data.;
-#X obj 55 174 get datatemplate x;
-#N canvas 450 363 128 100 \$0data 1;
-#X scalar datatemplate 10 10 \;;
-#X scalar datatemplate 20 20 \;;
-#X scalar datatemplate 30 30 \;;
-#X scalar datatemplate 40 40 \;;
-#X restore 271 116 pd \$0data;
-#N canvas 10 355 450 300 datatemplate 0;
-#X msg 190 198 traverse pd-\$1data \, bang;
-#X obj 190 224 pointer;
-#X obj 163 128 loadbang;
-#X obj 79 279 append datatemplate x y;
-#X msg 17 208 10 10 \, 20 20 \, 30 30 \, 40 40;
-#X obj 48 18 struct datatemplate float x float y;
-#X obj 48 41 drawpolygon 0 3 0 0 0 10 10 10 10 0 0 0;
-#X obj 144 129 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 190 175 \$0;
-#X obj 163 153 t b b b;
-#X msg 229 153 clear;
-#X obj 229 176 s pd-\$0data;
-#X connect 0 0 1 0;
-#X connect 1 0 3 2;
-#X connect 2 0 9 0;
-#X connect 4 0 3 0;
-#X connect 7 0 9 0;
-#X connect 8 0 0 0;
-#X connect 9 0 4 0;
-#X connect 9 1 8 0;
-#X connect 9 2 10 0;
-#X connect 10 0 11 0;
-#X restore 272 141 pd datatemplate;
-#X obj 55 110 t a b;
-#X obj 55 200 list-extend;
-#X obj 55 224 prepent set;
-#X msg 80 85 2;
-#X text 269 260 2008 Luke Iannini;
-#X text 272 274 proyekto.net;
-#X obj 169 137 bng 15 250 50 0 empty empty end 17 7 0 10 -262144 -1
--1;
-#X msg 55 251;
-#X connect 1 0 4 0;
-#X connect 1 1 13 0;
-#X connect 2 0 7 0;
-#X connect 4 0 8 0;
-#X connect 7 0 1 0;
-#X connect 7 1 8 1;
-#X connect 8 0 9 0;
-#X connect 9 0 14 0;
-#X connect 10 0 7 0;
diff --git a/sfruit/ds-dump-only-help.pd b/sfruit/ds-dump-only-help.pd
deleted file mode 100644
index 3fe50c1..0000000
--- a/sfruit/ds-dump-only-help.pd
+++ /dev/null
@@ -1,84 +0,0 @@
-#N struct datatemplatered float x float y;
-#N struct datatemplateblue float x float y;
-#N canvas 447 356 450 300 10;
-#X obj 55 86 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X text 13 48 Right outlet bangs at end of data.;
-#N canvas 963 339 134 109 \$0data 1;
-#X scalar datatemplatered 30 10 \;;
-#X scalar datatemplatered 40 20 \;;
-#X scalar datatemplatered 50 30 \;;
-#X scalar datatemplatered 60 40 \;;
-#X scalar datatemplateblue 10 10 \;;
-#X scalar datatemplateblue 20 20 \;;
-#X scalar datatemplateblue 30 30 \;;
-#X scalar datatemplateblue 40 40 \;;
-#X restore 321 56 pd \$0data;
-#X obj 55 110 t a b;
-#X obj 55 200 list-extend;
-#X obj 55 224 prepent set;
-#X text 269 260 2008 Luke Iannini;
-#X text 272 274 proyekto.net;
-#X obj 298 142 bng 15 250 50 0 empty empty end 17 7 0 10 -262144 -1
--1;
-#X msg 55 251;
-#N canvas 10 355 450 300 datatemplateblue 0;
-#X msg 190 198 traverse pd-\$1data \, bang;
-#X obj 190 224 pointer;
-#X obj 163 128 loadbang;
-#X msg 17 208 10 10 \, 20 20 \, 30 30 \, 40 40;
-#X obj 144 129 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 190 175 \$0;
-#X msg 229 153 clear;
-#X obj 229 176 s pd-\$0data;
-#X obj 48 18 struct datatemplateblue float x float y;
-#X obj 79 279 append datatemplateblue x y;
-#X obj 48 41 drawpolygon 9 3 0 0 0 10 10 10 10 0 0 0;
-#X obj 163 153 t b b b b;
-#X obj 89 153 s \$0makeRed;
-#X connect 0 0 1 0;
-#X connect 1 0 9 2;
-#X connect 2 0 11 0;
-#X connect 3 0 9 0;
-#X connect 4 0 11 0;
-#X connect 5 0 0 0;
-#X connect 6 0 7 0;
-#X connect 11 0 12 0;
-#X connect 11 1 3 0;
-#X connect 11 2 5 0;
-#X connect 11 3 6 0;
-#X restore 322 81 pd datatemplateblue;
-#N canvas 10 355 450 300 datatemplatered 0;
-#X msg 190 198 traverse pd-\$1data \, bang;
-#X obj 190 224 pointer;
-#X obj 144 129 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 190 175 \$0;
-#X obj 79 279 append datatemplatered x y;
-#X obj 48 18 struct datatemplatered float x float y;
-#X obj 48 41 drawpolygon 900 3 0 0 0 10 10 10 10 0 0 0;
-#X msg 17 208 30 10 \, 40 20 \, 50 30 \, 60 40;
-#X obj 163 152 t b b;
-#X obj 163 128 r \$0makeRed;
-#X connect 0 0 1 0;
-#X connect 1 0 4 2;
-#X connect 2 0 8 0;
-#X connect 3 0 0 0;
-#X connect 7 0 4 0;
-#X connect 8 0 7 0;
-#X connect 8 1 3 0;
-#X connect 9 0 8 0;
-#X restore 322 101 pd datatemplatered;
-#X text 12 13 Outputs all pointers in a subpatch conforming to a specific
-template \, with the rest coming out the middle outlet.;
-#X obj 55 174 get datatemplatered x;
-#X obj 55 141 ds-dump-only pd-\$0data datatemplatered;
-#X connect 0 0 3 0;
-#X connect 3 0 14 0;
-#X connect 3 1 4 1;
-#X connect 4 0 5 0;
-#X connect 5 0 9 0;
-#X connect 13 0 4 0;
-#X connect 14 0 13 0;
-#X connect 14 2 8 0;
diff --git a/sfruit/ds-dump-only.pd b/sfruit/ds-dump-only.pd
deleted file mode 100644
index ce3a454..0000000
--- a/sfruit/ds-dump-only.pd
+++ /dev/null
@@ -1,26 +0,0 @@
-#N canvas 480 22 450 300 10;
-#X declare -lib list-abs;
-#X obj 182 135 until;
-#X msg 182 156 next;
-#X obj 56 90 list append \$1;
-#X obj 56 113 prepent traverse;
-#X obj 56 53 loadbang;
-#X obj 182 22 inlet;
-#X obj 182 242 outlet;
-#X obj 336 242 outlet;
-#X obj 317 40 t b b b;
-#X obj 242 242 outlet;
-#X obj 182 179 pointer \$2;
-#X obj 318 18 import list-abs;
-#X connect 0 0 1 0;
-#X connect 1 0 10 0;
-#X connect 2 0 3 0;
-#X connect 3 0 10 0;
-#X connect 4 0 2 0;
-#X connect 5 0 0 0;
-#X connect 8 0 2 0;
-#X connect 8 1 7 0;
-#X connect 8 2 0 1;
-#X connect 10 0 6 0;
-#X connect 10 1 9 0;
-#X connect 10 2 8 0;
diff --git a/sfruit/ds-dump.pd b/sfruit/ds-dump.pd
deleted file mode 100644
index 43171b9..0000000
--- a/sfruit/ds-dump.pd
+++ /dev/null
@@ -1,27 +0,0 @@
-#N canvas 0 22 450 300 10;
-#X declare -lib list-abs;
-#X obj 182 135 until;
-#X obj 182 179 pointer;
-#X msg 182 156 next;
-#X obj 56 90 list append \$1;
-#X obj 56 113 prepent traverse;
-#X obj 56 53 loadbang;
-#X obj 182 16 inlet;
-#X obj 182 242 outlet;
-#X obj 336 242 outlet;
-#X obj 317 40 t b b b;
-#X obj 182 46 t a b;
-#X obj 293 16 import list-abs;
-#X connect 0 0 2 0;
-#X connect 1 0 7 0;
-#X connect 1 1 9 0;
-#X connect 2 0 1 0;
-#X connect 3 0 4 0;
-#X connect 4 0 1 0;
-#X connect 5 0 3 0;
-#X connect 6 0 10 0;
-#X connect 9 0 3 0;
-#X connect 9 1 8 0;
-#X connect 9 2 0 1;
-#X connect 10 0 0 0;
-#X connect 10 1 3 0;
diff --git a/sfruit/ds-end-help.pd b/sfruit/ds-end-help.pd
deleted file mode 100644
index 085b8fd..0000000
--- a/sfruit/ds-end-help.pd
+++ /dev/null
@@ -1,41 +0,0 @@
-#N struct 1635datatemplate float x float y;
-#N canvas 0 22 450 300 10;
-#N canvas 0 22 450 300 \$0datatemplate 0;
-#X obj 99 58 drawpolygon 90 3 0 0 0 10 10 10 10 0 0 0;
-#X obj 112 95 loadbang;
-#X obj 112 124 t b b b;
-#X msg 188 127 clear;
-#X obj 188 149 s pd-\$0mydata;
-#X msg 112 182 0 0 \, 20 0 \, 40 0;
-#X obj 131 213 ds-begin pd-\$0mydata;
-#X obj 90 247 append \$0datatemplate x y;
-#X obj 94 96 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 99 32 struct \$0datatemplate float x float y;
-#X connect 1 0 2 0;
-#X connect 2 0 5 0;
-#X connect 2 1 6 0;
-#X connect 2 2 3 0;
-#X connect 3 0 4 0;
-#X connect 5 0 7 0;
-#X connect 6 0 7 2;
-#X connect 8 0 2 0;
-#X restore 293 88 pd \$0datatemplate;
-#N canvas 3 345 126 108 \$0mydata 1;
-#X scalar 1635datatemplate 0 0 \;;
-#X scalar 1635datatemplate 20 0 \;;
-#X scalar 1635datatemplate 40 0 \;;
-#X restore 293 110 pd \$0mydata;
-#X obj 50 177 append \$0datatemplate x y;
-#X obj 50 99 t b b;
-#X obj 50 68 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 127 140 ds-end pd-\$0mydata;
-#X msg 50 140 60 0;
-#X text 8 4 Outputs the last pointer in a data structure so that one
-can append after it.;
-#X connect 3 0 6 0;
-#X connect 3 1 5 0;
-#X connect 4 0 3 0;
-#X connect 5 0 2 2;
-#X connect 6 0 2 0;
diff --git a/sfruit/ds-end.pd b/sfruit/ds-end.pd
deleted file mode 100644
index df873b1..0000000
--- a/sfruit/ds-end.pd
+++ /dev/null
@@ -1,26 +0,0 @@
-#N canvas 61 377 261 305 10;
-#X declare -lib list-abs;
-#X obj 139 175 pointer;
-#X obj 139 37 inlet;
-#X obj 100 228 pointer;
-#X obj 32 113 list append \$1;
-#X obj 32 137 prepent traverse;
-#X obj 139 60 t b b b;
-#X obj 139 110 until;
-#X msg 139 140 next;
-#X obj 178 198 t b b;
-#X obj 100 255 outlet;
-#X obj 27 19 import list-abs;
-#X connect 0 0 2 1;
-#X connect 0 1 8 0;
-#X connect 1 0 5 0;
-#X connect 2 0 9 0;
-#X connect 3 0 4 0;
-#X connect 4 0 0 0;
-#X connect 5 0 6 0;
-#X connect 5 1 0 0;
-#X connect 5 2 3 0;
-#X connect 6 0 7 0;
-#X connect 7 0 0 0;
-#X connect 8 0 2 0;
-#X connect 8 1 6 1;
diff --git a/sfruit/ds-first-help.pd b/sfruit/ds-first-help.pd
deleted file mode 100644
index a372af1..0000000
--- a/sfruit/ds-first-help.pd
+++ /dev/null
@@ -1,84 +0,0 @@
-#N struct datatemplatered float x float y;
-#N struct datatemplateblue float x float y;
-#N canvas 0 22 450 300 10;
-#X obj 360 250 ds-first;
-#X obj 55 86 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X text 11 30 Right outlet bangs at end of data.;
-#N canvas 963 339 134 109 \$0data 1;
-#X scalar datatemplatered 30 10 \;;
-#X scalar datatemplatered 40 20 \;;
-#X scalar datatemplatered 50 30 \;;
-#X scalar datatemplatered 60 40 \;;
-#X scalar datatemplateblue 10 10 \;;
-#X scalar datatemplateblue 20 20 \;;
-#X scalar datatemplateblue 30 30 \;;
-#X scalar datatemplateblue 40 40 \;;
-#X restore 321 56 pd \$0data;
-#X obj 55 110 t a b;
-#X obj 55 200 list-extend;
-#X obj 55 224 prepent set;
-#X text 269 260 2008 Luke Iannini;
-#X text 272 274 proyekto.net;
-#X obj 298 142 bng 15 250 50 0 empty empty end 17 7 0 10 -262144 -1
--1;
-#X msg 55 251 30;
-#N canvas 10 355 450 300 datatemplateblue 0;
-#X msg 190 198 traverse pd-\$1data \, bang;
-#X obj 190 224 pointer;
-#X obj 163 128 loadbang;
-#X msg 17 208 10 10 \, 20 20 \, 30 30 \, 40 40;
-#X obj 144 129 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 190 175 \$0;
-#X msg 229 153 clear;
-#X obj 229 176 s pd-\$0data;
-#X obj 48 18 struct datatemplateblue float x float y;
-#X obj 79 279 append datatemplateblue x y;
-#X obj 48 41 drawpolygon 9 3 0 0 0 10 10 10 10 0 0 0;
-#X obj 163 153 t b b b b;
-#X obj 89 153 s \$0makeRed;
-#X connect 0 0 1 0;
-#X connect 1 0 9 2;
-#X connect 2 0 11 0;
-#X connect 3 0 9 0;
-#X connect 4 0 11 0;
-#X connect 5 0 0 0;
-#X connect 6 0 7 0;
-#X connect 11 0 12 0;
-#X connect 11 1 3 0;
-#X connect 11 2 5 0;
-#X connect 11 3 6 0;
-#X restore 322 81 pd datatemplateblue;
-#N canvas 10 355 450 300 datatemplatered 0;
-#X msg 190 198 traverse pd-\$1data \, bang;
-#X obj 190 224 pointer;
-#X obj 144 129 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X obj 190 175 \$0;
-#X obj 79 279 append datatemplatered x y;
-#X obj 48 18 struct datatemplatered float x float y;
-#X obj 48 41 drawpolygon 900 3 0 0 0 10 10 10 10 0 0 0;
-#X msg 17 208 30 10 \, 40 20 \, 50 30 \, 60 40;
-#X obj 163 152 t b b;
-#X obj 163 128 r \$0makeRed;
-#X connect 0 0 1 0;
-#X connect 1 0 4 2;
-#X connect 2 0 8 0;
-#X connect 3 0 0 0;
-#X connect 7 0 4 0;
-#X connect 8 0 7 0;
-#X connect 8 1 3 0;
-#X connect 9 0 8 0;
-#X restore 322 101 pd datatemplatered;
-#X obj 55 174 get datatemplatered x;
-#X text 12 13 Outputs first encountered pointer of a template.;
-#X obj 55 141 ds-first pd-\$0data datatemplatered;
-#X connect 1 0 4 0;
-#X connect 4 0 15 0;
-#X connect 4 1 5 1;
-#X connect 5 0 6 0;
-#X connect 6 0 10 0;
-#X connect 13 0 5 0;
-#X connect 15 0 13 0;
-#X connect 15 1 9 0;
diff --git a/sfruit/ds-first.pd b/sfruit/ds-first.pd
deleted file mode 100644
index 9f02641..0000000
--- a/sfruit/ds-first.pd
+++ /dev/null
@@ -1,29 +0,0 @@
-#N canvas 540 376 450 300 10;
-#X declare -lib list-abs;
-#X obj 182 135 until;
-#X msg 182 156 next;
-#X obj 56 90 list append \$1;
-#X obj 56 113 prepent traverse;
-#X obj 56 53 loadbang;
-#X obj 182 22 inlet;
-#X obj 209 242 outlet;
-#X obj 336 242 outlet;
-#X obj 182 179 pointer \$2;
-#X obj 182 206 t b a;
-#X obj 182 52 t b b;
-#X obj 297 50 t b b;
-#X obj 289 17 import list-abs;
-#X connect 0 0 1 0;
-#X connect 1 0 8 0;
-#X connect 2 0 3 0;
-#X connect 3 0 8 0;
-#X connect 4 0 2 0;
-#X connect 5 0 10 0;
-#X connect 8 0 9 0;
-#X connect 8 2 11 0;
-#X connect 9 0 11 0;
-#X connect 9 1 6 0;
-#X connect 10 0 0 0;
-#X connect 10 1 2 0;
-#X connect 11 0 7 0;
-#X connect 11 1 0 1;
diff --git a/sfruit/ds-get-list.pd b/sfruit/ds-get-list.pd
deleted file mode 100644
index b1d4a0e..0000000
--- a/sfruit/ds-get-list.pd
+++ /dev/null
@@ -1,70 +0,0 @@
-#N canvas 539 101 566 566 10;
-#X declare -lib list-abs;
-#X declare -lib iemlib -lib list-abs;
-#N canvas 936 317 494 366 builder 1;
-#X obj 182 56 dollarg;
-#X obj 182 30 initbang;
-#X obj 209 277 s \$0self;
-#N canvas 381 63 155 275 makepack 0;
-#X obj 11 26 inlet;
-#X obj 32 99 until;
-#X obj 32 155 list-extend;
-#X msg 95 100 pack;
-#X msg 32 127 f;
-#X obj 11 182 list;
-#X obj 11 73 t b a b;
-#X obj 11 208 list prepend obj 10 200;
-#X obj 11 238 list trim;
-#X obj 11 269 outlet;
-#X connect 0 0 6 0;
-#X connect 1 0 4 0;
-#X connect 2 0 5 1;
-#X connect 3 0 2 1;
-#X connect 4 0 2 0;
-#X connect 5 0 7 0;
-#X connect 6 0 5 0;
-#X connect 6 1 1 0;
-#X connect 6 2 3 0;
-#X connect 7 0 8 0;
-#X connect 8 0 9 0;
-#X restore 131 164 pd makepack;
-#X msg 221 114 obj 10 10 inlet;
-#X msg 111 185 obj 10 300 outlet;
-#X obj 126 104 - 1;
-#X text 304 73 first arg is template;
-#X obj 126 82 f;
-#X obj 92 141 t a b a;
-#X obj 182 82 t b a b;
-#X msg -10 168 connect 2 0 3 0;
-#X obj 34 200 list-range;
-#X obj 34 221 list-drip;
-#X msg 34 252 connect 3 \$1 4 \$1;
-#X msg -6 282 connect 4 0 5 0;
-#X obj 202 158 list trim;
-#X obj 202 135 list prepend obj 10 100 get;
-#X obj 310 29 import iemlib list-abs;
-#X connect 0 0 10 0;
-#X connect 0 1 8 1;
-#X connect 1 0 0 0;
-#X connect 3 0 2 0;
-#X connect 4 0 2 0;
-#X connect 5 0 2 0;
-#X connect 6 0 9 0;
-#X connect 8 0 6 0;
-#X connect 9 0 12 0;
-#X connect 9 0 11 0;
-#X connect 9 0 15 0;
-#X connect 9 1 5 0;
-#X connect 9 2 3 0;
-#X connect 10 0 8 0;
-#X connect 10 1 17 0;
-#X connect 10 2 4 0;
-#X connect 11 0 2 0;
-#X connect 12 0 13 0;
-#X connect 13 0 14 0;
-#X connect 14 0 2 0;
-#X connect 15 0 2 0;
-#X connect 16 0 2 0;
-#X connect 17 0 16 0;
-#X restore 311 39 pd builder;
-#X obj 310 16 namecanvas \$0self;
diff --git a/sfruit/ds-idx-only-help.pd b/sfruit/ds-idx-only-help.pd
deleted file mode 100644
index 02f3c23..0000000
--- a/sfruit/ds-idx-only-help.pd
+++ /dev/null
@@ -1,23 +0,0 @@
-#N canvas 0 22 450 300 10;
-#X text 16 11 ds-idx-only;
-#X text 274 254 2008 Luke Iannini;
-#X obj 105 89 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X text 123 88 bang for last used index;
-#X msg 54 88 10;
-#X obj 54 126 ds-idx-only pd-\$0data datatemplate5 3;
-#X obj 273 153 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
--1 -1;
-#X text 16 35 outputs the nth pointer of a certain template type \,
-or a bang from the right outlet if the nth pointer does not exist.
-;
-#X obj 54 170 get datatemplate5 x;
-#X obj 70 198 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X floatatom 54 223 5 0 0 0 - - -;
-#X connect 2 0 5 0;
-#X connect 4 0 5 0;
-#X connect 5 0 8 0;
-#X connect 5 1 6 0;
-#X connect 8 0 9 0;
-#X connect 8 0 10 0;
diff --git a/sfruit/ds-idx-only.pd b/sfruit/ds-idx-only.pd
deleted file mode 100644
index cf1a76f..0000000
--- a/sfruit/ds-idx-only.pd
+++ /dev/null
@@ -1,58 +0,0 @@
-#N canvas 869 295 378 463 10;
-#X declare -lib list-abs -lib iemlib;
-#X obj 197 233 sel \$3;
-#X obj 197 210 f;
-#X obj 221 210 + 1;
-#X obj 116 289 pointer;
-#X obj 162 346 once;
-#X msg 183 325 reset;
-#X obj 162 426 outlet;
-#X obj 240 75 list append \$1;
-#X obj 240 98 prepent traverse;
-#X msg 212 187 0;
-#X obj 38 85 until;
-#X msg 38 109 next;
-#X obj 127 102 t b;
-#X obj 224 161 route bang;
-#X obj 38 131 pointer \$2;
-#X obj 144 8 inlet;
-#X obj 128 172 t b p;
-#X obj 197 255 t b b;
-#X obj 183 138 t b b a;
-#X obj 144 37 t b b a;
-#X obj 127 80 r \$0stop;
-#X obj 224 278 s \$0stop;
-#X obj 162 375 route bang;
-#X obj 232 426 outlet;
-#X obj 206 17 import list-abs iemlib;
-#X connect 0 0 17 0;
-#X connect 1 0 2 0;
-#X connect 1 0 0 0;
-#X connect 2 0 1 1;
-#X connect 3 0 4 0;
-#X connect 4 0 22 0;
-#X connect 5 0 4 1;
-#X connect 7 0 8 0;
-#X connect 8 0 14 0;
-#X connect 9 0 1 1;
-#X connect 10 0 11 0;
-#X connect 11 0 14 0;
-#X connect 12 0 10 1;
-#X connect 13 1 0 1;
-#X connect 14 0 16 0;
-#X connect 14 2 12 0;
-#X connect 14 2 4 0;
-#X connect 15 0 19 0;
-#X connect 16 0 1 0;
-#X connect 16 1 3 1;
-#X connect 17 0 3 0;
-#X connect 17 1 21 0;
-#X connect 18 0 5 0;
-#X connect 18 1 9 0;
-#X connect 18 2 13 0;
-#X connect 19 0 10 0;
-#X connect 19 1 7 0;
-#X connect 19 2 18 0;
-#X connect 20 0 12 0;
-#X connect 22 0 23 0;
-#X connect 22 1 6 0;
diff --git a/sfruit/ds-idx.pd b/sfruit/ds-idx.pd
deleted file mode 100644
index d6955f1..0000000
--- a/sfruit/ds-idx.pd
+++ /dev/null
@@ -1,36 +0,0 @@
-#N canvas 692 40 319 298 10;
-#X declare -lib list-abs;
-#X obj 64 28 inlet;
-#X obj 166 134 list append \$1;
-#X obj 166 157 prepent traverse;
-#X obj 64 56 t a b;
-#X obj 103 195 pointer;
-#X obj 64 234 pointer;
-#X msg 103 170 next;
-#X obj 103 136 until;
-#X obj 64 92 t b a;
-#X obj 64 261 outlet;
-#X obj 142 262 outlet;
-#X obj 142 234 t b b;
-#X obj 136 87 list append \$1;
-#X obj 91 114 spigot 1;
-#X obj 136 65 loadbang;
-#X text 192 69 until protection;
-#X obj 146 34 import list-abs;
-#X connect 0 0 3 0;
-#X connect 1 0 2 0;
-#X connect 2 0 4 0;
-#X connect 3 0 8 0;
-#X connect 3 1 1 0;
-#X connect 4 0 5 1;
-#X connect 4 1 11 0;
-#X connect 5 0 9 0;
-#X connect 6 0 4 0;
-#X connect 7 0 6 0;
-#X connect 8 0 5 0;
-#X connect 8 1 13 0;
-#X connect 11 0 10 0;
-#X connect 11 1 7 1;
-#X connect 12 0 13 1;
-#X connect 13 0 7 0;
-#X connect 14 0 12 0;
diff --git a/sfruit/ds-next-element.pd b/sfruit/ds-next-element.pd
deleted file mode 100644
index 43c7d4b..0000000
--- a/sfruit/ds-next-element.pd
+++ /dev/null
@@ -1,154 +0,0 @@
-#N canvas 453 22 467 768 10;
-#X declare -lib iemlib;
-#X obj 133 259 f;
-#X obj 160 259 + 1;
-#X obj 133 237 until;
-#X obj 118 701 once;
-#X obj 199 603 t a;
-#X obj 133 579 &&;
-#X obj 160 327 + 1;
-#X obj 133 640 f;
-#X obj 133 600 sel 1;
-#X obj 91 9 inlet;
-#X obj 170 527 r \$0findValue;
-#X obj 137 30 s \$0findValue;
-#X msg 148 215 0;
-#X obj 118 736 outlet;
-#X obj 91 73 t p p;
-#X obj 133 552 <=;
-#X obj 160 552 >;
-#X obj 133 306 t a a;
-#X obj 133 665 t a b;
-#X obj 172 665 s \$0stopLooking;
-#X obj 170 237 r \$0stopLooking;
-#X obj 160 346 t a a a;
-#X obj 296 554 sel 1;
-#X obj 296 382 >;
-#X obj 311 358 - 1;
-#X obj 91 116 sel 1;
-#X obj 137 74 s \$0pointer;
-#X obj 225 404 r \$0pointer;
-#X obj 133 281 sel 0;
-#X obj 245 467 t a b;
-#N canvas 0 22 448 336 earliest? 0;
-#X obj 82 74 inlet;
-#X obj 157 97 r \$0pointer;
-#X msg 82 100 0;
-#X obj 97 178 r \$0findValue;
-#X obj 82 206 >;
-#X obj 82 232 sel 1;
-#X obj 129 294 outlet;
-#X msg 129 270 0;
-#X msg 55 270 0;
-#X obj 55 294 outlet;
-#X obj 82 129 element \$1 \$2;
-#X obj 82 154 get \$3 \$4;
-#X connect 0 0 2 0;
-#X connect 1 0 10 1;
-#X connect 2 0 10 0;
-#X connect 3 0 4 1;
-#X connect 4 0 5 0;
-#X connect 5 0 7 0;
-#X connect 5 1 8 0;
-#X connect 7 0 6 0;
-#X connect 8 0 9 0;
-#X connect 10 0 11 0;
-#X connect 11 0 4 0;
-#X restore 174 293 pd earliest?;
-#X obj 272 513 s \$0stopLooking;
-#X obj 245 642 t a;
-#N canvas 848 394 186 293 first 0;
-#X obj 13 10 inlet;
-#X obj 88 41 r \$0pointer;
-#X obj 27 252 outlet;
-#X obj 13 90 t p p;
-#X obj 28 139 r \$0findValue;
-#X obj 13 188 sel 1;
-#X obj 13 162 >;
-#X msg 13 43 0;
-#X msg 13 218 0;
-#X msg 40 218 1;
-#X obj 13 115 get \$3 \$4;
-#X obj 13 68 element \$1 \$2;
-#X connect 0 0 7 0;
-#X connect 1 0 11 1;
-#X connect 3 0 10 0;
-#X connect 4 0 6 1;
-#X connect 5 0 8 0;
-#X connect 5 1 9 0;
-#X connect 6 0 5 0;
-#X connect 7 0 11 0;
-#X connect 8 0 2 0;
-#X connect 9 0 2 0;
-#X connect 10 0 6 0;
-#X connect 11 0 3 0;
-#X restore 18 372 pd first;
-#X obj 91 96 getsize \$1 \$2;
-#X obj 160 434 element \$1 \$2;
-#X obj 133 481 element \$1 \$2;
-#X obj 160 453 get \$3 \$4;
-#X obj 133 504 get \$3 \$4;
-#X text 240 48 takes a pointer to an array;
-#X obj 200 147 s \$0reset;
-#X obj 118 147 t b a b a b;
-#X obj 151 701 r \$0reset;
-#X obj 315 34 inlet;
-#X obj 91 51 pointer;
-#X obj 91 30 t b a;
-#X obj 282 128 import iemlib;
-#X connect 0 0 1 0;
-#X connect 0 0 28 0;
-#X connect 1 0 0 1;
-#X connect 2 0 0 0;
-#X connect 3 0 13 0;
-#X connect 4 0 7 1;
-#X connect 5 0 8 0;
-#X connect 6 0 21 0;
-#X connect 7 0 18 0;
-#X connect 8 0 7 0;
-#X connect 9 0 45 0;
-#X connect 10 0 15 1;
-#X connect 10 0 16 1;
-#X connect 12 0 0 1;
-#X connect 14 0 34 0;
-#X connect 14 1 26 0;
-#X connect 15 0 5 0;
-#X connect 16 0 5 1;
-#X connect 17 0 36 0;
-#X connect 17 1 6 0;
-#X connect 18 0 3 0;
-#X connect 18 1 19 0;
-#X connect 20 0 2 1;
-#X connect 21 0 35 0;
-#X connect 21 1 23 0;
-#X connect 21 2 4 0;
-#X connect 22 0 7 0;
-#X connect 23 0 22 0;
-#X connect 24 0 23 1;
-#X connect 25 0 33 0;
-#X connect 25 1 41 0;
-#X connect 27 0 35 1;
-#X connect 27 0 36 1;
-#X connect 28 0 30 0;
-#X connect 28 1 17 0;
-#X connect 29 0 32 0;
-#X connect 29 1 31 0;
-#X connect 30 0 17 0;
-#X connect 30 1 29 0;
-#X connect 32 0 3 0;
-#X connect 33 0 13 0;
-#X connect 34 0 25 0;
-#X connect 35 0 37 0;
-#X connect 36 0 38 0;
-#X connect 37 0 16 0;
-#X connect 38 0 15 0;
-#X connect 41 0 3 0;
-#X connect 41 1 2 0;
-#X connect 41 2 12 0;
-#X connect 41 3 24 0;
-#X connect 41 4 40 0;
-#X connect 42 0 3 1;
-#X connect 43 0 44 1;
-#X connect 44 0 14 0;
-#X connect 45 0 44 0;
-#X connect 45 1 11 0;
diff --git a/sfruit/ds-raise-help.pd b/sfruit/ds-raise-help.pd
deleted file mode 100644
index 224b183..0000000
--- a/sfruit/ds-raise-help.pd
+++ /dev/null
@@ -1,7 +0,0 @@
-#N canvas 796 410 318 141 10;
-#X obj 23 104 ds-raise pd-myData myTemplate;
-#X text 7 4 [ds-raise] - hack to bring the first template in a datastructure
-to the top;
-#X obj 23 83 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X connect 2 0 0 0;
diff --git a/sfruit/ds-raise.pd b/sfruit/ds-raise.pd
deleted file mode 100644
index c51b952..0000000
--- a/sfruit/ds-raise.pd
+++ /dev/null
@@ -1,11 +0,0 @@
-#N canvas 814 246 126 152 10;
-#X obj 12 58 t p p;
-#X obj 12 34 ds-first \$1 \$2;
-#X obj 12 82 get \$2 x;
-#X obj 12 107 set \$2 x;
-#X obj 12 10 inlet;
-#X connect 0 0 2 0;
-#X connect 0 1 3 1;
-#X connect 1 0 0 0;
-#X connect 2 0 3 0;
-#X connect 4 0 1 0;
diff --git a/sfruit/ds-select-help.pd b/sfruit/ds-select-help.pd
deleted file mode 100644
index 1143418..0000000
--- a/sfruit/ds-select-help.pd
+++ /dev/null
@@ -1,39 +0,0 @@
-#N canvas 1 22 450 300 10;
-#N canvas 0 22 450 300 \$0data 0;
-#X restore 313 163 pd \$0data;
-#N canvas 535 125 450 300 createdata 0;
-#X obj 212 101 \$0;
-#X msg 212 125 traverse pd-\$1data \, bang;
-#X obj 212 148 pointer;
-#X obj 23 181 append \$0mytemplate x y velocity;
-#X obj 23 23 loadbang;
-#X obj 23 44 t b b;
-#X msg 23 116 50 60 70;
-#X connect 0 0 1 0;
-#X connect 1 0 2 0;
-#X connect 2 0 3 3;
-#X connect 4 0 5 0;
-#X connect 5 0 6 0;
-#X connect 5 1 0 0;
-#X connect 6 0 3 0;
-#X restore 312 199 pd createdata;
-#N canvas 479 22 359 135 \$0mytemplate 0;
-#X obj 17 18 struct \$0mytemplate float x float y float velocity;
-#X obj 17 48 drawpolygon 900 1 0 0 0 10 10 10 10 0 0 0;
-#X restore 312 136 pd \$0mytemplate;
-#X obj 19 129 ds-dump pd-\$0data;
-#X obj 19 91 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
--1;
-#X obj 19 163 ds-select \$0mytemplate velocity 52;
-#X obj 19 188 get \$0mytemplate x y;
-#X floatatom 19 218 5 0 0 0 - - -;
-#X floatatom 136 218 5 0 0 0 - - -;
-#X text 7 5 [ds-select] outputs pointers to elements whose attribute
-value matches its arguments. Non-matching pointers are sent to the
-right outlet. Call like [ds-select <template> <attribute> *<value>]
-*optional. The value can also be set by the right inlet.;
-#X connect 3 0 5 0;
-#X connect 4 0 3 0;
-#X connect 5 0 6 0;
-#X connect 6 0 7 0;
-#X connect 6 1 8 0;
diff --git a/sfruit/ds-select.pd b/sfruit/ds-select.pd
deleted file mode 100644
index dd6c7b5..0000000
--- a/sfruit/ds-select.pd
+++ /dev/null
@@ -1,22 +0,0 @@
-#N canvas 319 364 368 277 10;
-#X obj 145 119 get \$1 \$2;
-#X obj 145 162 sel \$3;
-#X obj 278 31 inlet;
-#X obj 73 238 outlet;
-#X obj 73 119 pointer;
-#X obj 145 31 inlet;
-#X obj 145 55 t a a;
-#X obj 243 238 outlet;
-#X obj 178 185 t b;
-#X obj 243 119 pointer;
-#X connect 0 0 1 0;
-#X connect 1 0 4 0;
-#X connect 1 1 8 0;
-#X connect 2 0 1 1;
-#X connect 4 0 3 0;
-#X connect 5 0 6 0;
-#X connect 6 0 0 0;
-#X connect 6 1 4 1;
-#X connect 6 1 9 1;
-#X connect 8 0 9 0;
-#X connect 9 0 7 0;