added [absgn~] as external (written by tim blechmann) and abstraction

the main purpose of this external is speed

svn path=/trunk/externals/zexy/; revision=4364

1 files changed, 55 insertions, 44 deletions

diff --git a/examples/sigbinops+.pd b/examples/sigbinops+.pd
index 1223ffc..93bbf8d 100644
--- a/examples/sigbinops+.pd
+++ b/examples/sigbinops+.pd
@@ -1,61 +1,67 @@
 #N canvas 470 149 594 490 10;
 #X obj 62 193 abs~;
 #X obj 120 194 sgn~;
-#X obj 262 191 <~;
-#X obj 296 190 ==~;
-#X obj 330 191 >~;
-#X obj 388 190 &&~;
-#X obj 423 190 ||~;
-#X floatatom 423 238 0 0 0 0 - - -;
-#X floatatom 388 238 0 0 0 0 - - -;
-#X floatatom 330 239 0 0 0 0 - - -;
-#X floatatom 296 239 0 0 0 0 - - -;
+#X obj 342 191 <~;
+#X obj 376 190 ==~;
+#X obj 410 191 >~;
+#X obj 468 190 &&~;
+#X obj 503 190 ||~;
+#X floatatom 503 238 0 0 0 0 - - -;
+#X floatatom 468 238 0 0 0 0 - - -;
+#X floatatom 410 239 0 0 0 0 - - -;
+#X floatatom 376 239 0 0 0 0 - - -;
 #X floatatom 120 242 0 0 0 0 - - -;
 #X floatatom 62 243 0 0 0 0 - - -;
 #X obj 62 221 avg~;
 #X obj 120 220 avg~;
-#X floatatom 262 239 0 0 0 0 - - -;
-#X obj 262 217 avg~;
-#X obj 296 216 avg~;
-#X obj 330 216 avg~;
-#X obj 388 216 avg~;
-#X obj 423 216 avg~;
+#X floatatom 342 239 0 0 0 0 - - -;
+#X obj 342 217 avg~;
+#X obj 376 216 avg~;
+#X obj 410 216 avg~;
+#X obj 468 216 avg~;
+#X obj 503 216 avg~;
 #X obj 62 163 sig~;
 #X floatatom 62 141 0 0 0 0 - - -;
-#X obj 330 126 sig~;
-#X floatatom 330 104 0 0 0 0 - - -;
-#X obj 404 126 sig~;
-#X floatatom 404 104 0 0 0 0 - - -;
-#X floatatom 440 448 0 0 0 0 - - -;
-#X floatatom 400 448 0 0 0 0 - - -;
-#X floatatom 349 448 0 0 0 0 - - -;
-#X floatatom 308 449 0 0 0 0 - - -;
-#X floatatom 274 449 0 0 0 0 - - -;
-#X obj 274 427 avg~;
-#X obj 308 426 avg~;
-#X obj 349 425 avg~;
-#X obj 400 426 avg~;
-#X obj 440 426 avg~;
-#X obj 349 337 sig~;
-#X floatatom 349 315 0 0 0 0 - - -;
-#X floatatom 430 316 0 0 0 0 - - -;
-#X obj 274 401 <~ 2;
-#X obj 308 400 ==~ 2;
-#X obj 349 400 >~ 2;
-#X obj 400 400 &&~ 2;
-#X obj 440 400 ||~ 2;
+#X obj 410 126 sig~;
+#X floatatom 410 104 0 0 0 0 - - -;
+#X obj 484 126 sig~;
+#X floatatom 484 104 0 0 0 0 - - -;
+#X floatatom 520 448 0 0 0 0 - - -;
+#X floatatom 480 448 0 0 0 0 - - -;
+#X floatatom 429 448 0 0 0 0 - - -;
+#X floatatom 388 449 0 0 0 0 - - -;
+#X floatatom 354 449 0 0 0 0 - - -;
+#X obj 354 427 avg~;
+#X obj 388 426 avg~;
+#X obj 429 425 avg~;
+#X obj 480 426 avg~;
+#X obj 520 426 avg~;
+#X obj 429 337 sig~;
+#X floatatom 429 315 0 0 0 0 - - -;
+#X floatatom 510 316 0 0 0 0 - - -;
+#X obj 354 401 <~ 2;
+#X obj 388 400 ==~ 2;
+#X obj 429 400 >~ 2;
+#X obj 480 400 &&~ 2;
+#X obj 520 400 ||~ 2;
 #X text 83 30 more math and binary operations for signals;
 #X text 28 263 absolute;
 #X text 50 278 value;
 #X text 112 263 signum;
-#X text 249 267 greater;
-#X text 330 268 less;
-#X text 296 284 equal;
-#X text 393 261 logical;
-#X text 386 274 AND;
-#X text 431 274 OR;
+#X text 329 267 greater;
+#X text 410 268 less;
+#X text 376 284 equal;
+#X text 473 261 logical;
+#X text 466 274 AND;
+#X text 511 274 OR;
 #X text 430 16 part of zexy;
-#X text 72 58 (this patch might be very CPU-consumptious \, because
+#X floatatom 230 242 0 0 0 0 - - -;
+#X floatatom 192 243 0 0 0 0 - - -;
+#X obj 192 221 avg~;
+#X obj 230 220 avg~;
+#X obj 192 193 absgn~;
+#X text 196 267 (both);
+#X text 72 58 (this help-patch might be very CPU-consumptious \, because
 of the float-atoms....);
 #X connect 0 0 13 0;
 #X connect 1 0 14 0;
@@ -73,6 +79,7 @@ of the float-atoms....);
 #X connect 20 0 7 0;
 #X connect 21 0 0 0;
 #X connect 21 0 1 0;
+#X connect 21 0 60 0;
 #X connect 22 0 21 0;
 #X connect 23 0 2 0;
 #X connect 23 0 3 0;
@@ -106,3 +113,7 @@ of the float-atoms....);
 #X connect 42 0 34 0;
 #X connect 43 0 35 0;
 #X connect 44 0 36 0;
+#X connect 58 0 57 0;
+#X connect 59 0 56 0;
+#X connect 60 0 58 0;
+#X connect 60 1 59 0;