1 files changed, 40 insertions, 0 deletions
diff --git a/pd/pmfilter.pd b/pd/pmfilter.pd
new file mode 100644
index 0000000..801ec8c
--- /dev/null
+++ b/pd/pmfilter.pd
@@ -0,0 +1,40 @@
+#N canvas 838 215 702 349 10;
+#X obj 31 216 msd;
+#X obj 31 34 inlet;
+#X obj 31 57 t b f;
+#X obj 80 130 loadbang;
+#X msg 61 104 posX in \$1;
+#X obj 31 290 outlet;
+#X obj 80 156 pack \$1 \$2;
+#X msg 80 182 reset \, mass in 0 1 0 \, mass out 1 1 0 \, link lnk
+in out \$1 \$2;
+#X obj 358 34 inlet;
+#X obj 459 34 inlet;
+#X msg 459 81 setK lnk \$1;
+#X obj 552 35 inlet;
+#X msg 552 81 setD lnk \$1;
+#X msg 31 81 bang \, get massesPos out \, get massesForces out;
+#X obj 31 262 route out;
+#X obj 140 291 outlet;
+#X obj 140 263 route out;
+#X obj 31 238 route massesPosId massesForcesId;
+#X msg 358 81 forceX out \$1;
+#X connect 0 0 17 0;
+#X connect 1 0 2 0;
+#X connect 2 0 13 0;
+#X connect 2 1 4 0;
+#X connect 3 0 6 0;
+#X connect 4 0 0 0;
+#X connect 6 0 7 0;
+#X connect 7 0 0 0;
+#X connect 8 0 18 0;
+#X connect 9 0 10 0;
+#X connect 10 0 0 0;
+#X connect 11 0 12 0;
+#X connect 12 0 0 0;
+#X connect 13 0 0 0;
+#X connect 14 0 5 0;
+#X connect 16 0 15 0;
+#X connect 17 0 14 0;
+#X connect 17 1 16 0;
+#X connect 18 0 0 0;