#N canvas 605 407 505 422 10;
#X obj 26 45 inlet;
#X text 237 8 force = -c.v;
#X obj 93 45 valueinit \$1_c \$2;
#X text 23 8 damping name c;
#X obj 62 120 value \$1_c;
#X msg 62 95 bang;
#X obj 243 78 inlet;
#X obj 248 261 value \$1_c;
#X obj 248 310 *;
#X msg 243 128 ?abs;
#X obj 266 284 * -1;
#X obj 248 360 force \$1_s;
#X obj 337 389 outlet;
#X obj 248 211 r b_spring;
#X text 405 368 dh20020404;
#X obj 64 222 outlet;
#X msg 248 335 !abs \$1;
#X obj 122 150 force \$1_s;
#X obj 26 70 route !c ?c ?force;
#X msg 120 95 ?force;
#X obj 264 184 route abs=;
#X msg 284 128 !xy \$3 \$4;
#X obj 264 159 vector \$1_calcul;
#X obj 243 103 t b a a;
#X obj 332 286 vector \$1_speed;
#X msg 362 132 !xy \$3 \$4;
#X obj 385 159 vector \$1_speed;
#X obj 248 236 t b b;
#X msg 332 264 ?xy;
#X msg 332 311 !force \$1 \$2;
#X connect 0 0 18 0;
#X connect 4 0 15 0;
#X connect 5 0 4 0;
#X connect 6 0 23 0;
#X connect 7 0 8 0;
#X connect 8 0 16 0;
#X connect 9 0 22 0;
#X connect 10 0 8 1;
#X connect 11 1 12 0;
#X connect 13 0 27 0;
#X connect 16 0 11 0;
#X connect 17 0 15 0;
#X connect 18 0 4 0;
#X connect 18 1 5 0;
#X connect 18 2 19 0;
#X connect 19 0 17 0;
#X connect 20 0 10 0;
#X connect 21 0 22 0;
#X connect 22 0 20 0;
#X connect 23 0 9 0;
#X connect 23 1 21 0;
#X connect 23 2 25 0;
#X connect 24 0 29 0;
#X connect 25 0 26 0;
#X connect 27 0 7 0;
#X connect 27 1 28 0;
#X connect 28 0 24 0;
#X connect 29 0 11 0;