#N canvas 36 58 602 351 10;
#X obj 10 157 t b b;
#X obj 10 69 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X msg 141 115 0 \, destroy;
#X obj 106 143 gemwin;
#X obj 9 306 s masse;
#X text 364 271 <- top border;
#X text 365 240 <- bottom border;
#N canvas 527 17 851 257 pool 0;
#X obj 400 180 aglom4 0 15;
#X obj 240 180 aglom4 -2 15;
#X obj 320 160 aglom4 -1 14;
#X obj 0 0 aglom4 -5 6;
#X obj 80 0 aglom4 -4 6;
#X obj 160 0 aglom4 -3 6;
#X obj 240 0 aglom4 -2 6;
#X obj 320 0 aglom4 -1 6;
#X obj 400 0 aglom4 0 6;
#X obj 480 0 aglom4 1 6;
#X obj 560 0 aglom4 2 6;
#X obj 640 0 aglom4 3 6;
#X obj 720 0 aglom4 4 6;
#X obj 800 0 aglom4 5 6;
#X obj 0 20 aglom4 -5 7;
#X obj 80 20 aglom4 -4 7;
#X obj 160 20 aglom4 -3 7;
#X obj 240 20 aglom4 -2 7;
#X obj 320 20 aglom4 -1 7;
#X obj 400 20 aglom4 0 7;
#X obj 480 20 aglom4 1 7;
#X obj 560 20 aglom4 2 7;
#X obj 640 20 aglom4 3 7;
#X obj 720 20 aglom4 4 7;
#X obj 800 20 aglom4 5 7;
#X obj 0 40 aglom4 -5 8;
#X obj 80 40 aglom4 -4 8;
#X obj 160 40 aglom4 -3 8;
#X obj 240 40 aglom4 -2 8;
#X obj 320 40 aglom4 -1 8;
#X obj 400 40 aglom4 0 8;
#X obj 480 40 aglom4 1 8;
#X obj 560 40 aglom4 2 8;
#X obj 640 40 aglom4 3 8;
#X obj 720 40 aglom4 4 8;
#X obj 800 40 aglom4 5 8;
#X obj 0 60 aglom4 -5 9;
#X obj 80 60 aglom4 -4 9;
#X obj 160 60 aglom4 -3 9;
#X obj 240 60 aglom4 -2 9;
#X obj 320 60 aglom4 -1 9;
#X obj 400 60 aglom4 0 9;
#X obj 480 60 aglom4 1 9;
#X obj 560 60 aglom4 2 9;
#X obj 640 60 aglom4 3 9;
#X obj 720 60 aglom4 4 9;
#X obj 800 60 aglom4 5 9;
#X obj 0 80 aglom4 -5 10;
#X obj 80 80 aglom4 -4 10;
#X obj 160 80 aglom4 -3 10;
#X obj 240 80 aglom4 -2 10;
#X obj 320 80 aglom4 -1 10;
#X obj 400 80 aglom4 0 10;
#X obj 480 80 aglom4 1 10;
#X obj 560 80 aglom4 2 10;
#X obj 640 80 aglom4 3 10;
#X obj 720 80 aglom4 4 10;
#X obj 800 80 aglom4 5 10;
#X obj 0 100 aglom4 -5 11;
#X obj 80 100 aglom4 -4 11;
#X obj 160 100 aglom4 -3 11;
#X obj 240 100 aglom4 -2 11;
#X obj 320 100 aglom4 -1 11;
#X obj 400 100 aglom4 0 11;
#X obj 480 100 aglom4 1 11;
#X obj 560 100 aglom4 2 11;
#X obj 640 100 aglom4 3 11;
#X obj 720 100 aglom4 4 11;
#X obj 800 100 aglom4 5 11;
#X obj 0 120 aglom4 -5 12;
#X obj 80 120 aglom4 -4 12;
#X obj 160 120 aglom4 -3 12;
#X obj 240 120 aglom4 -2 12;
#X obj 320 120 aglom4 -1 12;
#X obj 400 120 aglom4 0 12;
#X obj 480 120 aglom4 1 12;
#X obj 560 120 aglom4 2 12;
#X obj 640 120 aglom4 3 12;
#X obj 720 120 aglom4 4 12;
#X obj 800 120 aglom4 5 12;
#X obj 0 140 aglom4 -5 13;
#X obj 80 140 aglom4 -4 13;
#X obj 160 140 aglom4 -3 13;
#X obj 240 140 aglom4 -2 13;
#X obj 320 140 aglom4 -1 13;
#X obj 400 140 aglom4 0 13;
#X obj 480 140 aglom4 1 13;
#X obj 560 140 aglom4 2 13;
#X obj 640 140 aglom4 3 13;
#X obj 720 140 aglom4 4 13;
#X obj 800 140 aglom4 5 13;
#X obj 0 160 aglom4 -5 14;
#X obj 80 160 aglom4 -4 14;
#X obj 160 160 aglom4 -3 14;
#X obj 240 160 aglom4 -2 14;
#X obj 400 160 aglom4 0 14;
#X obj 480 160 aglom4 1 14;
#X obj 560 160 aglom4 2 14;
#X obj 640 160 aglom4 3 14;
#X obj 720 160 aglom4 4 14;
#X obj 800 160 aglom4 5 14;
#X obj 0 180 aglom4 -5 15;
#X obj 80 180 aglom4 -4 15;
#X obj 160 180 aglom4 -3 15;
#X obj 320 180 aglom4 -1 15;
#X obj 480 180 aglom4 1 15;
#X obj 560 180 aglom4 2 15;
#X obj 640 180 aglom4 3 15;
#X obj 720 180 aglom4 4 15;
#X obj 800 180 aglom4 5 15;
#X restore 393 99 pd pool;
#N canvas 860 482 327 421 creation 0;
#X obj 46 380 s pd-new;
#X msg 86 95 \; pd filename new ./ \; #N canvas \; #X pop 1 \;;
#X msg 46 350 menuclose;
#X obj 43 47 sel 0 1;
#X obj 43 29 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1
;
#X obj 61 72 t b b;
#X obj 79 299 pack f f f f;
#X obj 70 228 t f f;
#X obj 107 272 * 20;
#X obj 81 272 * 80;
#X msg 79 325 obj \$1 \$2 aglom4 \$3 \$4;
#X obj 60 183 t b f;
#X obj 171 259 + 6;
#X obj 143 263 - 5;
#X obj 61 163 ch_uzi 10;
#X obj 60 203 ch_uzi 11;
#X connect 2 0 0 0;
#X connect 3 0 2 0;
#X connect 3 1 5 0;
#X connect 4 0 3 0;
#X connect 5 0 14 0;
#X connect 5 1 1 0;
#X connect 6 0 10 0;
#X connect 7 0 9 0;
#X connect 7 1 13 0;
#X connect 8 0 6 1;
#X connect 9 0 6 0;
#X connect 10 0 0 0;
#X connect 11 0 15 0;
#X connect 11 1 8 0;
#X connect 11 1 12 0;
#X connect 12 0 6 3;
#X connect 13 0 6 2;
#X connect 14 1 11 0;
#X connect 15 1 7 0;
#X restore 393 125 pd creation pool;
#X obj 56 180 s link;
#X text 227 12 All masses interact each other;
#X text 42 66 <- begin (change the metro speed for slow computer);
#X floatatom 47 89 5 0 0 0 - - -;
#X msg 238 118 reset;
#X obj 238 140 s masse;
#N canvas 828 304 460 310 line 0;
#X obj 62 28 gemhead;
#X obj 60 82 curve 2;
#X msg 136 58 5 8 0;
#X obj 57 135 gemhead;
#X obj 55 189 curve 2;
#X msg 132 165 -5 8 0;
#X obj 162 21 loadbang;
#X msg 79 55 0.5 3 0;
#X msg 74 161 -0.5 3 0;
#X connect 0 0 1 0;
#X connect 2 0 1 2;
#X connect 3 0 4 0;
#X connect 5 0 4 2;
#X connect 6 0 7 0;
#X connect 6 0 2 0;
#X connect 6 0 8 0;
#X connect 6 0 5 0;
#X connect 7 0 1 1;
#X connect 8 0 4 1;
#X restore 393 151 pd line gem;
#X obj 91 239 iLine2D masse -3.5 -7.5 3.5 -7.5 1000 0 0 1;
#X obj 73 213 iAmbient2D masse 0 -0.0015 0 0 0.04;
#X obj 10 120 metro 10;
#X text 366 209 <- give gravity and ambient viscosity;
#X msg 106 90 reset \, view 0 0 -8 0 0 0 0 1 0 \, create \, 1;
#X obj 109 263 iSeg2D masse 0.5 3 5 8 2 0.1;
#X obj 126 284 iSeg2D masse -5 8 -0.5 3 2 0.1;
#X text 163 25 they got a viscosity link. the global comportement is
a bit like paste;
#X connect 0 0 4 0;
#X connect 0 1 9 0;
#X connect 0 1 17 0;
#X connect 0 1 21 0;
#X connect 0 1 22 0;
#X connect 1 0 18 0;
#X connect 2 0 3 0;
#X connect 12 0 18 1;
#X connect 13 0 14 0;
#X connect 18 0 0 0;
#X connect 20 0 3 0;