From f18d063d9312c95e25294e0777bc135ee9a3fd8a Mon Sep 17 00:00:00 2001 From: Thomas O Fredericks Date: Sun, 25 Oct 2009 00:39:13 +0000 Subject: Adding mtl svn path=/trunk/abstractions/mtl/; revision=12667 --- 3dDot.pd | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 3dDot.pd (limited to '3dDot.pd') 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; -- cgit v1.2.1