1 files changed, 33 insertions, 0 deletions
diff --git a/3dDot.pd b/3dDot.pd
new file mode 100644
index 0000000..bba2c60
--- /dev/null
+++ b/3dDot.pd
@@ -0,0 +1,33 @@
+#N canvas 59 4 508 268 10;
+#X obj 16 21 inlet vector;
+#X text 113 23 A;
+#X obj 168 22 inlet vector;
+#X text 265 24 B;
+#X obj 168 53 unpack f f f;
+#X obj 16 54 unpack f f f;
+#X obj 16 119 * \$1;
+#X obj 55 119 * \$2;
+#X obj 95 120 * \$3;
+#X obj 16 152 +;
+#X obj 16 182 +;
+#X obj 16 220 outlet float;
+#X text 139 158 A;
+#X text 151 155 .;
+#X text 163 158 B = Ax*Bx+Ay*By+Az*Bz = |A|*|B|*cos(rho);
+#X text 138 187 where rho is the angle between the vectors A and B
+;
+#X text 310 220 Version: 2007-12-09;
+#X text 311 239 Author: Roman Haefeli;
+#X connect 0 0 5 0;
+#X connect 2 0 4 0;
+#X connect 4 0 6 1;
+#X connect 4 1 7 1;
+#X connect 4 2 8 1;
+#X connect 5 0 6 0;
+#X connect 5 1 7 0;
+#X connect 5 2 8 0;
+#X connect 6 0 9 0;
+#X connect 7 0 9 1;
+#X connect 8 0 10 1;
+#X connect 9 0 10 0;
+#X connect 10 0 11 0;