From 089475041fe26964d72cb2ebc3559a36ba89a2f2 Mon Sep 17 00:00:00 2001
From: "N.N." <matju@users.sourceforge.net>
Date: Tue, 8 Jul 2008 05:56:10 +0000
Subject: trying to import gridflow 0.9.4

svn path=/trunk/; revision=10148
---
 .../gridflow/abstractions/#polygon_radial_map.pd   | 184 +++++++++++++++++++++
 1 file changed, 184 insertions(+)
 create mode 100644 externals/gridflow/abstractions/#polygon_radial_map.pd

(limited to 'externals/gridflow/abstractions/#polygon_radial_map.pd')

diff --git a/externals/gridflow/abstractions/#polygon_radial_map.pd b/externals/gridflow/abstractions/#polygon_radial_map.pd
new file mode 100644
index 00000000..ded6c88d
--- /dev/null
+++ b/externals/gridflow/abstractions/#polygon_radial_map.pd
@@ -0,0 +1,184 @@
+#N canvas 257 49 711 558 10;
+#X obj 10 15 inlet polygon;
+#X obj 22 92 f;
+#X obj 22 54 loadbang;
+#X obj 229 200 #polygon_each_edge;
+#X obj 229 219 #t;
+#X obj 47 92 s \$0-precision;
+#X obj 281 242 #unpack;
+#X obj 281 261 t f f;
+#X obj 281 366 f;
+#X obj 281 347 until;
+#X obj 205 325 sel;
+#X obj 205 344 s \$0-stop;
+#X obj 311 328 r \$0-stop;
+#X obj 331 366 mod;
+#X obj 356 366 r \$0-precision;
+#X obj 306 366 +;
+#X msg 281 328 666;
+#X obj 2 331 outlet radial_map;
+#X obj 260 437 tabread \$0-table;
+#X obj 221 493 pack;
+#X obj 221 512 s \$0-table;
+#X obj 253 493 +;
+#N canvas 0 0 450 238 directions-of-points 0;
+#X obj 20 25 inlet;
+#X obj 20 96 # atan;
+#X obj 20 115 # *;
+#X obj 45 115 r \$0-precision;
+#X obj 20 134 # / 36000;
+#X obj 45 153 r \$0-precision;
+#X obj 20 153 # %;
+#N canvas 480 317 313 169 #split 0;
+#X obj 34 28 inlet;
+#X obj 34 123 outlet;
+#X obj 50 85 outlet;
+#X obj 34 47 #t;
+#X text 58 48 split;
+#X obj 50 66 #inner (0 1);
+#X obj 34 104 #inner (1 0);
+#X connect 0 0 3 0;
+#X connect 3 0 6 0;
+#X connect 3 1 5 0;
+#X connect 5 0 2 0;
+#X connect 6 0 1 0;
+#X restore 20 44 pd #split 2;
+#X obj 20 172 outlet;
+#X connect 0 0 7 0;
+#X connect 1 0 2 0;
+#X connect 2 0 4 0;
+#X connect 3 0 2 1;
+#X connect 4 0 6 0;
+#X connect 5 0 6 1;
+#X connect 6 0 8 0;
+#X connect 7 0 1 0;
+#X connect 7 1 1 1;
+#X restore 281 223 pd directions-of-points;
+#N canvas 642 350 344 210 closest-turn 0;
+#X obj 27 23 inlet;
+#X obj 52 68 r \$0-precision;
+#X obj 27 144 outlet;
+#X obj 27 49 -;
+#X obj 27 68 mod;
+#X obj 52 87 / 2;
+#X obj 77 23 inlet;
+#X obj 27 106 * 2;
+#X obj 27 125 - 1;
+#X obj 27 87 >;
+#X text 25 3 figure out clockwise vs counterclockwise;
+#X connect 0 0 3 0;
+#X connect 1 0 4 1;
+#X connect 1 0 5 0;
+#X connect 3 0 4 0;
+#X connect 4 0 9 0;
+#X connect 5 0 9 1;
+#X connect 6 0 3 1;
+#X connect 7 0 8 0;
+#X connect 8 0 2 0;
+#X connect 9 0 7 0;
+#X restore 326 268 pd closest-turn;
+#X obj 260 414 /;
+#X obj 285 414 r \$0-precision;
+#N canvas 637 343 450 300 find-intersection 0;
+#X obj 21 20 inlet edge;
+#X obj 110 21 inlet direction;
+#X obj 21 259 outlet;
+#X text 109 4 float;
+#X text 20 4 2x2 matrix;
+#X obj 21 63 #rotate;
+#X obj 21 128 #ravel;
+#X obj 21 147 #unpack 4;
+#X obj 110 40 * -1;
+#X obj 21 240 expr $f2 - $f1*($f4-$f2)/($f3-$f1);
+#X connect 0 0 5 0;
+#X connect 1 0 8 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 7 0 9 0;
+#X connect 7 1 9 1;
+#X connect 7 2 9 2;
+#X connect 7 3 9 3;
+#X connect 8 0 5 1;
+#X connect 9 0 2 0;
+#X restore 77 457 pd find-intersection;
+#X obj 77 438 #store;
+#X obj 260 395 * 36000;
+#X obj 22 130 s \$0-table;
+#X msg 22 111 resize \$1;
+#X obj 77 409 t b f;
+#X obj 221 395 t f f;
+#X obj 221 437 t f f;
+#X obj 2 255 for 0 0 1;
+#X obj 31 236 r \$0-precision;
+#X obj 83 293 r \$0-precision;
+#X obj 2 312 #import (1);
+#X msg 83 312 list \$1;
+#X obj 260 160 s \$0-table;
+#X msg 260 141 const 0;
+#X obj 2 274 tabread \$0-table;
+#X obj 207 141 t a a b;
+#X obj 13 181 #finished;
+#X msg 22 73 256;
+#N canvas 0 0 450 300 graph4 0;
+#X array \$0-table 256 float 2;
+#X coords 0 100 256 0 200 140 1;
+#X restore 475 29 graph;
+#X obj 75 509 *;
+#X obj 10 34 route precision;
+#X connect 0 0 47 0;
+#X connect 1 0 30 0;
+#X connect 1 0 5 0;
+#X connect 2 0 44 0;
+#X connect 3 0 4 0;
+#X connect 4 0 22 0;
+#X connect 4 1 27 1;
+#X connect 6 0 7 0;
+#X connect 6 1 10 1;
+#X connect 6 1 23 1;
+#X connect 7 0 16 0;
+#X connect 7 1 8 1;
+#X connect 7 1 23 0;
+#X connect 8 0 10 0;
+#X connect 8 0 15 0;
+#X connect 9 0 8 0;
+#X connect 10 0 11 0;
+#X connect 10 1 32 0;
+#X connect 12 0 9 1;
+#X connect 13 0 8 1;
+#X connect 14 0 13 1;
+#X connect 15 0 13 0;
+#X connect 16 0 9 0;
+#X connect 18 0 21 0;
+#X connect 19 0 20 0;
+#X connect 21 0 19 1;
+#X connect 22 0 6 0;
+#X connect 23 0 15 1;
+#X connect 23 0 46 1;
+#X connect 24 0 31 0;
+#X connect 25 0 24 1;
+#X connect 26 0 46 0;
+#X connect 27 0 26 0;
+#X connect 28 0 24 0;
+#X connect 30 0 29 0;
+#X connect 31 0 27 0;
+#X connect 31 1 26 1;
+#X connect 32 0 33 0;
+#X connect 32 1 28 0;
+#X connect 33 0 19 0;
+#X connect 33 1 18 0;
+#X connect 34 0 41 0;
+#X connect 35 0 34 1;
+#X connect 36 0 38 0;
+#X connect 37 0 17 0;
+#X connect 38 0 37 1;
+#X connect 40 0 39 0;
+#X connect 41 0 37 0;
+#X connect 42 0 43 0;
+#X connect 42 1 3 0;
+#X connect 42 2 40 0;
+#X connect 43 0 34 0;
+#X connect 44 0 1 0;
+#X connect 46 0 21 1;
+#X connect 47 0 1 0;
+#X connect 47 1 42 0;
+#X coords 0 0 1 1 85 60 0;
-- 
cgit v1.2.1