1 files changed, 140 insertions, 0 deletions
diff --git a/examples/49_pmpd~.pd b/examples/49_pmpd~.pd
new file mode 100644
index 0000000..1628928
--- /dev/null
+++ b/examples/49_pmpd~.pd
@@ -0,0 +1,140 @@
+#N canvas 39 25 842 667 10;
+#X obj 39 413 t a;
+#X obj 134 11 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
+-1;
+#X obj 52 647 tabwrite~ array99;
+#X obj 424 497 metro 100;
+#X obj 424 471 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 190 647 tabwrite~ array98;
+#N canvas 0 0 454 304 (subpatch) 0;
+#X array array97 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 662 269 graph;
+#X msg 15 54 \; pd dsp 1 \;;
+#X obj 15 29 loadbang;
+#X obj 450 474 loadbang;
+#X msg 299 402 forceX 2 1;
+#X obj 197 498 phasor~ 1;
+#X floatatom 77 479 5 0 0 0 - - -;
+#X floatatom 197 477 5 0 0 0 - - -;
+#X floatatom 320 478 5 0 0 0 - - -;
+#N canvas 0 0 454 304 (subpatch) 0;
+#X array array98 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 662 165 graph;
+#X obj 325 647 tabwrite~ array97;
+#X obj 88 521 tabwrite~ array9;
+#X obj 208 522 tabwrite~ array8;
+#X obj 332 523 tabwrite~ array7;
+#N canvas 0 0 450 300 (subpatch) 0;
+#X array array9 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 507 61 graph;
+#N canvas 0 0 454 304 (subpatch) 0;
+#X array array7 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 507 269 graph;
+#N canvas 0 0 454 304 (subpatch) 0;
+#X array array8 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 507 165 graph;
+#X obj 38 734 dac~;
+#N canvas 0 0 450 300 (subpatch) 0;
+#X array array99 100 float 0;
+#X coords 0 1 100 -1 150 100 1;
+#X restore 662 61 graph;
+#X obj 320 499 phasor~ 1.5;
+#X obj 134 37 t b b b b b;
+#X obj 325 623 metro 100;
+#X obj 325 597 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0
+1;
+#X obj 351 600 loadbang;
+#X text 159 10 <- create the network;
+#X obj 39 709 *~ 0.5;
+#X msg 181 256 link 0 2 0.5 0.001;
+#X msg 182 277 link 0 3 0.3 0.001;
+#X msg 202 324 mass 10 1;
+#X msg 203 350 mass 10 1;
+#X text 295 325 M \, X0;
+#X text 312 256 mass1 \, mass2 \, K \, D;
+#X text 281 168 outlet \, mass \, amplitude;
+#X text 248 89 inlet \, mass \, amplitude;
+#X msg 201 299 mass 10 1;
+#X msg 221 378 reset \, mass 0 0;
+#X msg 179 191 outPos 2 3 1;
+#X msg 133 91 inForce 1 2 1;
+#X obj 40 679 hip~ 20;
+#X msg 134 116 inForce 2 3 1;
+#X msg 162 171 outPos 1 2 1;
+#X msg 133 68 inForce 0 1 1;
+#X obj 77 498 phasor~ 1.33333;
+#X msg 155 149 outPos 0 1 3;
+#X text 212 236 mass1 \, mass2 \, K \, D \, Pow \, L0 \, Lmin \, Lmax
+;
+#X msg 176 218 NLlink 0 1 0.1 0.001 1.1 0 -10 10;
+#X obj 77 543 /~ 250;
+#X obj 197 544 /~ 10;
+#X obj 319 554 /~ 30;
+#X obj 39 583 pmpd~ 3 3;
+#X connect 0 0 55 0;
+#X connect 1 0 26 0;
+#X connect 3 0 17 0;
+#X connect 3 0 18 0;
+#X connect 3 0 19 0;
+#X connect 4 0 3 0;
+#X connect 8 0 7 0;
+#X connect 9 0 3 0;
+#X connect 10 0 0 0;
+#X connect 11 0 18 0;
+#X connect 11 0 53 0;
+#X connect 12 0 48 0;
+#X connect 13 0 11 0;
+#X connect 14 0 25 0;
+#X connect 25 0 19 0;
+#X connect 25 0 54 0;
+#X connect 26 0 47 0;
+#X connect 26 0 43 0;
+#X connect 26 0 45 0;
+#X connect 26 1 49 0;
+#X connect 26 1 46 0;
+#X connect 26 1 42 0;
+#X connect 26 2 32 0;
+#X connect 26 2 33 0;
+#X connect 26 2 51 0;
+#X connect 26 3 40 0;
+#X connect 26 3 34 0;
+#X connect 26 3 35 0;
+#X connect 26 4 41 0;
+#X connect 27 0 2 0;
+#X connect 27 0 5 0;
+#X connect 27 0 16 0;
+#X connect 28 0 27 0;
+#X connect 29 0 27 0;
+#X connect 31 0 23 0;
+#X connect 31 0 23 1;
+#X connect 32 0 0 0;
+#X connect 33 0 0 0;
+#X connect 34 0 0 0;
+#X connect 35 0 0 0;
+#X connect 40 0 0 0;
+#X connect 41 0 0 0;
+#X connect 42 0 0 0;
+#X connect 43 0 0 0;
+#X connect 44 0 31 0;
+#X connect 45 0 0 0;
+#X connect 46 0 0 0;
+#X connect 47 0 0 0;
+#X connect 48 0 17 0;
+#X connect 48 0 52 0;
+#X connect 49 0 0 0;
+#X connect 51 0 0 0;
+#X connect 52 0 55 0;
+#X connect 53 0 55 1;
+#X connect 54 0 55 2;
+#X connect 55 0 2 0;
+#X connect 55 0 44 0;
+#X connect 55 1 5 0;
+#X connect 55 1 44 0;
+#X connect 55 2 16 0;
+#X connect 55 2 44 0;