initial commit of a new example about non-linearity

svn path=/trunk/externals/pmpd/; revision=16137

1 files changed, 237 insertions, 0 deletions

diff --git a/examples/62_NL.pd b/examples/62_NL.pd
new file mode 100644
index 0000000..c21bcbd
--- /dev/null
+++ b/examples/62_NL.pd
@@ -0,0 +1,237 @@
+#N canvas 34 144 1185 713 10;
+#X obj 39 450 pmpd;
+#X msg 116 276 reset;
+#X obj 65 248 t b b b b;
+#X obj 65 225 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
+-1;
+#X obj 65 201 loadbang;
+#X obj 471 43 tgl 15 0 empty empty empty 17 7 0 10 -262144 -1 -1 1
+1;
+#X msg 39 396 bang \, get massesPos mobile;
+#X obj 39 474 route massesPosId;
+#X obj 39 494 route 1;
+#X floatatom 39 518 5 0 0 0 - - -;
+#X msg 99 300 mass fix 0 1 0.5;
+#X obj 305 451 pmpd;
+#X msg 382 277 reset;
+#X obj 331 249 t b b b b;
+#X obj 331 226 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 331 202 loadbang;
+#X msg 305 397 bang \, get massesPos mobile;
+#X obj 305 475 route massesPosId;
+#X obj 305 495 route 1;
+#X floatatom 305 519 5 0 0 0 - - -;
+#X obj 323 426 r force;
+#X obj 52 425 r force;
+#X obj 578 453 pmpd;
+#X msg 655 279 reset;
+#X obj 604 251 t b b b b;
+#X obj 604 228 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 604 204 loadbang;
+#X msg 578 399 bang \, get massesPos mobile;
+#X obj 578 477 route massesPosId;
+#X obj 578 497 route 1;
+#X floatatom 578 521 5 0 0 0 - - -;
+#X msg 471 124 forceX mobile 0.1;
+#X obj 471 154 s force;
+#X obj 596 428 r force;
+#X obj 471 64 metro 20;
+#X obj 39 368 r metro;
+#X obj 471 86 s metro;
+#X obj 305 368 r metro;
+#X obj 578 370 r metro;
+#N canvas 11 85 772 307 oscillo 0;
+#N canvas 0 0 450 300 (subpatch) 0;
+#X array \$0-oscillo1 100 float 2;
+#X coords 0 1 100 0 200 127 1;
+#X restore 100 100 graph;
+#X obj 362 86 inlet;
+#X text 405 86 data;
+#X obj 362 193 pack f f;
+#X obj 361 171 % 100;
+#X obj 362 129 f;
+#X obj 361 149 + 1;
+#X obj 362 108 t b f;
+#X obj 362 214 s \$0-oscillo1;
+#X connect 1 0 7 0;
+#X connect 3 0 8 0;
+#X connect 4 0 5 1;
+#X connect 5 0 6 0;
+#X connect 5 0 3 0;
+#X connect 6 0 4 0;
+#X connect 7 0 5 0;
+#X connect 7 1 3 1;
+#X coords 0 -1 1 1 200 127 1 100 100;
+#X restore 87 519 pd oscillo;
+#N canvas 9 89 772 307 oscillo 0;
+#N canvas 0 0 450 300 (subpatch) 0;
+#X array \$0-oscillo2 100 float 2;
+#X coords 0 1 100 0 200 127 1;
+#X restore 100 100 graph;
+#X obj 362 86 inlet;
+#X text 405 86 data;
+#X obj 362 193 pack f f;
+#X obj 361 171 % 100;
+#X obj 362 129 f;
+#X obj 361 149 + 1;
+#X obj 362 108 t b f;
+#X obj 362 214 s \$0-oscillo2;
+#X connect 1 0 7 0;
+#X connect 3 0 8 0;
+#X connect 4 0 5 1;
+#X connect 5 0 6 0;
+#X connect 5 0 3 0;
+#X connect 6 0 4 0;
+#X connect 7 0 5 0;
+#X connect 7 1 3 1;
+#X coords 0 -1 1 1 200 127 1 100 100;
+#X restore 349 524 pd oscillo;
+#N canvas 9 89 772 307 oscillo 0;
+#N canvas 0 0 450 300 (subpatch) 0;
+#X array \$0-oscillo3 100 float 2;
+#X coords 0 1 100 0 200 127 1;
+#X restore 100 100 graph;
+#X obj 362 86 inlet;
+#X text 405 86 data;
+#X obj 362 193 pack f f;
+#X obj 361 171 % 100;
+#X obj 362 129 f;
+#X obj 361 149 + 1;
+#X obj 362 108 t b f;
+#X obj 362 214 s \$0-oscillo3;
+#X connect 1 0 7 0;
+#X connect 3 0 8 0;
+#X connect 4 0 5 1;
+#X connect 5 0 6 0;
+#X connect 5 0 3 0;
+#X connect 6 0 4 0;
+#X connect 7 0 5 0;
+#X connect 7 1 3 1;
+#X coords 0 -1 1 1 200 127 1 100 100;
+#X restore 635 524 pd oscillo;
+#X msg 82 319 mass mobile 1 1 0.5;
+#X msg 348 320 mass mobile 1 1 0.5;
+#X msg 621 324 mass mobile 1 1 0.5;
+#X msg 365 301 mass fix 0 1 0.5;
+#X msg 638 303 mass fix 0 1 0.5;
+#X text 83 57 - linear rigidity;
+#X text 61 18 This Example provide 3 simples oscillator using 3 differents
+kind of link :;
+#X obj 868 453 pmpd;
+#X msg 945 279 reset;
+#X obj 894 251 t b b b b;
+#X obj 894 228 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
+-1 -1;
+#X obj 894 204 loadbang;
+#X msg 868 399 bang \, get massesPos mobile;
+#X obj 868 477 route massesPosId;
+#X obj 868 497 route 1;
+#X floatatom 868 521 5 0 0 0 - - -;
+#X obj 886 428 r force;
+#X obj 868 370 r metro;
+#N canvas 7 93 772 307 oscillo 0;
+#N canvas 0 0 450 300 (subpatch) 0;
+#X array \$0-oscillo4 100 float 2;
+#X coords 0 1 100 0 200 127 1;
+#X restore 100 100 graph;
+#X obj 362 86 inlet;
+#X text 405 86 data;
+#X obj 362 193 pack f f;
+#X obj 361 171 % 100;
+#X obj 362 129 f;
+#X obj 361 149 + 1;
+#X obj 362 108 t b f;
+#X obj 362 214 s \$0-oscillo4;
+#X connect 1 0 7 0;
+#X connect 3 0 8 0;
+#X connect 4 0 5 1;
+#X connect 5 0 6 0;
+#X connect 5 0 3 0;
+#X connect 6 0 4 0;
+#X connect 7 0 5 0;
+#X connect 7 1 3 1;
+#X coords 0 -1 1 1 200 127 1 100 100;
+#X restore 925 524 pd oscillo;
+#X msg 928 303 mass fix 0 1 0.5;
+#X msg 65 344 link linear fix mobile 0.03 0.01;
+#X msg 331 344 link sqrt fix mobile 0.03 0.01 0.5;
+#X msg 604 344 link sqr fix mobile 0.03 0.01 2;
+#X msg 911 324 mass mobile 1 1 0.5;
+#X msg 893 345 link linear fix mobile 0.03 0.01 -0.2;
+#X text 84 116 - rigidity proportionnal to pow(lenght \, -0.2);
+#X text 83 97 - rigidity proportionnal to square of elongation;
+#X text 83 77 - rigidity proportionnal to square root of elongation
+;
+#X connect 0 0 7 0;
+#X connect 1 0 0 0;
+#X connect 2 0 62 0;
+#X connect 2 1 42 0;
+#X connect 2 2 10 0;
+#X connect 2 3 1 0;
+#X connect 3 0 2 0;
+#X connect 4 0 3 0;
+#X connect 5 0 34 0;
+#X connect 6 0 0 0;
+#X connect 7 0 8 0;
+#X connect 8 0 9 0;
+#X connect 8 0 39 0;
+#X connect 10 0 0 0;
+#X connect 11 0 17 0;
+#X connect 12 0 11 0;
+#X connect 13 0 63 0;
+#X connect 13 1 43 0;
+#X connect 13 2 45 0;
+#X connect 13 3 12 0;
+#X connect 14 0 13 0;
+#X connect 15 0 14 0;
+#X connect 16 0 11 0;
+#X connect 17 0 18 0;
+#X connect 18 0 19 0;
+#X connect 18 0 40 0;
+#X connect 20 0 11 0;
+#X connect 21 0 0 0;
+#X connect 22 0 28 0;
+#X connect 23 0 22 0;
+#X connect 24 0 64 0;
+#X connect 24 1 44 0;
+#X connect 24 2 46 0;
+#X connect 24 3 23 0;
+#X connect 25 0 24 0;
+#X connect 26 0 25 0;
+#X connect 27 0 22 0;
+#X connect 28 0 29 0;
+#X connect 29 0 30 0;
+#X connect 29 0 41 0;
+#X connect 31 0 32 0;
+#X connect 33 0 22 0;
+#X connect 34 0 36 0;
+#X connect 35 0 6 0;
+#X connect 37 0 16 0;
+#X connect 38 0 27 0;
+#X connect 42 0 0 0;
+#X connect 43 0 11 0;
+#X connect 44 0 22 0;
+#X connect 45 0 11 0;
+#X connect 46 0 22 0;
+#X connect 49 0 55 0;
+#X connect 50 0 49 0;
+#X connect 51 0 66 0;
+#X connect 51 1 65 0;
+#X connect 51 2 61 0;
+#X connect 51 3 50 0;
+#X connect 52 0 51 0;
+#X connect 53 0 52 0;
+#X connect 54 0 49 0;
+#X connect 55 0 56 0;
+#X connect 56 0 57 0;
+#X connect 56 0 60 0;
+#X connect 58 0 49 0;
+#X connect 59 0 54 0;
+#X connect 61 0 49 0;
+#X connect 62 0 0 0;
+#X connect 63 0 11 0;
+#X connect 64 0 22 0;
+#X connect 65 0 49 0;
+#X connect 66 0 49 0;