blob: d9c19bf48fc33ea057335b71ebf07ab872c831c5 (
plain)
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
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
|
#N canvas 265 393 662 400 10;
#X obj 31 34 inlet;
#X obj 31 301 outlet;
#X obj 453 39 inlet;
#X msg 453 86 setK lnk \$1;
#X obj 546 40 inlet;
#X msg 546 86 setD lnk \$1;
#X obj 126 300 outlet;
#N canvas 327 184 457 717 creation_corde 0;
#X msg 143 117 0;
#X obj 143 142 f;
#X obj 143 193 + 1;
#X obj 143 169 moses \$1;
#X obj 165 220 t f f;
#X obj 175 649 t a;
#X obj 195 366 pack f f;
#X obj 195 247 t f f;
#X obj 241 248 \$1;
#X msg 195 389 mass M-\$1 1 1 \$2;
#X obj 225 300 /;
#X msg 121 580 link lnk M-\$1 M-\$2 \$3 \$4;
#X obj 121 552 pack f f \$2 \$3;
#X obj 69 418 f;
#X obj 69 445 moses \$1;
#X obj 173 677 outlet;
#X msg 31 578 setL lnk 0;
#X obj 43 50 t b b b b b b;
#X obj 43 23 inlet;
#X msg 163 94 reset \, mass M-0 0 1 0;
#X msg 69 392 0;
#X obj 152 525 + 1;
#X obj 69 495 + 1;
#X obj 69 470 t f f f;
#X obj 91 522 t f;
#X connect 0 0 1 0;
#X connect 1 0 3 0;
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 4 0 1 0;
#X connect 4 1 7 0;
#X connect 5 0 15 0;
#X connect 6 0 9 0;
#X connect 7 0 6 0;
#X connect 7 1 10 0;
#X connect 8 0 10 1;
#X connect 9 0 5 0;
#X connect 10 0 6 1;
#X connect 11 0 5 0;
#X connect 12 0 11 0;
#X connect 13 0 14 0;
#X connect 14 0 23 0;
#X connect 16 0 5 0;
#X connect 17 0 16 0;
#X connect 17 1 20 0;
#X connect 17 3 0 0;
#X connect 17 4 19 0;
#X connect 17 5 8 0;
#X connect 18 0 17 0;
#X connect 19 0 5 0;
#X connect 20 0 13 0;
#X connect 21 0 12 1;
#X connect 22 0 24 0;
#X connect 23 0 22 0;
#X connect 23 1 12 0;
#X connect 23 2 21 0;
#X connect 24 0 13 0;
#X restore 69 174 pd creation_corde;
#X msg 317 84 forceX M-\$1 \$2;
#X obj 31 249 route massesPos massesForces;
#X obj 70 151 loadbang;
#X obj 136 154 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144
-1 -1;
#X msg 31 81 bang \, get massesPos \, get massesForces;
#X obj 317 42 inlet;
#X obj 31 57 t b f;
#X msg 61 104 posX M-0 \$1;
#X obj 31 227 pmpd;
#X connect 0 0 14 0;
#X connect 2 0 3 0;
#X connect 3 0 16 0;
#X connect 4 0 5 0;
#X connect 5 0 16 0;
#X connect 7 0 16 0;
#X connect 8 0 16 0;
#X connect 9 0 1 0;
#X connect 9 1 6 0;
#X connect 10 0 7 0;
#X connect 11 0 7 0;
#X connect 12 0 16 0;
#X connect 13 0 8 0;
#X connect 14 0 12 0;
#X connect 14 1 15 0;
#X connect 15 0 16 0;
#X connect 16 0 9 0;
|
