switched from [>~] to [expr] to make it works in as many places as possible

svn path=/trunk/externals/hcs/; revision=11069

1 files changed, 13 insertions, 14 deletions

diff --git a/pwm~.pd b/pwm~.pd
index 2eebe93..24fe2c9 100644
--- a/pwm~.pd
+++ b/pwm~.pd
@@ -1,10 +1,8 @@
-#N canvas 511 200 493 531 10;
+#N canvas 511 200 493 443 10;
 #X obj 29 49 inlet;
 #X obj 113 405 outlet~;
 #X obj 113 198 phasor~;
 #X obj 280 43 inlet;
-#X obj 113 226 >~;
-#X text 143 229 zexy object;
 #X obj 31 94 t b f;
 #X msg 31 114 1;
 #X obj 45 135 -;
@@ -13,14 +11,15 @@
 #X obj 113 172 sig~;
 #X obj 326 43 loadbang;
 #X text 43 11 after an idea from Roman Haefeli and Martin Peach;
-#X connect 0 0 6 0;
-#X connect 2 0 4 0;
-#X connect 3 0 10 0;
-#X connect 4 0 1 0;
-#X connect 6 0 7 0;
-#X connect 6 1 8 1;
-#X connect 7 0 8 0;
-#X connect 8 0 4 1;
-#X connect 10 0 11 0;
-#X connect 11 0 2 0;
-#X connect 12 0 10 0;
+#X obj 113 226 expr~ $v1 > $v2;
+#X connect 0 0 4 0;
+#X connect 2 0 12 0;
+#X connect 3 0 8 0;
+#X connect 4 0 5 0;
+#X connect 4 1 6 1;
+#X connect 5 0 6 0;
+#X connect 6 0 12 1;
+#X connect 8 0 9 0;
+#X connect 9 0 2 0;
+#X connect 10 0 8 0;
+#X connect 12 0 1 0;