1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
|
#N canvas 734 87 702 349 10;
#X obj 31 34 inlet;
#X obj 80 130 loadbang;
#X obj 31 290 outlet;
#X obj 80 156 pack \$1 \$2;
#X obj 259 34 inlet;
#X obj 360 34 inlet;
#X msg 360 81 setK lnk \$1;
#X obj 453 35 inlet;
#X msg 31 81 bang \, get massesPos out \, get massesForces out;
#X obj 140 291 outlet;
#X obj 31 238 route massesPosId massesForcesId;
#X msg 61 104 posX in \$1 \, posY in \$2;
#X obj 31 57 t b l;
#X msg 259 108 forceX out \$1 \, forceY out \$2;
#X msg 453 81 setD damp \$1;
#X obj 156 128 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1
-1;
#X obj 552 35 inlet;
#X msg 552 81 setL lnk \$1;
#X obj 31 215 pmpd2d;
#X obj 31 262 route 1;
#X obj 140 263 route 1;
#X msg 80 182 reset \, mass in 0 1 0 0 \, mass out 1 1 0 0 \, link
lnk in out \$1 0 \, setDEnv \$2;
#X connect 0 0 12 0;
#X connect 1 0 3 0;
#X connect 3 0 21 0;
#X connect 4 0 13 0;
#X connect 5 0 6 0;
#X connect 6 0 18 0;
#X connect 7 0 14 0;
#X connect 8 0 18 0;
#X connect 10 0 19 0;
#X connect 10 1 20 0;
#X connect 11 0 18 0;
#X connect 12 0 8 0;
#X connect 12 1 11 0;
#X connect 13 0 18 0;
#X connect 14 0 18 0;
#X connect 15 0 3 0;
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 18 0 10 0;
#X connect 19 0 2 0;
#X connect 20 0 9 0;
#X connect 21 0 18 0;
|
