From f18d063d9312c95e25294e0777bc135ee9a3fd8a Mon Sep 17 00:00:00 2001
From: Thomas O Fredericks <mrtof@users.sourceforge.net>
Date: Sun, 25 Oct 2009 00:39:13 +0000
Subject: Adding mtl

svn path=/trunk/abstractions/mtl/; revision=12667
---
 3dMagnitude.pd | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100644 3dMagnitude.pd

(limited to '3dMagnitude.pd')

diff --git a/3dMagnitude.pd b/3dMagnitude.pd
new file mode 100644
index 0000000..be80003
--- /dev/null
+++ b/3dMagnitude.pd
@@ -0,0 +1,35 @@
+#N canvas 139 64 481 270 10;
+#X obj 21 39 unpack f f f;
+#X obj 21 104 *;
+#X obj 76 104 *;
+#X obj 131 103 *;
+#X obj 21 127 +;
+#X obj 21 148 +;
+#X obj 21 169 sqrt;
+#X obj 21 198 outlet float;
+#X obj 21 14 inlet vector;
+#X text 115 14 A;
+#X text 115 199 m;
+#X text 179 173 m = (Ax^2+Ay^2+Az^2)^(1/2);
+#X text 129 143 computes the magnitude of the incoming vector;
+#X obj 21 82 t f f;
+#X obj 76 82 t f f;
+#X obj 131 81 t f f;
+#X text 301 226 Version: 2007-12-09;
+#X text 302 245 Author: Roman Haefeli;
+#X connect 0 0 13 0;
+#X connect 0 1 14 0;
+#X connect 0 2 15 0;
+#X connect 1 0 4 0;
+#X connect 2 0 4 1;
+#X connect 3 0 5 1;
+#X connect 4 0 5 0;
+#X connect 5 0 6 0;
+#X connect 6 0 7 0;
+#X connect 8 0 0 0;
+#X connect 13 0 1 0;
+#X connect 13 1 1 1;
+#X connect 14 0 2 0;
+#X connect 14 1 2 1;
+#X connect 15 0 3 0;
+#X connect 15 1 3 1;
-- 
cgit v1.2.1