#N canvas 336 189 834 719 10;
#X obj 24 35 inlet;
#X obj 30 631 outlet;
#X text 591 652 dh20020401;
#X obj 77 86 bang;
#X msg 24 142 mass= \$1;
#X obj 466 162 r b_mass;
#X obj 561 22 valueinit \$1_m \$2;
#X obj 24 119 value \$1_m;
#X obj 126 119 concat !xy;
#X text 23 10 mass name m x y speed_x speed_y;
#X obj 291 276 concat add;
#X obj 371 275 value \$1_m;
#X msg 371 299 divide \$1 \$1;
#X msg 590 273 ?xy;
#X obj 222 276 r b_init;
#X msg 222 301 !xy 0 0;
#X obj 125 171 convert xy= speed=;
#X msg 143 87 ?xy;
#X obj 290 395 vector \$1_speed \$3 \$4;
#X obj 293 363 convert xy= add;
#X msg 620 274 ?xy;
#X obj 291 336 vector \$1_calcul1;
#X obj 288 423 unpack s f f;
#X obj 326 451 * 0.01;
#X obj 386 453 * 0.01;
#X obj 303 493 pack s f f;
#X msg 470 273 mult 0.01 0.01;
#X obj 304 517 route list;
#X msg 289 451 move;
#X obj 295 119 atom \$1_pos \$3 \$4;
#X obj 304 550 atom \$1_pos \$3 \$4;
#X msg 723 273 ?coord;
#X obj 124 145 vector \$1_speed \$5 \$6;
#X obj 337 669 outlet;
#X obj 297 158 inlet;
#X obj 297 184 route force;
#X msg 256 87 1;
#X msg 289 87 0;
#X obj 466 188 spigot;
#X obj 24 62 route !mass ?mass !speed ?speed speed on off;
#X msg 187 88 !abs \$1;
#X obj 668 301 vector \$1_speed \$5 \$6;
#X obj 466 212 t b b b b b b;
#X obj 387 597 unpack f f;
#X obj 304 597 unpack f f;
#X obj 304 574 route coord=;
#X msg 340 647 mass \$1 \$2 \$3 \$4;
#X text 507 596 mass x y speed_x speed_y;
#X obj 339 622 pack f f f f;
#X msg 668 274 ?xy;
#X obj 668 328 route xy=;
#X obj 461 394 value time_interval;
#X obj 461 371 loadbang;
#X connect 0 0 39 0;
#X connect 3 0 7 0;
#X connect 4 0 1 0;
#X connect 5 0 38 0;
#X connect 7 0 4 0;
#X connect 8 0 32 0;
#X connect 10 0 21 0;
#X connect 11 0 12 0;
#X connect 12 0 21 0;
#X connect 13 0 21 0;
#X connect 14 0 15 0;
#X connect 15 0 21 0;
#X connect 16 0 1 0;
#X connect 17 0 32 0;
#X connect 18 0 22 0;
#X connect 19 0 18 0;
#X connect 20 0 18 0;
#X connect 21 0 19 0;
#X connect 22 0 28 0;
#X connect 22 1 23 0;
#X connect 22 2 24 0;
#X connect 23 0 25 1;
#X connect 24 0 25 2;
#X connect 25 0 27 0;
#X connect 26 0 21 0;
#X connect 27 0 30 0;
#X connect 28 0 25 0;
#X connect 29 0 1 0;
#X connect 30 0 45 0;
#X connect 31 0 30 0;
#X connect 32 0 16 0;
#X connect 34 0 35 0;
#X connect 35 0 10 0;
#X connect 36 0 38 1;
#X connect 37 0 38 1;
#X connect 38 0 42 0;
#X connect 39 0 7 0;
#X connect 39 1 3 0;
#X connect 39 2 8 0;
#X connect 39 3 17 0;
#X connect 39 4 40 0;
#X connect 39 5 36 0;
#X connect 39 6 37 0;
#X connect 39 7 29 0;
#X connect 40 0 32 0;
#X connect 41 0 50 0;
#X connect 42 0 31 0;
#X connect 42 1 49 0;
#X connect 42 2 20 0;
#X connect 42 3 13 0;
#X connect 42 4 26 0;
#X connect 42 5 11 0;
#X connect 43 0 48 2;
#X connect 43 1 48 3;
#X connect 44 0 48 0;
#X connect 44 1 48 1;
#X connect 45 0 44 0;
#X connect 46 0 33 0;
#X connect 48 0 46 0;
#X connect 49 0 41 0;
#X connect 50 0 43 0;
#X connect 51 0 23 1;
#X connect 51 0 24 1;
#X connect 52 0 51 0;