From d2eec74a4d8c21aad495ba61539486b24d7ab8dc Mon Sep 17 00:00:00 2001 From: Guenter Geiger Date: Wed, 9 Oct 2002 10:19:04 +0000 Subject: moved from zexy/zexy to zexy svn path=/trunk/externals/zexy/; revision=169 --- examples/scalarmult.pd | 73 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 73 insertions(+) create mode 100644 examples/scalarmult.pd (limited to 'examples/scalarmult.pd') 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; -- cgit v1.2.1