1 files changed, 73 insertions, 0 deletions
diff --git a/examples/scalarmult.pd b/examples/scalarmult.pd
new file mode 100644
index 0000000..1b988ef
--- /dev/null
+++ b/examples/scalarmult.pd
@@ -0,0 +1,73 @@
+#N canvas 193 440 857 589 10;
+#X obj 83 45 .;
+#X text 130 46 scalar multilicaton ("dot");
+#X msg 71 156 1 2 3;
+#X msg 110 182 4 3 2;
+#X obj 71 241 print;
+#X msg 177 157 1 2 3;
+#X msg 235 185 4 3 2;
+#X obj 177 242 print;
+#X obj 177 216 . 10 10 1;
+#X obj 71 215 .;
+#X msg 375 159 1 2 3;
+#X obj 375 244 print;
+#X msg 481 160 1 2 3;
+#X obj 481 245 print;
+#X obj 375 218 . 0;
+#X floatatom 409 193 4 0 0;
+#X obj 481 219 . 7;
+#X floatatom 514 194 4 0 0;
+#X obj 62 456 .;
+#X msg 62 377 1 2 3;
+#X msg 178 378 1 2 3;
+#X obj 178 454 . 0;
+#X text 58 342 these are NOT the same !!;
+#X obj 178 485 print SCAL;
+#X obj 62 485 print VECT;
+#X msg 78 411 2 2 1;
+#X msg 114 437 3;
+#X msg 207 430 2 2 1;
+#X msg 194 407 3;
+#X text 233 406 good;
+#X text 247 430 bad;
+#X text 126 411 good;
+#X text 140 435 bad;
+#X text 420 334 tricky:;
+#X obj 431 453 print;
+#X msg 447 403 1 2 3;
+#X floatatom 431 377 4 0 0;
+#X obj 431 430 .;
+#X obj 536 460 print;
+#X msg 536 414 1 2 3;
+#X obj 536 437 .;
+#X obj 536 392 t b l;
+#X floatatom 536 368 4 0 0;
+#X text 582 393 note that we "cast" the float to list;
+#X connect 2 0 9 0;
+#X connect 3 0 9 1;
+#X connect 5 0 8 0;
+#X connect 6 0 8 1;
+#X connect 8 0 7 0;
+#X connect 9 0 4 0;
+#X connect 10 0 14 0;
+#X connect 12 0 16 0;
+#X connect 14 0 11 0;
+#X connect 15 0 14 1;
+#X connect 16 0 13 0;
+#X connect 17 0 16 1;
+#X connect 18 0 24 0;
+#X connect 19 0 18 0;
+#X connect 20 0 21 0;
+#X connect 21 0 23 0;
+#X connect 25 0 18 1;
+#X connect 26 0 18 1;
+#X connect 27 0 21 1;
+#X connect 28 0 21 1;
+#X connect 35 0 37 1;
+#X connect 36 0 37 0;
+#X connect 37 0 34 0;
+#X connect 39 0 40 0;
+#X connect 40 0 38 0;
+#X connect 41 0 39 0;
+#X connect 41 1 40 1;
+#X connect 42 0 41 0;