[Gridflow-cvs] [svn] commit: r3615 - /trunk/abstractions/#polygon_comparator.pd

gridflow-cvs at artengine.ca gridflow-cvs at artengine.ca
Fri Apr 18 19:11:44 EDT 2008


Author: matju
Date: Fri Apr 18 19:11:43 2008
New Revision: 3615

Log:
...

Modified:
    trunk/abstractions/#polygon_comparator.pd

Modified: trunk/abstractions/#polygon_comparator.pd
==============================================================================
--- trunk/abstractions/#polygon_comparator.pd (original)
+++ trunk/abstractions/#polygon_comparator.pd Fri Apr 18 19:11:43 2008
@@ -1,111 +1,99 @@
-#N canvas 733 302 865 491 10;
-#X obj 14 9 inlet left;
-#X obj 184 18 inlet right;
-#X obj 14 28 route2 precision;
-#X obj 52 407 outlet result;
-#X obj 184 131 #polygon_radial_map;
-#X obj 184 247 #fft;
-#X obj 34 247 #fft;
-#X obj 34 285 #fft \, sign -1;
-#X obj 325 352 listprepend 0;
-#N canvas 0 0 450 300 graph1 0;
+#N canvas 415 302 865 491 10;
+#X obj 13 13 inlet left;
+#X obj 183 22 inlet right;
+#X obj 13 32 route2 precision;
+#X obj 33 383 outlet result;
+#X obj 183 109 #polygon_radial_map;
+#X obj 183 225 #fft;
+#X obj 33 225 #fft;
+#X obj 33 263 #fft \, sign -1;
+#N canvas 0 0 450 300 (subpatch) 0;
 #X array \$0-table 256 float 2;
 #X coords 0 1 256 0 200 140 1;
 #X restore 405 42 graph;
-#X obj 325 371 s \$0-table;
-#X obj 34 131 #polygon_radial_map;
-#X obj 34 190 #redim (1 256 1);
-#X obj 184 190 #redim (1 256 1);
-#X obj 34 228 #cast f;
-#X obj 34 209 #outer * (1 0);
-#X obj 184 209 #outer * (1 0);
-#X obj 184 228 #cast f;
-#X obj 34 363 #inner (2 f # 1 0) \, seed (f # 0);
-#X obj 35 429 display;
-#X obj 34 382 #redim (256);
-#X obj 34 266 # C.*conj (2 f # 1 0);
-#X obj 226 298 display;
-#N canvas 0 0 450 300 do-tabwrite 0;
-#X obj 41 75 #export;
-#X obj 81 95 f;
-#X obj 41 134 tabwrite \$0-table;
-#X obj 41 95 t f b;
-#X msg 96 71 0;
-#X text 140 34 workaround for bug in ruby >= 2006-06-09;
-#X obj 106 95 + 1;
-#X obj 24 11 inlet;
-#X obj 24 33 t a b;
-#X connect 0 0 3 0;
-#X connect 1 0 6 0;
-#X connect 1 0 2 1;
-#X connect 3 0 2 0;
-#X connect 3 1 1 0;
-#X connect 4 0 1 1;
-#X connect 6 0 1 1;
-#X connect 7 0 8 0;
-#X connect 8 0 0 0;
-#X connect 8 1 4 0;
-#X restore 122 382 pd do-tabwrite;
-#X obj 34 150 #t;
-#X obj 184 150 #t;
-#X obj 209 151 # sq-;
-#X obj 248 151 #fold +;
-#X obj 59 151 # sq-;
-#X obj 98 151 #fold +;
-#X obj 225 259 # *;
-#X obj 248 170 #cast f;
-#X obj 98 170 #cast f;
-#X obj 225 278 # sqrt (f #);
-#X obj 34 323 # / (f # 1);
-#X obj 34 304 # / (f # 256);
-#X obj 184 55 #t;
-#X obj 211 77 #polygon_moment;
-#X obj 184 102 # -;
-#X obj 34 54 #t;
-#X obj 60 76 #polygon_moment;
-#X obj 34 101 # -;
+#X obj 33 109 #polygon_radial_map;
+#X obj 33 168 #redim (1 256 1);
+#X obj 183 168 #redim (1 256 1);
+#X obj 33 206 #cast f;
+#X obj 33 187 #outer * (1 0);
+#X obj 183 187 #outer * (1 0);
+#X obj 183 206 #cast f;
+#X obj 33 329 #inner (2 f # 1 0) \, seed (f # 0);
+#X obj 33 348 #redim (256);
+#X obj 33 244 # C.*conj (2 f # 1 0);
+#X obj 33 128 #t;
+#X obj 183 128 #t;
+#X obj 208 129 # sq-;
+#X obj 247 129 #fold +;
+#X obj 58 129 # sq-;
+#X obj 97 129 #fold +;
+#X obj 224 237 # *;
+#X obj 247 148 #cast f;
+#X obj 97 148 #cast f;
+#X obj 224 256 # sqrt (f #);
+#X obj 33 301 # / (f # 1);
+#X obj 33 282 # / (f # 256);
+#X obj 183 59 #t;
+#X obj 208 59 #polygon_moment;
+#X obj 183 80 # -;
+#X obj 33 58 #t;
+#X obj 58 58 #polygon_moment;
+#X obj 33 79 # -;
+#X obj 330 437 f;
+#X obj 216 456 tabwrite \$0-table;
+#X obj 216 420 t f b;
+#X msg 346 418 0;
+#X obj 355 437 + 1;
+#X obj 216 373 t a b;
+#X obj 216 401 #to_float;
 #X connect 0 0 2 0;
-#X connect 1 0 36 0;
+#X connect 1 0 31 0;
 #X connect 2 0 4 0;
-#X connect 2 0 11 0;
-#X connect 2 1 39 0;
-#X connect 4 0 25 0;
-#X connect 5 0 21 1;
-#X connect 6 0 21 0;
-#X connect 7 0 35 0;
-#X connect 8 0 10 0;
-#X connect 11 0 24 0;
-#X connect 12 0 15 0;
-#X connect 13 0 16 0;
-#X connect 14 0 6 0;
-#X connect 15 0 14 0;
+#X connect 2 0 9 0;
+#X connect 2 1 34 0;
+#X connect 4 0 20 0;
+#X connect 5 0 18 1;
+#X connect 6 0 18 0;
+#X connect 7 0 30 0;
+#X connect 9 0 19 0;
+#X connect 10 0 13 0;
+#X connect 11 0 14 0;
+#X connect 12 0 6 0;
+#X connect 13 0 12 0;
+#X connect 14 0 15 0;
+#X connect 15 0 5 0;
 #X connect 16 0 17 0;
-#X connect 17 0 5 0;
-#X connect 18 0 20 0;
-#X connect 20 0 23 0;
-#X connect 20 0 3 0;
-#X connect 20 0 19 0;
-#X connect 21 0 7 0;
-#X connect 24 0 12 0;
-#X connect 24 1 28 0;
-#X connect 25 0 13 0;
-#X connect 25 1 26 0;
-#X connect 26 0 27 0;
-#X connect 27 0 31 0;
-#X connect 28 0 29 0;
-#X connect 29 0 32 0;
-#X connect 30 0 33 0;
-#X connect 31 0 30 1;
-#X connect 32 0 30 0;
-#X connect 33 0 22 0;
-#X connect 33 0 34 1;
-#X connect 34 0 18 0;
-#X connect 35 0 34 0;
-#X connect 36 0 38 0;
-#X connect 36 1 37 0;
+#X connect 17 0 3 0;
+#X connect 17 0 42 0;
+#X connect 18 0 7 0;
+#X connect 19 0 10 0;
+#X connect 19 1 23 0;
+#X connect 20 0 11 0;
+#X connect 20 1 21 0;
+#X connect 21 0 22 0;
+#X connect 22 0 26 0;
+#X connect 23 0 24 0;
+#X connect 24 0 27 0;
+#X connect 25 0 28 0;
+#X connect 26 0 25 1;
+#X connect 27 0 25 0;
+#X connect 28 0 29 1;
+#X connect 29 0 16 0;
+#X connect 30 0 29 0;
+#X connect 31 0 33 0;
+#X connect 31 1 32 0;
+#X connect 32 0 33 1;
+#X connect 33 0 4 0;
+#X connect 34 0 36 0;
+#X connect 34 1 35 0;
+#X connect 35 0 36 1;
+#X connect 36 0 9 0;
+#X connect 37 0 41 0;
 #X connect 37 0 38 1;
-#X connect 38 0 4 0;
-#X connect 39 0 41 0;
-#X connect 39 1 40 0;
-#X connect 40 0 41 1;
-#X connect 41 0 11 0;
+#X connect 39 0 38 0;
+#X connect 39 1 37 0;
+#X connect 40 0 37 1;
+#X connect 41 0 37 1;
+#X connect 42 0 43 0;
+#X connect 42 1 40 0;
+#X connect 43 0 39 0;



More information about the Gridflow-cvs mailing list