From f40d8c3d61e9ac6a7a4e06f6bfc7a2567c38bb33 Mon Sep 17 00:00:00 2001
From: Hans-Christoph Steiner <eighthave@users.sourceforge.net>
Date: Tue, 29 Apr 2003 16:52:44 +0000
Subject: sources from motex_1_1_3.tar.gz

svn path=/trunk/externals/motex/; revision=603
---
 rec2pol~.pd | 44 ++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 44 insertions(+)
 create mode 100644 rec2pol~.pd

(limited to 'rec2pol~.pd')

diff --git a/rec2pol~.pd b/rec2pol~.pd
new file mode 100644
index 0000000..b20693f
--- /dev/null
+++ b/rec2pol~.pd
@@ -0,0 +1,44 @@
+#N canvas 83 81 488 482 10;
+#X obj 151 219 sig~ 222;
+#X obj 221 225 sig~ 111;
+#X obj 133 352 snapshot~;
+#X obj 205 352 snapshot~;
+#X floatatom 109 392 8 0 0;
+#X floatatom 215 396 8 0 0;
+#X msg 117 319 bang;
+#X floatatom 254 176 4 0 0;
+#X floatatom 149 176 4 0 0;
+#X obj 180 253 rec2pol~;
+#X obj 180 311 pol2rec~;
+#X obj 69 243 snapshot~;
+#X floatatom 45 283 8 0 0;
+#X msg 70 184 bang;
+#X obj 315 242 snapshot~;
+#X floatatom 291 289 8 0 0;
+#X msg 315 225 bang;
+#X text 37 6 rec2pol - convert rectangular coords to polar coords;
+#X text 97 19 eg - convert sine & cosine output of rfft;
+#X text 97 33 to phase and magnitude;
+#X text 36 48 pol2rec - convert back;
+#X text 400 422 IM 2001;
+#X text 34 71 see also polvoc.pd for an example of use;
+#X connect 0 0 9 0;
+#X connect 1 0 9 1;
+#X connect 2 0 4 0;
+#X connect 3 0 5 0;
+#X connect 6 0 2 0;
+#X connect 6 0 3 0;
+#X connect 7 0 1 0;
+#X connect 8 0 0 0;
+#X connect 9 0 11 0;
+#X connect 9 0 10 0;
+#X connect 9 1 14 0;
+#X connect 9 1 10 1;
+#X connect 10 0 2 0;
+#X connect 10 1 3 0;
+#X connect 11 0 12 0;
+#X connect 13 0 11 0;
+#X connect 13 0 14 0;
+#X connect 13 0 6 0;
+#X connect 14 0 15 0;
+#X connect 16 0 14 0;
-- 
cgit v1.2.1