From 952e8c6b3b042993edcf42dd250dcea80fe41430 Mon Sep 17 00:00:00 2001
From: Luke Iannini <lukeiannini@users.sourceforge.net>
Date: Thu, 30 Apr 2009 10:58:10 +0000
Subject: added ds-sort-array

svn path=/trunk/abstractions/sfruit/; revision=11204
---
 ds-abs/ds-sort-array.pd | 79 +++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 79 insertions(+)
 create mode 100644 ds-abs/ds-sort-array.pd

(limited to 'ds-abs/ds-sort-array.pd')

diff --git a/ds-abs/ds-sort-array.pd b/ds-abs/ds-sort-array.pd
new file mode 100644
index 0000000..44a6bcf
--- /dev/null
+++ b/ds-abs/ds-sort-array.pd
@@ -0,0 +1,79 @@
+#N canvas 6 348 683 800 10;
+#X obj 167 498 list split;
+#X obj 167 400 list-drip;
+#X text 169 372 outputs indices;
+#X obj 167 427 t b a;
+#X obj 167 471 list;
+#X obj 167 304 list-extend;
+#X obj 248 304 list-extend;
+#X obj 146 334 list;
+#X obj 167 244 t a a;
+#X obj 266 265 r \$0-reset_sort;
+#X obj 239 563 r \$0-reset_sort;
+#X obj 194 601 f;
+#X obj 220 601 + 1;
+#X msg 209 563 0;
+#X obj 167 563 t a b;
+#X obj 167 275 list-idx 0;
+#X obj 146 230 t b;
+#X obj 182 342 r \$0-sort_direction;
+#X obj 146 358 sort;
+#X obj 398 695 outlet sort_finished;
+#X obj 164 694 outlet data-list;
+#X obj 354 106 inlet sortable-lists;
+#X text 234 643 template arrayname;
+#X obj 224 106 inlet sort_by_index;
+#X obj 381 154 list length;
+#X obj 354 129 t a a;
+#X obj 381 181 s \$0-number_of_fields;
+#X obj 250 471 r \$0-number_of_fields;
+#X text 380 200 sortable lists must all be the same length;
+#X obj 224 471 *;
+#X obj 167 527 list split;
+#X obj 239 528 r \$0-number_of_fields;
+#X obj 276 400 s \$0-reset_sort;
+#X obj 238 400 t b b;
+#X obj 146 145 route bang;
+#X obj 203 168 route direction;
+#X obj 203 192 s \$0-sort_direction;
+#X obj 146 107 inlet sort;
+#X obj 287 694 outlet element;
+#X connect 0 1 30 0;
+#X connect 1 0 3 0;
+#X connect 1 1 33 0;
+#X connect 3 0 4 0;
+#X connect 3 1 29 0;
+#X connect 4 0 0 0;
+#X connect 5 0 7 1;
+#X connect 6 0 4 1;
+#X connect 7 0 18 0;
+#X connect 8 0 15 0;
+#X connect 8 1 6 0;
+#X connect 9 0 5 1;
+#X connect 9 0 6 1;
+#X connect 10 0 13 0;
+#X connect 11 0 12 0;
+#X connect 11 0 38 0;
+#X connect 12 0 11 1;
+#X connect 13 0 11 1;
+#X connect 14 0 20 0;
+#X connect 14 1 11 0;
+#X connect 15 0 5 0;
+#X connect 16 0 7 0;
+#X connect 17 0 18 1;
+#X connect 18 1 1 0;
+#X connect 21 0 25 0;
+#X connect 23 0 15 1;
+#X connect 24 0 26 0;
+#X connect 25 0 8 0;
+#X connect 25 1 24 0;
+#X connect 27 0 29 1;
+#X connect 29 0 0 1;
+#X connect 30 0 14 0;
+#X connect 31 0 30 1;
+#X connect 33 0 19 0;
+#X connect 33 1 32 0;
+#X connect 34 0 16 0;
+#X connect 34 1 35 0;
+#X connect 35 0 36 0;
+#X connect 37 0 34 0;
-- 
cgit v1.2.1