cleaned up code for mtx_qhull

svn path=/trunk/externals/iem/iemmatrix/; revision=16183

1 files changed, 114 insertions, 62 deletions

diff --git a/src/mtx_qhull/test_write_conv_hull_obj.pd b/src/mtx_qhull/test_write_conv_hull_obj.pd
index 49d5af3..1b6aa39 100644
--- a/src/mtx_qhull/test_write_conv_hull_obj.pd
+++ b/src/mtx_qhull/test_write_conv_hull_obj.pd
@@ -83,7 +83,7 @@
 #X obj -9 358 color 0.9 0.9 0.9;
 #X obj 335 426 mtx_* 1.5;
 #X obj -10 338 ortho;
-#X obj 137 309 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj 137 309 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X obj 112 358 f;
 #X obj 167 358 % 360;
@@ -113,12 +113,10 @@
 1;
 #X obj 71 180 t b f;
 #X msg 190 85 9 180;
-#X msg 48 70 1.5 6;
 #X msg 97 66 2 14;
 #X msg 46 88 2.5 12;
 #X floatatom 323 249 5 0 0 0 - - -;
 #X obj 317 269 t b f;
-#X obj 237 319 mtx_qhull 500;
 #X msg -123 202 read Rls.mtx \, bang;
 #X msg 100 85 2.5 20;
 #X obj 107 239 mtx_size;
@@ -183,12 +181,12 @@
 #X obj -103 229 t a a;
 #X obj -103 250 mtx_size;
 #X obj -101 293 mtx_*;
-#X obj -32 342 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+#X obj -32 342 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 0
 1;
 #X msg 251 5 matrix 4 3 0 0 0 1 0 0 2 0 0 0 1 0;
-#X obj -99 8 metro 100;
-#X obj -94 -12 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
-1;
+#X obj -115 -11 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1
+0 1;
+#N canvas 547 27 715 363 combine_objects 1;
 #X obj -127 48 mtx;
 #X obj -124 69 t a a;
 #X obj -74 31 mtx_size;
@@ -198,13 +196,81 @@
 #X obj -86 175 mtx_+;
 #X obj -41 175 mtx_* 0.94;
 #X obj -89 152 mtx_* 0.06;
-#X floatatom -27 -10 5 0 0 0 - - -;
 #X obj -67 92 mtx_* -2;
-#X obj -55 110 mtx_+ 1;
-#X obj -40 130 mtx_* 0.3;
-#X floatatom 19 36 5 0 0 0 - - -;
-#X obj 23 16 hsl 128 15 0 3 0 0 empty empty empty -2 -8 0 10 -262144
+#X obj -37 131 mtx_* 0.3;
+#X obj -99 8 metro 38;
+#X obj 264 5 inlet;
+#X obj -100 -13 inlet;
+#X obj -81 256 outlet;
+#X obj 204 2 inlet;
+#X obj 87 106 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj -52 112 mtx_+ 1;
+#X obj 73 225 mtx_concat;
+#X obj 56 63;
+#X obj 150 205 mtx_* 1;
+#X obj 78 204 mtx;
+#X obj 270 127 max 0.1;
+#X obj 238 46 t b f;
+#X obj 271 82 f;
+#X obj 192 64 delay 50;
+#X obj 243 106 t b b f;
+#X msg 434 97 4 40;
+#X obj 166 178 mtx;
+#X msg 473 99 9 180;
+#X msg 326 138 read designsN/N\$1_\$2.mtx;
+#X msg 374 75 1 4;
+#X msg 373 104 1.5 6;
+#X obj 380 51 loadbang;
+#X connect 0 0 1 0;
+#X connect 1 0 5 0;
+#X connect 1 1 2 0;
+#X connect 2 0 3 0;
+#X connect 2 1 3 1;
+#X connect 3 0 4 0;
+#X connect 4 0 9 0;
+#X connect 5 0 8 0;
+#X connect 6 0 7 0;
+#X connect 6 0 14 0;
+#X connect 7 0 6 1;
+#X connect 8 0 6 0;
+#X connect 9 0 17 0;
+#X connect 10 0 5 1;
+#X connect 11 0 0 0;
+#X connect 12 0 23 0;
+#X connect 13 0 11 0;
+#X connect 15 0 0 1;
+#X connect 15 0 7 0;
+#X connect 15 0 21 1;
+#X connect 16 0 0 0;
+#X connect 17 0 10 0;
+#X connect 18 0 14 0;
+#X connect 20 0 18 1;
+#X connect 21 0 18 0;
+#X connect 22 0 20 1;
+#X connect 23 0 25 0;
+#X connect 23 1 24 1;
+#X connect 24 0 26 0;
+#X connect 25 0 24 0;
+#X connect 26 0 21 0;
+#X connect 26 1 28 0;
+#X connect 26 2 22 0;
+#X connect 27 0 30 0;
+#X connect 28 0 20 0;
+#X connect 29 0 30 0;
+#X connect 30 0 28 0;
+#X connect 31 0 30 0;
+#X connect 32 0 30 0;
+#X connect 33 0 31 0;
+#X restore -108 23 pd combine_objects;
+#X obj -95 -12 hsl 128 15 0 3 0 0 empty empty empty -2 -8 0 10 -262144
 -1 -1 0 1;
+#X msg 48 69 1.5 6;
+#X floatatom 58 14 5 0 0 0 - - -;
+#X msg 20 46 0.573;
+#X obj 236 316 mtx_qhull;
+#X floatatom 302 333 5 0 0 0 - - -;
+#X obj 441 382 mtx_print;
 #X connect 1 0 2 0;
 #X connect 2 0 1 0;
 #X connect 3 0 4 0;
@@ -248,10 +314,9 @@
 #X connect 35 0 37 0;
 #X connect 36 0 37 0;
 #X connect 37 0 38 0;
-#X connect 38 0 52 0;
-#X connect 38 0 73 1;
-#X connect 38 0 80 0;
-#X connect 39 0 48 0;
+#X connect 38 0 50 0;
+#X connect 38 0 70 1;
+#X connect 39 0 75 0;
 #X connect 39 1 32 0;
 #X connect 40 0 41 0;
 #X connect 41 0 38 0;
@@ -259,51 +324,38 @@
 #X connect 42 0 37 0;
 #X connect 43 0 37 0;
 #X connect 44 0 37 0;
-#X connect 45 0 37 0;
-#X connect 46 0 47 0;
+#X connect 45 0 46 0;
+#X connect 46 0 38 0;
+#X connect 46 1 75 0;
 #X connect 47 0 38 0;
-#X connect 47 1 48 0;
-#X connect 48 0 27 0;
-#X connect 49 0 38 0;
-#X connect 50 0 37 0;
-#X connect 51 0 53 0;
-#X connect 52 0 10 0;
-#X connect 52 1 33 0;
-#X connect 52 2 51 0;
-#X connect 53 0 54 0;
-#X connect 54 0 55 0;
-#X connect 57 0 38 0;
-#X connect 59 0 62 0;
-#X connect 60 0 38 0;
-#X connect 61 0 60 1;
-#X connect 62 0 60 0;
-#X connect 62 1 61 0;
-#X connect 63 0 38 0;
-#X connect 64 0 59 0;
-#X connect 65 0 68 0;
-#X connect 66 0 67 0;
-#X connect 66 1 68 1;
-#X connect 67 0 65 0;
-#X connect 68 0 52 0;
-#X connect 69 0 14 0;
-#X connect 70 0 38 0;
+#X connect 48 0 37 0;
+#X connect 49 0 51 0;
+#X connect 50 0 10 0;
+#X connect 50 1 33 0;
+#X connect 50 2 49 0;
+#X connect 51 0 52 0;
+#X connect 52 0 53 0;
+#X connect 55 0 38 0;
+#X connect 57 0 60 0;
+#X connect 58 0 38 0;
+#X connect 59 0 58 1;
+#X connect 60 0 58 0;
+#X connect 60 1 59 0;
+#X connect 61 0 38 0;
+#X connect 62 0 57 0;
+#X connect 63 0 66 0;
+#X connect 64 0 65 0;
+#X connect 64 1 66 1;
+#X connect 65 0 63 0;
+#X connect 66 0 50 0;
+#X connect 67 0 14 0;
+#X connect 68 0 38 0;
+#X connect 69 0 70 0;
+#X connect 70 0 50 0;
+#X connect 71 0 70 2;
 #X connect 71 0 73 0;
-#X connect 72 0 71 0;
-#X connect 73 0 74 0;
-#X connect 74 0 78 0;
-#X connect 74 1 75 0;
-#X connect 75 0 76 0;
-#X connect 75 1 76 1;
-#X connect 76 0 77 0;
-#X connect 77 0 83 0;
-#X connect 78 0 81 0;
-#X connect 79 0 52 0;
-#X connect 79 0 80 0;
-#X connect 80 0 79 1;
-#X connect 81 0 79 0;
-#X connect 82 0 71 1;
-#X connect 83 0 84 0;
-#X connect 84 0 85 0;
-#X connect 85 0 78 1;
-#X connect 86 0 85 1;
-#X connect 87 0 86 0;
+#X connect 72 0 37 0;
+#X connect 74 0 70 2;
+#X connect 75 0 27 0;
+#X connect 75 0 77 0;
+#X connect 75 1 76 0;