1 files changed, 35 insertions, 0 deletions
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;